הוספת תאריך כששומרים קובץ אופיס

[idan188]

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

כשאני לוחץ על שמירת קובץ מסוים באופיס (word,ppw,exel) אני רוצה או שיפתח חלון אחר ובו יהיו חייבים לשמור את הקובץ בצירוף תאריך,

או כאשר שומרים קובץ לא משנה השם.. פשוט לשנות השם ולהוסיף אליו את התאריך, בכל מקרה מה שאני רוצה זה להוסיף את התאריך לשם הקובץ.

למישו יש רעיון,דרך??

תודה רבה לעוזרים!

[Dubliner]

אם אתה רוצה להשתמש בשם קבוע ולהוסיף תאריך אז באקסל למשל אתה יכול לנסות לכתוב מאקרו כזה:

Sub SaveByDate()

ActiveWorkbook.SaveAs Filename:= "FileName_" & Format(Date, "mmdd")

End Sub

או שנניח תגדיר למשתמש להכניס את שם הקובץ (ללא התאריך) לתא כלשהו (במקרה הזה B1) ואז תנסה משהו כזה:

Sub SaveByDate()

ActiveWorkbook.SaveAs Filename:=Range("B1").Value & Format(Date, "mmdd")

End Sub