הכנס דפי עבודה עם מספור תאריכים

כיצד להכניס טבלאות ל- x הימים הבאים

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

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

Sub FuegeTabellenEin ()
מספר עמום כמספר שלם
Dim i כמספר שלם
Number = InputBox ("כמה גיליונות להוסיף?")
עבור i = 1 למספר
גליונות עבודה.הוסף לאחר: = גליונות עבודה (דפי עבודה. ספירה)
דפי עבודה (דפי עבודה. ספירה) .Name = תאריך + i
הבא i
סיום תת

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

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

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