כללי היפוך טקסט

[א צענטער]

מי יודע על אפשרות להפוך טקסט מהסוף להתחלה.

לדוגמה: במקום אשרי יושבי ביתך וכו' יהיה כתוב ביתך יושבי אשרי.

תודה רבה!

 

[avram]

יש אפשרות קצת מסורבלת, לא בדקתי אותה אבל נראה לי שזה אמור לעבוד
1. ספור את הרווחים שיש בקובץ
(חפש רווח החלף ברווח ותראה כמה החלפות נעשו)
2. תכין רשימה של מספרים רצים (123... תוכל לעשות את זה עם פסקאות עם מספור אוטומטי) כמספר הרווחים ותהפוך את הסדר שלהם עם הפוך על הפוך
3. שתול בחיפוש והחלפה $ לפני כל מספר
4. כתוב:
(.+? )
ושכפל את זה כמספר הרווחים שיש בקובץ
5. תעתיק לחלון החיפוש את הנוסחה (.+? ) עם כל העותקים שלה
6. תעתיק לחלון ההחלפה את המספרים עם ה $ ותעשה החלף הכל

 

[א צענטער]

תודה על העזרה!

אבל... לא קרה כלום, עשיתי ככל אשר ציויתני, אבל לא התהפך כלום,
אפשר הסבר קצר על התהליך?

לקחתי את הפסקה (כדוגמה כמובן) "מודה אני וכו',
יש בו 11 רווחים,
כתבתי את המספרים 1 2 3 וכו' עד 11 עם רווח בין מספר למספר
(האמת שלא הבנתי איך ליצור רצף מספרים 'על ריק', אז עבדתי בשיטה זו שכמובן לא ניתן לעשותה על הרבה מאוד טקסט, אשמח להחכים גם בזאת),
הפכתי את סדר המספרים באמצעות 'הפוך על הפוך (F6),
שתלתי $ (SHIFT+4) בין מספר למספר (באמצעות חיפוש רווחים והחלפה ב-$)
כתבתי את הנוסחה שלך והכפלתי אותה 11 פעמים,
עשיתי חיפוש הנוסחה כפול 11 פעמים,
החלפה במספרים שביניהם שתולים ה-$,
ו...אכן הוחלף אבל לא קרה כלום מעבר לכך,
עכשיו היה פעמיים את המספרים כשביניהם שתול סימן $

טעיתי בדרך או שהדרך טועה?

תודה רבה!!

 

[avram]

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

מאקרו

Sub convrt()
ActiveDocument.ConvertNumbersToText wdNumberParagraph
End Sub