קוד VBA לשינוי שפה

[נאמן למקור היחיד]

קוד VBA לשינוי שפה

שלום לכולם
האם יש קוד VBA (או כל דרך אחרת) שתאלץ את האקסל לקבל קלט בשפה העברית כברירת מחדל? (שיחול על כל הגיליונות באופן גורף). כלומר אני רוצה להתחיל לכתוב ישר בעברית בלי הצורך לשנות שפה עם ALT +SHIFT

תודה

 

[ziv98]

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

Private Declare Function ActivateKeyboardLayout Lib _
"user32.dll" (ByVal myLanguage As Long, Flag As Boolean) As Long

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Call ActivateKeyboardLayout(1037, 0)
End Sub

ייתכן ואם יש שילוב שונה של מערכת הפעלה ואופיס (מבחינת 32/64 ביט) יהיה צורך לשנות את ההפניה ל - DLL

 

[נאמן למקור היחיד]

לא כ"כ הצלחתי ליישם אצלי (לא עבד)

האם יש דרך פשוטה יותר?
ללא הפניות ל DLL אלא קוד לרשום בקובץ ה personal

 

[ziv98]

הפניה

ההפניה היא למערכת ההפעלה, כיוון שהשפה נקבעת ברמת מערכת הפעלה....
איפה כתבת את הקוד ? ברמת אירוע בחוברת ? לא נתתי פיתרון לפרסונל.
צרף קובץ שלא עובד.

 

[נאמן למקור היחיד]

יש לי אקסל 2013

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