בקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?
-
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
אבל הוא יודע לבד ש (i) זה הבא בתור, או שצריך להגדיר משהו?
עריכה:
נראה לי הבנתי, הוא בעצם מגדיר שזה יהיה באותו מספר פיסקה כמו ההערה בראשי, השאלה רק למה לא לכתוב במקום (i) - את המספר האמיתי.
כגון 1 = 1,
2 = 2, וכו'.
טוב לא משנה... העיקר שזה עובד, אני ינסה היום בל"נ.אתה לא צריך להוסיף שום דבר (רק מה שכתבתי לך על השמות של הקבצים), לגבי איך פועל, אסביר בקצרה את הלולאה [הם ה3 שורות הבאות]
For i = 1 To HEAROT.Paragraphs.Count RASHI.Footnotes(i).Range.Text = HEAROT.Paragraphs(i).Range.Text Next iשורה ראושנה אומר שיחליף אוטומטי את הערך של i, בתחלה החל ממספר 1 עד הסמפר של פסקאות שיש במסמך ההערות
השורה השניה היא הקוד עצמו [שואמר לכתוב בתוך ההערת שוליים מספר i את הטקסט שבפסיקה i בקובץ עם הערות]
והשורה 3 אומר שגמר הסיבוב הזה, ויש לחזור לתחילת הלולאה,
ואז שורה ראשונה יתן לi המספר הבא, וחוזר חלילה,אין צורך לכתוב במיוחד זה, הפעולה של פקודת FOR שכתבתי בשורה הראושנה
-
@menajemmendel מדהים!
תודה על ההסבר הבהיר. יש לך את זה... -
@ששמעון נו, עבד לך?
@menajemmendel כן, בדיוק אתמול ניסיתי את זה,
ובהחלט עבד! וזה היה נראה כמו אותות ומופתים...
הייתי רק צריך להתגבר על כמה בעיות:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.
אגב, יש לזה תוכנה בתשלום של חברת דגל ניקוד, ונחמד לגלות שאפשר עם פקודה קטנה בחינם.
תודה רבה לך! -
@menajemmendel כן, בדיוק אתמול ניסיתי את זה,
ובהחלט עבד! וזה היה נראה כמו אותות ומופתים...
הייתי רק צריך להתגבר על כמה בעיות:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.
אגב, יש לזה תוכנה בתשלום של חברת דגל ניקוד, ונחמד לגלות שאפשר עם פקודה קטנה בחינם.
תודה רבה לך!@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
אגב, יש לזה תוכנה בתשלום של חברת דגל ניקוד, ונחמד לגלות שאפשר עם פקודה קטנה בחינם.
תודה רבה לך!זה לא שיש תוכנה בתלשום, ואפשר באופציה מובנית בוורד לעשות את זה בחינם.
פשוט הם מתכנתים עבור אנשים בתשלום, ואתה פגשת מישהו שמוכן לתכנת את זה עבורך בחינם. זה כמו שהיית הולך לעורך דין שהיה מוכן לתת לך שירות בחינם, או רופא, או כל מקצוע אחר -
@menajemmendel כן, בדיוק אתמול ניסיתי את זה,
ובהחלט עבד! וזה היה נראה כמו אותות ומופתים...
הייתי רק צריך להתגבר על כמה בעיות:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.
אגב, יש לזה תוכנה בתשלום של חברת דגל ניקוד, ונחמד לגלות שאפשר עם פקודה קטנה בחינם.
תודה רבה לך!@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.את הא'
אתה צריך לוודות קודם שאין שום דברים נוספים בכתב עילי, ורק אז לעשות את החפש החלף
לגבי הב' לא הבנתי מה אתה אומר -
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
אגב, יש לזה תוכנה בתשלום של חברת דגל ניקוד, ונחמד לגלות שאפשר עם פקודה קטנה בחינם.
תודה רבה לך!זה לא שיש תוכנה בתלשום, ואפשר באופציה מובנית בוורד לעשות את זה בחינם.
פשוט הם מתכנתים עבור אנשים בתשלום, ואתה פגשת מישהו שמוכן לתכנת את זה עבורך בחינם. זה כמו שהיית הולך לעורך דין שהיה מוכן לתת לך שירות בחינם, או רופא, או כל מקצוע אחר@menajemmendel כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
ואתה פגשת מישהו שמוכן לתכנת את זה עבורך בחינם
מה שאתה הבאת זה פקודה בVBA,
הם מציעים 'תוכנה' עם ממשק משתמש.
בכל אופן התכוונתי שאם יש פקודה לא צריך לשלם על ממשק. -
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.את הא'
אתה צריך לוודות קודם שאין שום דברים נוספים בכתב עילי, ורק אז לעשות את החפש החלף
לגבי הב' לא הבנתי מה אתה אומר@menajemmendel כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.את הא'
אתה צריך לוודות קודם שאין שום דברים נוספים בכתב עילי, ורק אז לעשות את החפש החלף
לגבי הב' לא הבנתי מה אתה אומרהתכוונתי שכל אות בנפרד הוא הופך להערת שוליים נפרדת, אז זה טוב כשיש לך א, ב, ג, ד, וכו' עד י',
אבל אם יש לך כתב עילי של "יא" או "יב" שזה אמור להיות הערת שוליים אחת, הוא בעצם הופך אותם לשניים, הבנת?
מה שצריך זה פשוט לעשות החלפה בתוים כלליים (*) כתב עילי להערת שוליים אחת. -
@menajemmendel כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
א - היו עוד תוים שאינם אותיות שהיו כתב עילי.
ב - לאחר בחירת רק התוים שהם אותיות והפיכתם לטקסט הלוח - הע' שוליים, התגלה שהוא הופך כל אות להע' שוליים נפרדת, והרי יש יא, יב, וכו', אתה מבין.את הא'
אתה צריך לוודות קודם שאין שום דברים נוספים בכתב עילי, ורק אז לעשות את החפש החלף
לגבי הב' לא הבנתי מה אתה אומרהתכוונתי שכל אות בנפרד הוא הופך להערת שוליים נפרדת, אז זה טוב כשיש לך א, ב, ג, ד, וכו' עד י',
אבל אם יש לך כתב עילי של "יא" או "יב" שזה אמור להיות הערת שוליים אחת, הוא בעצם הופך אותם לשניים, הבנת?
מה שצריך זה פשוט לעשות החלפה בתוים כלליים (*) כתב עילי להערת שוליים אחת.@ששמעון האם עשית את החפש החלף כמו שכתבתי לך (ע''י החלף בתוכן הלוח)? אצלי אם יש כמה אותיות מחוברות בכתב עילי מחשיב אותם כאחד, ואין את הבעיה שאתה מציין
-
@ששמעון האם עשית את החפש החלף כמו שכתבתי לך (ע''י החלף בתוכן הלוח)? אצלי אם יש כמה אותיות מחוברות בכתב עילי מחשיב אותם כאחד, ואין את הבעיה שאתה מציין
@menajemmendel עשיתי כמו שכתבת,
הענין הוא שאצלי היו עוד סימונים בכתב עילי, אז עשיתי ככה:
וזה גרם שכל אות נחשבת להערת שוליים נפרדת. -
@menajemmendel עשיתי כמו שכתבת,
הענין הוא שאצלי היו עוד סימונים בכתב עילי, אז עשיתי ככה:
וזה גרם שכל אות נחשבת להערת שוליים נפרדת. -
@ששמעון האם עשית את החפש החלף כמו שכתבתי לך (ע''י החלף בתוכן הלוח)? אצלי אם יש כמה אותיות מחוברות בכתב עילי מחשיב אותם כאחד, ואין את הבעיה שאתה מציין
-
@ששמעון ראיתי שיש כמה תיקונים לכן ביקשתי אם אפשר את זה ארוז סופית
ואם אתה אומר שיש בעיה אולי @pcinfogmach @אדם-החושב @מאקרו יכלו להועיל -
@menajemmendel שכחתי לכתוב, יש בעיה קטנה במאקרו הנ"ל, שאחרי כל הערה יש שורה ריקה.
@ששמעון כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
@menajemmendel שכחתי לכתוב, יש בעיה קטנה במאקרו הנ"ל, שאחרי כל הערה יש שורה ריקה.
הנה גירסה מתוקנת בלי אנטרים מיותרים
Sub MACRO5() Dim RASHI, HEAROT As Document Set RASHI = Documents("A.docx") Set HEAROT = Documents("B.docx") For i = 1 To RASHI.Footnotes.Count OTEXT = HEAROT.Paragraphs(i).Range.Text OTEXT = Left(OTEXT, Len(OTEXT) - 1) RASHI.Footnotes(i).Range.Text = OTEXT Next i End Sub@u88 איזה עוד טעויות ראית?
-
@u88 כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
@ששמעון יש מצב שמישהו עושה את המאקרו הזה מסודר בתוך תבנית ????
אני לא מבין מה נח להם בתבנית, זה יוצר שיהיה לך מלא תבניות, ולא תוכל להשתמש במסמך שכבר יש לך כי שמה לא מותקן המאקרו, יותר קל להעתיק אותו בפקודת מאקרו ולהפעיל אותו לא?
ואם אתה לא יודע איך, הנה כאן מדריך -
@u88 כתב בבקשת מידע | האם אפשר להוסיף מלל ממסמך אחר כהערות שוליים?:
@ששמעון יש מצב שמישהו עושה את המאקרו הזה מסודר בתוך תבנית ????
אני לא מבין מה נח להם בתבנית, זה יוצר שיהיה לך מלא תבניות, ולא תוכל להשתמש במסמך שכבר יש לך כי שמה לא מותקן המאקרו, יותר קל להעתיק אותו בפקודת מאקרו ולהפעיל אותו לא?
ואם אתה לא יודע איך, הנה כאן מדריך -
@menajemmendel לא עובד אולי הבעיה אצלי
@u88
מה הבעיה אצלך, מה עושה?
תזכור שצריך שיהיו פתוחים שתי המסמכים
ולמסמך הראשי צריכים לקראו לו A.DOCX
ולמסמך עם הערות צריכים לקראו לו B.DOCX -
@u88
מה הבעיה אצלך, מה עושה?
תזכור שצריך שיהיו פתוחים שתי המסמכים
ולמסמך הראשי צריכים לקראו לו A.DOCX
ולמסמך עם הערות צריכים לקראו לו B.DOCX -
@menajemmendel כך עשיתי ולא עבד
מתנצל@u88
אני לא יודע למה, אבל למה אתה מתכוון לא עבד, האם לא עשה כלום? הוציא הודעה? מה כתוב שם?היה לך הערות שוליים ריקות במסמך הראשי?
אם אתה צריך מסמך מסויים, תשלח לי ואני בלי נדר, אראה מה אני יכול לעשות
 { const baseUrl = "https://www.google.co.il/search?q=site:mitmachim.top"; const m = location.pathname.match(/^\/(topic|category)\/(\d+)/); const type = m ? m[1] : null; const id = m ? m[2] : null; let searchInput; function search(path = "") { const query = searchInput.value.trim(); if (query) { window.open(`${baseUrl}${path}%20${encodeURIComponent(query)}`, "_blank"); } } let buttons = {}; buttons.searchAll = { id: "bb-search-all", label: `חיפוש ${type ? "בכל הפורום" : ""}`, className: type ? "btn-secondary" : "btn-primary", callback: () => search(), }; if (type === "topic") { buttons.searchTopic = { label: "חיפוש בנושא זה", className: "btn-primary", callback: () => search(`/topic/${id}`), }; } else if (type === "category") { buttons.searchCategory = { label: "חיפוש בקטגוריה זו", className: "btn-primary", callback: () => search(`/category/${id}`), }; } buttons.cancel = { label: "ביטול", className: "btn-default", "data-bs-dismiss": "modal" }; const dialog = bootbox.dialog({ title: '<div style="text-align:center;"><img src="/assets/uploads/files/1625950269825-mt-google.png" width="400" alt="חיפוש בגוגל"></div>', message: '<input id="bb-inp" class="bootbox-input bootbox-input-text form-control" placeholder="הקלידו כדי לחפש בגוגל" autocomplete="off"/>', buttons, backdrop: true, show: true, onEscape: true }); dialog.on("shown.bs.modal", function () { searchInput = document.getElementById("bb-inp"); if (searchInput) { searchInput.focus(); searchInput.addEventListener("keydown", function (e) { if (e.key === "Enter") { e.preventDefault(); const query = this.value.trim(); if (query) { search(); dialog.modal("hide"); } } else if (e.key === "Escape") { e.preventDefault(); dialog.modal("hide"); } }); } const searchAllButton = document.getElementById("bb-search-all"); if (searchAllButton) { searchAllButton.title = "לחצו על אנטר כדי לחפש"; } }); })(); void 0;){kind=link}