افزودن تاریخ جاری به سربرگ یک کاربرگ آسان است—اکسل یک کادر محاوره ای را ارائه می دهد که در آن می توانید محل قرارگیری تاریخ را مشخص کنید و از کدگذاری &[date] برای درج واقعی تاریخ استفاده کنید. اما اگر بخواهید تاریخ دیروز یا فردا را در هدر وارد کنید، چه؟
به همین راحتی هم نیست در واقع، بدون استفاده از ماکرو نمی توانید این کار را انجام دهید. شاید انعطاف پذیرترین رویکرد نوشتن ماکرو باشد تا تاریخ را درست قبل از چاپ کاربرگ به روزرسانی کند، همانطور که در زیر نشان داده شده است:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = _
Format(Date - 1, "mmmm d, yyyy")
End Sub
مکان های کلان دیروز در مرکز هدر قرار می گیرند. شما به راحتی می توانید ویژگی CenterHeader را به یکی از مکان های هدر موجود دیگر (LeftHeader یا RightHeader) تغییر دهید. همچنین می توانید با تغییر «- 1» به «+1»، ماکرو را برای درج تاریخ فردا تغییر دهید.
