נמאס לכם לבצע משימות שחוזרות על עצמן במיקרוסופט וורד? קבור בתוך התוכנית הוא כלי אוטומציה רב עוצמה שיכול להוריד את העבודות האלה מהידיים שלך. אנחנו מדברים על פקודות מאקרו, ולמרות שהתכונה מסתמכת על Visual Basic for Applications של מיקרוסופט (VBA), אתה יכול להשתמש בה גם אם רעיון הקידוד מעניק לך את heebie-jeebies.
בלחיצת כפתור, וורד תתעד את הפעולות שלך, וייצור מאקרו שתוכל לשחק שוב בתדירות שתרצה. אם אתם הרפתקנים, תוכלו לשנות את המאקרו בקלות למידה אוטומטית נוספת.
כאן נראה לך דוגמה אחת פשוטה אך שימושית: כיצד להפוך את הפונקציה חיפוש והחלפה של וורד לאוטומטית.
הקלטת המאקרו
בדוגמה זו, אתה הנשיא המוערך של החברה לשימור מכשירי שיניים עתיקים. יש לך עשרות מסמכי Word על תותבות היסטוריות וכדומה, כולם עם שם החברה מוזכר באופן בולט. ואז פתאום, הדירקטוריון מצביע על שינוי השם לליגה לשימור עתיקות שיניים. עכשיו אתה צריך דרך קלה לעדכן את המסמכים.
אתה יכול להתחיל במסמך ריק חדש או לפתוח מסמך קיים. אם עדיין לא עשית זאת, יהיה עליך להפעיל את הכרטיסייה מפתח.
לך ל קובץ> אפשרויות> התאמה אישית של סרט. מימין, מתחת כרטיסיות עיקריות, בדוק את ה מפתח אוֹפְּצִיָה. בחר אישור וצא.
עכשיו בואו ניצור את המאקרו שלנו.
- נְקִישָׁה מפתח> הקלטת מאקרו.
- תתבקש לתת שם למאקרו. הזן "ChangeSocietyName" או כל שם אחר שמתאים לך. בעת מתן שמות למקרו, הימנע מרווחים, נקודות, סימני קריאה ותווים מיוחדים, אחרת תקבל הודעת שגיאה. אתה יכול להשתמש במספרים, אך התו הראשון חייב להיות אות.
- ניתן להקצות את המאקרו לכפתור ו / או קיצור מקשים, אך זו אינה דרישה. אם תבחר בכפתור, Word יאפשר לך להוסיף אותו לסרגל הכלים לגישה מהירה. ניתן גם להוסיף תיאור קצר של המאקרו.
- נְקִישָׁה בסדרו- Word יתעד כעת את הפעולות שלך. מכה Ctrl + H להעלות את מצא והחלף שיח.
- הזן את "האגודה לשימור מכשירי שיניים עתיקים" ב מצא ו"ליגה לשימור עתיק שיניים "ב החלף.
- נְקִישָׁה החלף הכל לביצוע פעולת החיפוש והחלפה. זו הפעולה היחידה שאתה רוצה להקליט. לא משנה אם המאקרו אכן מחליף טקסט כלשהו. העניין הוא לשמור אותו למסמכים אחרים.
- זה חשוב: לחץ מפתח> הפסק הקלטה. אחרת, המאקרו יכלול את כל הפעולות הבאות.
עכשיו בואו נראה את עבודת היד שלכם. פתח מסמך המכיל את שם החברה. נְקִישָׁה מפתח> פקודות מאקרו. אם תלחץ לחיצה כפולה על ChangeSocietyName, Word תבצע באופן אוטומטי את הפעולה מצא והחלף.
עֵצָה: כשאתה מקליט את המאקרו, ייתכן שיהיה עליך לבצע פעולה שאתה לא רוצה להקליט. לדוגמה, ייתכן שתרצה להעתיק ולהדביק טקסט בתיבת הדו-שיח חיפוש והחלפה במקום להקליד אותו ידנית. אין בעיה: פשוט לחץ מפתח> השהה הקלטה, העתק והדבק את הטקסט ואז לחץ מפתח> מקליט קורות חיים. לאחר מכן תוכל להשלים את הקלטת המאקרו כמתואר לעיל.
למרות שהתמקדנו כאן ב- Microsoft Word, אתה יכול גם השתמש במקרו כדי להגביר את הפרודוקטיביות ב- Excel. ויש המון פקודות מאקרו חוסכות זמן עבור Microsoft OneNote.
האם ידעת שתוכל לבצע אוטומציה של משימות חוזרות ב- Microsoft Excel באמצעות פקודות מאקרו? אנו נראה לך כיצד להקליט מאקרו ב- Excel 2016 כדי לחסוך זמן רב.
צלילה לקוד
כעת נצלול עמוק יותר למאקרו החדש של Word. לך ל מפתח> פקודות מאקרו, אך במקום ללחוץ פעמיים על המאקרו, בחר בו ולחץ לַעֲרוֹך. זה פותח את עורך Visual Basic, סביבה עצמאית לבניית יישומי VBA.
זה אולי נראה מרתיע, אבל אתה יכול להתעלם מהתפריטים ומרוב הפאנלים. התמקדו במקום זאת בחלון המכיל את הקוד. כפי שאתה יכול לראות, Word בדיוק כתב מאקרו שמבצע את ה- Find and Replace.
משנה ChangeSocietyName ()
'
'מאקרו ChangeSocietyName
'שנה את שם החברה לשימור מכשירי שיניים עתיקים
'
בְּחִירָה. למצוא. ClearFormatting
בְּחִירָה. למצוא. תַחֲלִיף. ClearFormatting
עם סלקציה. למצוא
.Text = "חברה לשימור מכשירי שיניים עתיקים"
.תַחֲלִיף. טקסט = "הליגה לשימור עתיקות שיניים"
.קדימה = נכון
.Wrap = wdFindContinue
.פורמט = שקר
.MatchCase = שקר
.MatchWholeWord = שקר
.MatchWildcards = שקר
.MatchSoundsLike = שקר
.MatchAllWordForms = שקר
סוף עם
בְּחִירָה. למצוא. ביצוע החלף: = wdRlaceAll
סיום משנה
בואו נסביר מה קורה כאן.
ה"סאב "בשורה הראשונה הוא קיצור של" תת דרך ", תוכנית קטנה שיכולה להפעיל לבד או כחלק מיישום VBA גדול יותר. קווים שקודמים להם מרכאות בודדות הם להערות. המרכאות אומרות ל- VBA להתעלם מכל הצהרות בשורות אלה.
ואז נגיע לבשר של הקוד: הקוד שמבצע את מצא והחלף מבצע. כפי שניתן לראות, הוא מציין ערכים עבור כל אפשרות בתיבת הדו-שיח חיפוש והחלפה, כולל הטקסט והטקסט החלופי במרכאות. ה בְּחִירָה. למצוא. לבצע פקודה בסמוך לסוף מקבילה ללחיצה על כפתור "החלף הכל".
Modding את המאקרו
כדי להשתמש במקרו, אתה לא צריך להתעסק עם הקוד או אפילו להסתכל עליו. אבל אתה יכול להפיק יותר מהפונקציה הזו אם אתה מוכן לצלול פנימה. לדוגמא, נניח שאתה מבצע שגיאת הקלדה בעת הקלטת המאקרו. במקום להקליט אותו מחדש, אתה יכול להיכנס ל- Visual Basic ולתקן אותו.
אתה יכול גם לשנות את המאקרו כדי שיהיה שימושי יותר, וזה מה שנעשה כאן. כאשר אתה מפעיל חיפוש והחלפה, בין אם באופן ידני ובין אם באמצעות מאקרו, וורד זוכר את הטקסט חיפוש והחלפה. בפעם הבאה שתפתח את דיאלוג מצא והחלף, הוא ייראה כך.
עדיף לנקות את הערכים כדי שנקבל תיבת דו-שיח נקייה. נעשה זאת עם מאקרו שני, למעט הפעם, נעשה זאת ישירות ב- Visual Basic.
- בעורך Visual Basic בחר את כל תת-הדרכה, מהשורה הראשונה ועד סוף המשנה. מכה Ctrl + C להעתיק אותו.
- מקם את הסמן מתחת לסוף Sub והקש Ctrl + V.. זה עתה שכפלת את תת-הפעולה.
- שנה את השם מ- ChangeSocietyName ל- ClearFindRplace (או כל שם אחר שמתאים לך). זה חשוב מכיוון ש- VBA תיצור הודעת שגיאה אם תנסה להפעיל פקודות מאקרו עם שמות כפולים.
- בתוך ה .טֶקסט ו תַחֲלִיף. טֶקסט ערכים, הסר את הטקסט אך השאר את המרכאות. בעיקרון, אתה אומר ל- Word לא למצוא דבר ולהחליף אותו בלא כלום, אך אתה גם מסלק את הערכים הללו.
התוצאה צריכה להיראות כך:
תת ClearFindReplace ()
'
'ClearFindRlace מאקרו
'נקה טקסט מתיבת הדו-שיח חיפוש והחלפה
'
בְּחִירָה. למצוא. ClearFormatting
בְּחִירָה. למצוא. תַחֲלִיף. ClearFormatting
עם סלקציה. למצוא
.טקסט = ""
.תַחֲלִיף. טקסט = ""
.קדימה = נכון
.Wrap = wdFindContinue
.פורמט = שקר
.MatchCase = שקר
.MatchWholeWord = שקר
.MatchWildcards = שקר
.MatchSoundsLike = שקר
.MatchAllWordForms = שקר
סוף עם
בְּחִירָה. למצוא. ביצוע החלף: = wdRlaceAll
סיום משנה
כעת נחזור למאקרו ChangeSocietyName. מתחת לקוד מצא והחלף, אך לפני סוף המשנה, הזן ClearFindReplace (ללא סוגריים בסוף).
זה נכון: אינך צריך להזין את כל הקוד שיצרת זה עתה, רק את שם המאקרו.
משנה ChangeSocietyName ()
'
'מאקרו ChangeSocietyName
'שנה את שם החברה לשימור מכשירי שיניים עתיקים
'
בְּחִירָה. למצוא. ClearFormatting
בְּחִירָה. למצוא. תַחֲלִיף. ClearFormatting
עם סלקציה. למצוא
.Text = "חברה לשימור מכשירי שיניים עתיקים"
.תַחֲלִיף. טקסט = "הליגה לשימור עתיקות שיניים"
.קדימה = נכון
.Wrap = wdFindContinue
.פורמט = שקר
.MatchCase = שקר
.MatchWholeWord = שקר
.MatchWildcards = שקר
.MatchSoundsLike = שקר
.MatchAllWordForms = שקר
סוף עם
בְּחִירָה. למצוא. ביצוע החלף: = wdRlaceAll
ClearFindRlace
סיום משנה
כאשר Word מריץ את ChangeSocietyName, תחילה הוא יבצע את הפונקציה המקורית Find and Replace. אז זה יפרש את ClearFindRplace כפקודה להפעלת המאקרו השני.
ממשיכים הלאה עם VBA
כפי שאתה יכול לראות, פונקציית הקלטת המאקרו של Word יכולה לעזור לך לחסוך זמן באינספור דרכים. אתה יכול ליצור פקודות מאקרו לאוטומציה כמעט של כל פעולה, ובעורך Visual Basic אתה יכול לשנות את פקודות מאקרו, הטמע מאקרו אחד בתוך השני, או צור תת-תוכנית שמבצעת פקודות מאקרו מרובות אחת אחרי אַחֵר.
מכיוון ש- VBA היא שפת תכנות מן המניין, תוכלו לשלב את תת-המוטיבציות ביישומים גדולים יותר עם משתנים, לולאות, הצהרות מותנות ועוד. וברגע שלמדת את יסודות ה- VBA ב- Word, תוכל ליישם הרבה מאותו ידע כדי ליצור פקודות מאקרו ב- Microsoft Excel ו- Access.
כדי להמשיך הלאה, תרצה ללמוד עוד על מוסכמות VBA ועורך Visual Basic, כגון כיצד לארגן את הקוד שלך וכיצד להתמודד עם באגים. אך גם אם ברצונך להיצמד לפונקציות פשוטות כמו אלה שתוארו כאן, תוכל לעבור דרך ארוכה לשיפור הפרודוקטיביות שלך.
אם אתה משתמש באקסל באופן קבוע, כדאי ללמוד כיצד ליצור מאקרו של VBA ולקבל גישה לפונקציות ויכולות רבות נוספות.
- פִּריוֹן
- מייקרוסופט וורד
- Microsoft Office 365
- Microsoft Office 2016
- טיפים של Microsoft Office
- Microsoft Office 2019
- מאקרו
סטיבן ביל הוא סופר טכנולוגי ותיק שממוקם באזור סן פרנסיסקו. הוא חיבר ספרים רבים על יישומי מחשב בפרסום ועיצוב גרפי, והוא לשעבר עורך חדשות וביקורות עבור מקוורלד. כיום הוא מנהל את The Steampunk Explorer, אתר פופולרי לחובבי הסטיימפונק.
הירשם לניוזלטר שלנו
הצטרף לניוזלטר שלנו לקבלת טיפים טכניים, ביקורות, ספרים אלקטרוניים בחינם ומבצעים בלעדיים!
צעד אחד נוסף !!!
אנא אשר את כתובת הדוא"ל שלך בדוא"ל ששלחנו לך זה עתה.