top of page
  • תמונת הסופר/תאיתי איילון

שמירת חוברת עבודה ללא מקרואים


אם יש לכם קובץ שאתם רוצים לשמור בשם, מבלי לאפשר ממנו הרצת פקודות מאקרו בעתיד, השתמשו בקוד הבא:


Dim strFile As String
Dim file_path As String
Dim file_name As String

file_path = "X:\BBB\CCC\AAAA\2014 Weekly Sales Report\Weekly\Weekly Sales Report "
file_name = "myCustomers_new"

strFile = file_path & file_name & ".xlsx"
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=strFile, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Application.DisplayAlerts = True

קוד זה יאפשר לשמור את הקובץ file_name בנתיב file_path שתבחרו, והוא יישמר כקובץ מסוג xlsx רגיל, בו אין אפשרות להריץ קוד.


 

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

 

תגיות קשורות:


7 צפיות0 תגובות

פוסטים אחרונים

הצג הכול

ומה שביניהם Sleep, Hibernate

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

פוסט מתעדכן - קיצורי מקשים

בפוסט זה יהיו קיצורים שמצאתי כשימושיים לדפדפן, לוינדווז ולתוכנות מסוימות קיצורי מקלדת לכרום Control + Shift + Delete = מחיקת היסטוריית הגלישה וקוקיז בדפדפן Ctrl+shift+n = לפתוח את דפדפן כרום במצב גליש

Comments


bottom of page