איך עוזרים למשתמשים לעבוד עם קבצים ב-Excel בעזרת VBA?
![👈](https://static.xx.fbcdn.net/images/emoji.php/v9/td0/1/16/1f448.png)
1. החליפו את הפרמטרים הרצויים בקוד הבא:
Sheets(1).Range("A1") = InputBox("TEXT", "TITLE", "DEFAULT")
![☑](https://static.xx.fbcdn.net/images/emoji.php/v9/t8d/1/16/2611.png)
![☑](https://static.xx.fbcdn.net/images/emoji.php/v9/t8d/1/16/2611.png)
![☑](https://static.xx.fbcdn.net/images/emoji.php/v9/t8d/1/16/2611.png)
![☑](https://static.xx.fbcdn.net/images/emoji.php/v9/t8d/1/16/2611.png)
![☑](https://static.xx.fbcdn.net/images/emoji.php/v9/t8d/1/16/2611.png)
2. העתיקו את הקוד.
3. בקובץ האקסל הרצוי פתחו את עורך ה-VBA באמצעות צירוף המקשים Alt (שמאלי) + Enter.
4. תחת החלונית השמאלית VBAProject, לחצו לחיצה כפולה על האובייקט ThisWorkbook המסומן מתחת לשם הקובץ הרצוי.
5. בכותרת החלונית שתיפתח בחרו ב-Workbook, מתחת לתיבת הבחירה (General).
6. בתיבת הבחירה הסמוכה בחרו באירוע שיגרום להופעת ההודעה, למשל: Open – כדי שההודעה תופיע מיד עם הפתיחה, או BeforeClose – כדי שההודעה תופיע לפני הסגירה, וכו'.
7. הדביקו את הקוד בגוף החלונית, שורה לפני הביטוי End Sub. ושמרו את הקובץ.