בירור | קוד מאקרו ליישור שני טורים בוורד
-
יותר מהר תתעשר אם תמלא כרטיס לוטו...
וברצינות: אתה צריך להבין, בשביל להרויח אתה צריך למכור מוצר מושלם, או לפחות חלקי. הקוד שלך הוא מצויין לתפרנים, כלומר לאנשים שמנסים לעמד לעצמם את הקונטרס שלהם בשביל לחסוך כמה שקלים, אך לא למעמד המקצועי, שבד''כ ילך לאינדזיין, וגם אם ירצה משהו לוורד, הוא ירצה מוצר יותר מושלם. שכולל את כל הפונקציות הנצרכות לעימוד. יישור, טאבים, מסגרות, מרכוז, גובה כתב, וכו' וכו'...במחילה מכבודו, אתה לא מבין התחום העימוד בוורד.
בעימוד בוורד ישנם תוספים לכל דבר בנפרד שנמכרים בנפרד (עיצוב פיסקה, עיצוב כותרות, עיצוב הערות וכו') עוד תוסף אחד של יישור טורים רק יעשיר ויעזור למעמדים בוורד.
מעמד מקצועי מלכתחילה לא יעבוד עם וורד, ומי שכן מעמד עם וורד ישמח לתוסף כזה.
אגב יש לי חבר מעמד מקצועי מאוד ומבוקש מאוד שמעמד בוורד (ללא תוספים!) והספרים שהוא מוציא תחת ידו הם ברמה מאוד מאוד גבוהה (הלקוחות שלו לא יודעים שהוא מעמד בוורד, רובם חושבים שהוא עובד עם 'תג' או אינדיזיין!). -
-
איך יכול להיות?
כל מה שהתוסף עושה, הוא עושה באופן ידני, (בתחתרות בינינו הוא עובד יותר מהר ממני, שאני עובד עם תוספים!)
נו נו...
ככה זה נשמע.... אם אתה אומר שצריך תוסף שכולל הכל, בעוד שישנם כמה מצויינים בשוק..... אדרבה אולי תחכים אותי במשהו....
-
-
@תודה-רבה-4
ללא מאקרו כללף מכניס צורה ריקה, מיישר טם טאב או עושה מעבר רציף לשורה תחתונה ואז ממרכז אותה וכן הלאה..... -
-
@תודה-רבה-4
כן, הוא מיומן... -
@שמעלקא-0 איך זה נשמע פה לכא', כסף משמעותי ספק גדול אם תרוויח. אבל אם תעשה חסד ודאי תרוויח!
ועכ"פ, אשאל רק דבר אחד, האם אתה יכול להעלות לי בבקשה, את פקודות המאקרו שקורא כמה נקודות מרווח יש אחר הפיסקה המסומנת ומגדיל את המרווח הזה (שאחר אותה הפיסקה) בנקודה אחת או שתיים לפי מה שאני אקבע במאקרו (אני מסתדר עם אנגלית).
תודה! -
המאקרו הזה עובד כך:
באופן כללי וורד מיישר את הטקסט אוטומטית. אלא שלפעמים נותרים פערים בין הטורים.
המאקרו בודק את הדף, ומגלה היכן מסתיים כל טור.
אם יש פער ביניהם - הוא מגדיל את המרווח שבין הפסקאות.
לא התעסקתי (בינתיים) עם בקרת שורות מיותמות, ולא עם מרווחים בין שורות או תווים. רק עם מרווחים בין פסקאות [נסו זאת ידנית בלשונית "פריסה"].
ישנה אפשרות להגדיר מרווח מינימום ומקסימום בין פסקאות, על מנת שלא יווצר רווח גדול מידי.
אם יש באמצע העמוד כותרת רחבה, שחותכת את העמוד לשנים, המאקרו מיישר את שני הטורים בחצי הדף העליון, ואחר כך בנפרד את שני הטורים שבחצי הדף התחתון, מתחת לכותרת.
אם הגדלת המרווח בעמודה הקצרה לא מספיקה, המאקרו מצמצם את המרווחים בעמודה השניה.
בעמוד האחרון, אם יש רק טור ימני ואין טקסט בשמאל, הוא מיישר אותו בשני טורים כיאות.
זהו קוד כתוב, מושקע וארוך מאד, לא הקלטה של מאקרו... -
@שמעלקא-0 אני מבין, רק אני שאלתי רק דבר אחד, ב"משלים לוורד" אחד המאקרויים שם, יודע לקרוא את הריווח שאחר הפיסקה המסומנת, ואז יכול להגדיל אותו בנק' אחת, וכמובן המאקרו זו חסום כמו כל המשלים לוורד. חיפשתי בVSB פקודה שמתאימה לעשות את זה ולא מצאתי, אני מבין שלך יש הרבה נסיון בזה, האם אתה יכול לעזור?
תודה! -
@שמעלקא-0
אני כאחד שיוצא לו די הרבה להיפגש עם אברכים פשוטים שמעמדים בוורד. חושב בהחלט שאנשים יסכימו לשלם 50 שקל עבור תוסף שיתן את האופציה הזו.
במיוחד אחרי שאת המילה ראשונה חלון ומירכוז שורה אחרונה כבר יש חינמי. נשאר רק כותרות שמי שיודע מצליח בלי תוסף, ויישור טורים שזה בעצם העבודה המעצבנת........
אגב אם אני מבין ממך נכון המאקרו שלך רץ בבת אחת על כל המסמך ומסדר אותו! בשונה מהמאקרו של רחמים שלא מסדר את המסמך אלא רק נותן לך לראות כמה נקודות חסר בכל טור ומוסיף לחצנים מהירים להוסיף נקודות וכדו'.
תקן אותי אם אני טועה.
ואם זה כך לדעתי זה ירוץ ממש. (אלא א"כ אנשים אוהבים לתקן כל עמוד לבד כדי שיוכלו לראות האם עדיף להגדיל מרוח בין פסקאות או בין שורות וכו'. -
@גבאי אמר בבירור | קוד מאקרו ליישור שני טורים בוורד:
בשונה מהמאקרו של רחמים שלא מסדר את המסמך אלא רק נותן לך לראות כמה נקודות חסר בכל טור ומוסיף לחצנים מהירים להוסיף נקודות וכדו'.
תקן אותי אם אני טועה.המקרו של רחמים רץ על כל המסמך באופן אוטומטי ומסדר את הכל.
-
@תודה-רבה-4 אמר בבירור | קוד מאקרו ליישור שני טורים בוורד:
@מניין @גבאי יש כמה תוספים של רחמים, וכמה גירסאות. אולי תעדכנו על מה כל אחד מדבר.
מדובר על התוסף של רחמים 'בתשלום' שנקרא 'יישור טורים'.
-
מ מגדלים העביר נושא זה מ-עזרה הדדית - תוכנות ב-
-
P poker התייחס לנושא זה ב
-
פוסט זה נמחק!
-
המקרו של רחמים רץ על כל המסמך באופן אוטומטי ומסדר את הכל.
יש כמה תוספים של רחמים, וכמה גירסאות. אולי תעדכנו על מה כל אחד מדבר.
למיטב ידיעתי (כך בדקתי לפני קצת יותר משנה) יש לרחמים תוסף אחד בתשלום שמזהה בכל עמוד כמה נקודות חסר, ואז ע"י לחיצה על כפתור מסויים הוא מיישר, אבל לא ידוע לי כלל שיש משהו שמסדר את כל המסמך בבת אחת.
עיין כאן -
@poker אמר בבירור | קוד מאקרו ליישור שני טורים בוורד:
המקרו של רחמים רץ על כל המסמך באופן אוטומטי ומסדר את הכל.
למיטב ידיעתי (כך בדקתי לפני קצת יותר משנה) יש לרחמים תוסף אחד בתשלום שמזהה בכל עמוד כמה נקודות חסר, ואז ע"י לחיצה על כפתור מסויים הוא מיישר, אבל לא ידוע לי כלל שיש משהו שמסדר את כל המסמך בבת אחת.
עיין כאןאני מדבר מניסיון, כי פשוט יש לי את התוסף, וגם עיינתי בקישור ששלחת, וגם שם תראה שיש אפשרות שנקראת 'יישר מכאן והלאה' [ראה תמונה].
-
ובכן,
אני מעלה כאן קובץ ובו פקודת מאקרו ליישור שני טורים בוורד.
עומדים בעמוד הרצוי, מפעילים את המאקרו, והטורים מתיישרים.
המאקרו בודק את מבנה העמוד, ומוסיף מרווח בין פיסקאות כדי להגיע ליישור מדוייק בין הטורים.הנה הקובץ:
[מעדכן את הפוסט: בהמשך השרשור יש גירסה מעודכנת יותר של הקובץ]
LineToLines1.dotתודה ל @NykUser שכתב את הפוסט הזה, שהועיל לי בענין ההתקנה.
לחברים המומחים ב-VBA:
הקובץ הוא גירסה ראשונית, שעובדת יפה.
אך יש כמה דברים שעשויים לתקוע את הקוד, ואבקש את עזרת המומחים בשיפורו:
א. כדי שהטופס לא יפתח בכל הפעלה, יש צורך לשמור את הגדרות המשתמש האישיות במקור חיצוני מחוץ לקוד. אינני יודע איך עושים זאת.
ב. האם יש פונקציה שבודקת האם אני בטור הראשון או השני.
ג. האם יש פונקציה פשוטה שמחזירה את מספר הפיסקה שלי.
ד. האם יש פונקציה שמובילה אותי לשורה האחרונה בעמוד.
הדברים האלו יעשו את הקוד למדוייק יותר בכל סוגי הקבצים והעמודים, וידלג גם על המכשולים שמציבים לו התוספים הפיראטיים שמניחים מילה ראשונה בתוך מסגרת כדי ליצור חלון, וכיוצא באלו.
בתודה מראש
![חיפוש גוגל בפורום](javascript:{bootbox.prompt({title:'<div style="text-align: center;"><img src="/assets/uploads/files/1625950269825-mt-google.png" width="400"></div>',placeholder:'כתוב מילים לחיפוש ב Google',buttons:{confirm:{label:'חיפוש'},cancel:{label:'ביטול'}},backdrop:true,callback:function(result){if(result!=null&&result!=''){var a=document.createElement('a');a.href='https://www.google.co.il/search?q=site:mitmachim.top '+encodeURIComponent(result.trim());a.target='_blank';a.click();}}})();};){kind=link}