תוֹכֶן

• הוראות
• יצירת המאקרו
• שימוש במאקרו
• שים לב

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

הוראות

ליצור, לערוך, להסיר, לפקח ולהעביר תיקיות מהמחשב עם Excel VBA (Hemera Technologies / Photos.com / Getty Images)

יצירת המאקרו

1. הפעל את Microsoft Excel. לחץ על "CTRL + O", בחר את חוברת העבודה ולאחר מכן לחץ על "פתח". כדי ליצור חוברת עבודה חדשה במקום זאת, הקש על "CTRL + N".

2. הקש על "ALT + F8" כדי לפתוח את תיבת הדו-שיח 'מאקרו'. הקלד "GetFolderContents" בתוך התיבה שם מאקרו ולאחר מכן לחץ על "צור".

3. הקלד את הקוד הבא בעורך ה- VBA:

   SubText = "בחר את התיקייה כדי להגדיר את התיקייה." /> בחר / י את התיקייה. רשימת קבצים מתוך "AllowMultiSelect = False .Show אם .SelectedItems.Count <> 0 לאחר מכן xDir = .SelectedItems (1) &" "סיום אם סוף עם אם (MsgBox (בקש: =" האם ברצונך לכלול את שם תיקיות המשנה לחצנים: = vbYesNo, כותרת: = "לכלול תיקיות משנה") = vbYes) ואז GoTo ListFolders GoTo ListFiles אחר GoTo ListFiles סוף אם ListFolders: עבור כל F ב fso.GetFolder (xDir). .FileName ActiveCell.Offset (1, 0) .בחר הבא f list.iles: עבור כל F ב fso.GetFolder (xDir) .Files ActiveCell.Value = f.Name ActiveCell.Offset (1, 0). בחר F f set fso = סוף דבר

   
   

4. לחץ על "ALT + Q" כדי לסגור את עורך VBA ולחזור לחוברת העבודה.

שימוש במאקרו

1. בחר תא גיליון. לחץ על המקש "ALT + I" ו- "C" כדי ליצור עמודה ריקה. בחר את התא הראשון של העמודה החדשה. אם ברצונכם להציג את הרשימה בגליון עבודה חדש, לחצו על "SHIFT + F11".

2. הקש על "ALT + F8" כדי לפתוח את תיבת הדו-שיח 'מאקרו'. בחר "GetFolderContents" ולאחר מכן לחץ על "הפעלה".

3. בחר את התיקייה או הספרייה שמהן ברצונך לרשום את התוכן. לחץ על "אישור".

4. לחץ על "כן" אם ברצונך שהמאקרו ירשום גם את שמות תת-התיקיות, או לחץ על "לא" כדי להציג את הקבצים בלבד. המתן עד ש- Excel יסיים למלא את העמודה החדשה עם תוכן התיקיה שנבחרה.

שים לב

• כברירת מחדל, פקודות מאקרו מושבתות ב- Microsoft Excel. כדי להפעיל אותם, לחץ על לחצן Microsoft Office ולאחר מכן עבור אל "אפשרויות Excel". ודא כי "הצג את הכרטיסייה מפתח" מסומנת. עבור אל "מרכז אמון" ולאחר מכן לחץ על "מרכז הגדרות אמון". עבור אל "הגדרות מאקרו" ולאחר מכן בחר "הפעל את כל פקודות המאקרו". לחץ על "אישור" בשני החלונות, לשמור את כל תיקיות העבודה הפתוחה ולהפעיל מחדש את Excel.