דילוג לתוכן
שימו לב — קטגוריית ארכיון
הנושאים בקטגוריה זו הועברו מארכיון קבוצת גוגל, והמשתמשים המוצגים בהם אינם פעילים בפורום.
לקבלת מענה או לתחילת דיון, מומלץ לפתוח נושא חדש בקטגוריה המתאימה.

מרכאות לפני ואחרי הציטוט

2023
28 5 0 1
  • תאריך ההודעה המקורית: 19/02/2023 11:21

    אני מסכים.
    צריך לשדרג את הרעיון.
    ניסיתי כמה כיוונים אך לא באתי לכלל יישוב כל הקושיות.

    מאת: [email protected]

    תאריך ההודעה המקורית: 19/02/2023 11:26

    המאקרו הבא עובד אצלי.
    זו התוצאה:
    [image: image.png]

    Sub מרכאות()
    '
    ' מרכאות Macro
    '
    '
    Selection.TypeParagraph
    Selection.TypeText Text:=""""""
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.Paste
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
    .Text = " ("
    .Replacement.Text = """ ("
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
    .Text = ")"""
    .Replacement.Text = ")"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.TypeText Text:=" "
    End Sub

  • תאריך ההודעה המקורית: 19/02/2023 11:26

    המאקרו הבא עובד אצלי.
    זו התוצאה:
    [image: image.png]

    Sub מרכאות()
    '
    ' מרכאות Macro
    '
    '
    Selection.TypeParagraph
    Selection.TypeText Text:=""""""
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.Paste
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
    .Text = " ("
    .Replacement.Text = """ ("
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
    .Text = ")"""
    .Replacement.Text = ")"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.TypeText Text:=" "
    End Sub

    תאריך ההודעה המקורית: 19/02/2023 11:49

    לא עברתי בעיון על כל התכתובות, אשתף איפוא במאקרו שעשיתי ושהוכיחה את עצמה:
    קודם כל הגדרתי את ההעתקות בבר אילן כך שהכותרת תוצב בשורה נפרדת מהטקסט עצמו
    וגם תוקף בסוגריים,
    אחר כך העתקתי קטע מבר אילן, הקלטתי מאקרו והקציתי קיצור מקשים, הדבקת המועתק,
    הקלדה של מרכאות בסוף הפסקה, העברת הסמן לתחילת הפסקה (ע"י הקשה על קונטרול +
    חץ למעלה), הקלדה חוזרת של מרכאות וסיום ההקלטה.
    מה שקרה כעת הוא שקבלתי אמנם טקסט ממורכאת כמו שרציתי, אך הכותרת היתה בשורה
    נפרדת. לכן הקלטתי שוב מאקרו *ולאחר *התהליכים הנ"ל צירפתי את שורת הכותרת
    לפסקת הטקסט, כעת התוצאה היתה מושלמת!
    אודה, בתחילה גם לא הערכתי את המאקרו שיבין את הכל, אבל לשבחו ייאמר שהוא
    הוכיח את עצמו...

  • תאריך ההודעה המקורית: 19/02/2023 11:49

    לא עברתי בעיון על כל התכתובות, אשתף איפוא במאקרו שעשיתי ושהוכיחה את עצמה:
    קודם כל הגדרתי את ההעתקות בבר אילן כך שהכותרת תוצב בשורה נפרדת מהטקסט עצמו
    וגם תוקף בסוגריים,
    אחר כך העתקתי קטע מבר אילן, הקלטתי מאקרו והקציתי קיצור מקשים, הדבקת המועתק,
    הקלדה של מרכאות בסוף הפסקה, העברת הסמן לתחילת הפסקה (ע"י הקשה על קונטרול +
    חץ למעלה), הקלדה חוזרת של מרכאות וסיום ההקלטה.
    מה שקרה כעת הוא שקבלתי אמנם טקסט ממורכאת כמו שרציתי, אך הכותרת היתה בשורה
    נפרדת. לכן הקלטתי שוב מאקרו *ולאחר *התהליכים הנ"ל צירפתי את שורת הכותרת
    לפסקת הטקסט, כעת התוצאה היתה מושלמת!
    אודה, בתחילה גם לא הערכתי את המאקרו שיבין את הכל, אבל לשבחו ייאמר שהוא
    הוכיח את עצמו...

    תאריך ההודעה המקורית: 19/02/2023 12:06

    לכאורה עדיין תהיה בעייה כאשר תעשה הדבקה של טקסט בתוך פיסקא קיימת, שהמרכאות
    לא יהיו בתחילת הפסוק אלא בתחילת הפיסקא. לא?
    אולי צריך לתת הוראה שההדבקה כולה תהיה בפיסקא נפרדת וחלק מהמאקרו יהיה לבטל
    את מעברי השורה..
    תוכו צפוף לרווחה..

  • תאריך ההודעה המקורית: 19/02/2023 12:06

    לכאורה עדיין תהיה בעייה כאשר תעשה הדבקה של טקסט בתוך פיסקא קיימת, שהמרכאות
    לא יהיו בתחילת הפסוק אלא בתחילת הפיסקא. לא?
    אולי צריך לתת הוראה שההדבקה כולה תהיה בפיסקא נפרדת וחלק מהמאקרו יהיה לבטל
    את מעברי השורה..
    תוכו צפוף לרווחה..

    תאריך ההודעה המקורית: 19/02/2023 13:37

    זה עובד יפה גם בתוך פסקה קיימת
    המאקרו בעצם קולט את ההעתקה כפסקה נפרדת והוא מצמיד לה מרכאות, רק לאחר מכן
    הוא מאחד אותה עם הפסקה הקודמת, שהיא במקרה הכותרת

  • תאריך ההודעה המקורית: 19/02/2023 11:26

    המאקרו הבא עובד אצלי.
    זו התוצאה:
    [image: image.png]

    Sub מרכאות()
    '
    ' מרכאות Macro
    '
    '
    Selection.TypeParagraph
    Selection.TypeText Text:=""""""
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.Paste
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
    .Text = " ("
    .Replacement.Text = """ ("
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    With Selection.Find
    .Text = ")"""
    .Replacement.Text = ")"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchKashida = False
    .MatchDiacritics = False
    .MatchAlefHamza = False
    .MatchControl = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.MoveRight Unit:=wdCharacter, Count:=1
    Selection.TypeText Text:=" "
    End Sub

    תאריך ההודעה המקורית: 19/02/2023 14:16

    אצלי עדיין יש רווח לפני הגרשיים האחרונים.
    וכן זה מוסיף גרשיים שונות במסמך.
    בברכה מרובה.
    יוסף מיכאל יוסקוביץ
    0548496207

  • תאריך ההודעה המקורית: 19/02/2023 14:16

    אצלי עדיין יש רווח לפני הגרשיים האחרונים.
    וכן זה מוסיף גרשיים שונות במסמך.
    בברכה מרובה.
    יוסף מיכאל יוסקוביץ
    0548496207

    תאריך ההודעה המקורית: 19/02/2023 16:47

    הרב יוסקוביץ, על איזה מאקרו מדובר?

    מאת: [email protected]

  • תאריך ההודעה המקורית: 19/02/2023 16:47

    הרב יוסקוביץ, על איזה מאקרו מדובר?

    מאת: [email protected]

    תאריך ההודעה המקורית: 19/02/2023 16:57

    ניסיתי את כל המאקרואים שהועלו בשרשור.
    בברכה מרובה.
    יוסף מיכאל יוסקוביץ
    0548496207

  • תאריך ההודעה המקורית: 19/02/2023 14:16

    אצלי עדיין יש רווח לפני הגרשיים האחרונים.
    וכן זה מוסיף גרשיים שונות במסמך.
    בברכה מרובה.
    יוסף מיכאל יוסקוביץ
    0548496207

    תאריך ההודעה המקורית: 20/02/2023 00:27

    אכן מורכב (למי שאינו חפץ בהפרדה של שורה בין המקור לציטוט כברירת מחדל)
    ניסינו מכמה כיוונים

    מי שיש לו התוסף עזרים יכול ליצור הדבקה שתכלול החלפה שתכניס מרכאות
    אבל אני לא מכיר קיצור מקשים לפקודות של תוסף זה, ולכאורה נשארנו עם המסורבלות

    ברור לי שישנה דרך למאקרו יעיל, אבל צריך ממש להכיר את השפה...

    מאת: [email protected]

  • עבודת הקלדה מספר שנדפס לפני כמאה שמונים שנה

    2023
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    י
    תאריך ההודעה המקורית: 05/01/2023 17:00 נדרשת עבודת הקלדה מספר שנדפס לפני כמאה שמונים שנה. הקלדה דווקא - לא OCR עם הגהה. 87 עמודים בספר. אשמח לקבל הצעה לעבודה מדויקת ולא יקרה, מבעל/ת נסיון בתחום.
  • עבודת הקלדה מספר שנדפס לפני כמאה שמונים שנה

    2023
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    י
    תאריך ההודעה המקורית: 06/01/2023 00:30 תודה רבה לכל הפונים! בס"ד נמצא מישהו שיבצע את העבודה, ואין צורך לפנות יותר.
  • מרכאות לפני ואחרי הציטוט

    2023
    1
    0 הצבעות
    1 פוסטים
    0 צפיות
    מ
    תאריך ההודעה המקורית: 15/02/2023 22:12 האם ישנה דרך לתת הוראה לפרוייקט השו"ת שיעתיק ציטוט מפסוק עם מרכאות בהתחלה ובסוף? באותו עניין האם ניתן להגדיר שציון המקור ייעשה מלכתחילה בסוף הציטוט? "אשר תשים לפניהם - אמר לו הקב"ה למשה, לא תעלה על דעתך לומר, אשנה להם הפרק וההלכה ב' או ג' פעמים עד שתהא סדורה בפיהם כמשנתה, ואיני מטריח עצמי להבינם טעמי הדבר ופירושו, לכך נאמר אשר תשים לפניהם, כשלחן הערוך ומוכן לאכול לפני האדם".
  • ר"ת שמות המטבעות בגאליצע לפני כ150 שנים.

    2023
    4
    0 הצבעות
    4 פוסטים
    0 צפיות
    מ
    תאריך ההודעה המקורית: 20/03/2023 21:52 בעברית זה שונה לקרונות אבל תרגומו הוא כתרים, קרוין.
  • איך מקובל לציין סימון מרכאות בציון מראי מקומות

    2023
    9
    0 הצבעות
    9 פוסטים
    0 צפיות
    G
    תאריך ההודעה המקורית: 19/04/2023 00:39 לדעתי הכי טוב לכתוב שו"ע (כב, א) כך זה לא מכביד על הקורא
  • מה מקובל לשים כפיסוק לפני שמתחילים להביא כמה נקודות

    2023
    6
    0 הצבעות
    6 פוסטים
    0 צפיות
    מ
    תאריך ההודעה המקורית: 16/05/2023 23:40 יישר כח לכל המשיבים והמעירים נכונה מאת: [email protected]
  • האם מקובל להניח נקודה בסוף סוגריים לפני הסוגר]?

    2023
    5
    0 הצבעות
    5 פוסטים
    0 צפיות
    ב
    תאריך ההודעה המקורית: 22/08/2023 14:24 מחלוקת בין המכונים יש מכונים שכותבים בכללים שלהם שהנקודה תמיד אחרי הסוגר ויש מכונים שכתבו לחלק כמו שכתב הרב shimon maryles ב-יום ראשון, 20 באוגוסט 2023 בשעה 13:16:58 UTC+3, shimon maryles כתב/ה:
  • הוספות מרכאות בפסוקים המובאים בתוך מאמר חז"ל

    2023
    4
    0 הצבעות
    4 פוסטים
    0 צפיות
    א
    תאריך ההודעה המקורית: 06/09/2023 11:36 תלוי בסגנון הספר.

1

מחובר

793

משתמשים

14.1k

נושאים

63.0k

פוסטים