כיצד לקבוע את התא החופשי הבא בעמודה באמצעות מאקרו
בהרבה מאקרו יש להוסיף נתונים באופן רציף. לאחר מכן יש צורך לקבוע את התא הבא בעמודה שבה תוכל להזין נתונים. תוכל לפתור זאת באמצעות נוסחת אקסל.
עם זאת, אם אתה רוצה לקבוע את התא האחרון במאקרו, אתה צריך פקודות VBA. ישנן מספר גישות לפתרון הבעיה. להלן מאקרו מתאים:
Sub SearchFreeCell ()
עמום תא כטווח
Dim Maxzeile כל עוד
אם Val (שמאל (Application.Version, 2))> 11 לאחר מכן
קו מקסימלי = 1048576
אַחֵר
קו מקסימלי = 65536
סוף אם
הגדר תא = תאים (Maxzeile, 1) .סיום (xlUp). קיזוז (1, 0)
MsgBox "התא החופשי הבא הוא" & cell.Address (False, False)
סיום תת
לאחר שהתחיל, המאקרו קובע את התא החופשי הבא שאינו בשימוש בעמודה A. הכתובת של תא זה מוצגת בחלון.
המאקרו פונה לשורה האחרונה בעמודה A בטבלה הפעילה, והחל משם, קובע את התא האחרון המשמש למעלה. על מנת שהמאקרו יעבוד ב- Excel עד גירסה 2003 כמו גם ב- Excel מגרסה 2007, ההבחנה המתאימה למקרה נעשית בתחילת הדרך. הבחנה זו במקרה הכרחית מכיוון שמספר השורות הזמינות גדל עם גירסה 2007 מ- 65536 ל- 1048576.
אם ברצונך למצוא את התא הפנוי בעמודה במקום התא החופשי בעמודה A, החלף את המספר 1 הראשון בסוגריים לאחר הפקודה תאים לפי מספר העמודה המתאימה.
טיפ: אם ברצונך לדעת כיצד להזין ולהפעיל פקודות מאקרו ב- Excel, תוכל למצוא כאן תיאור קצר: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -מקרוס- ב- excel-ein.html