קבע את מספר גליונות העבודה באמצעות VBA

Anonim

כיצד להשתמש במאקרו כדי לברר בכמה דפי עבודה

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

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

מיקום משנה מספר הטבלאות קבוע ()
Dim A כמחרוזת
מספר עמום כמספר שלם
Count = ActiveWorkbook.Worksheets.Count
A = MsgBox ("חוברת עבודה זו כוללת" & מספר & _
"דפי עבודה.", VbOKOnly, "מספר הטבלאות")
סיום תת

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

טיפ: אם ברצונך לדעת כיצד להזין ולהפעיל פקודות מאקרו ב- Excel, תוכל למצוא כאן תיאור קצר: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -מקרוס- ב- excel-ein.html