שפת ברירת מחדל באקסל

A0533057932

האם יש דרך להגדיר שעמודה מסוימת באקסל מכילה מייל
וממילא ברגע ששמים בה את העכבר השפה תשתנה לאנגלית
וכאשר עוברים לעמודות הבאות השפה תחזור להיות עברית?

OdedDvir

@a0533057932 אפשר על ידי קוד וקריאה ל-Windows API.
תדביק את הקוד הבא במודול של הגליון המדובר, ובשורה 6 תגדיר את העמודה הרצויה:

Private Declare PtrSafe Function ActivateKeyboardLayout Lib "user32" (ByVal HKL As LongPtr, _
ByVal flags As Long) As LongPtr

Const aklEnglishUS As LongPtr = &H4090409
Const aklHebrewIL As LongPtr = &HF03D040D
Const ColumnToForceEnglish As Integer = 8

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = ColumnToForceEnglish Then
        ActivateKeyboardLayout aklEnglishUS, 0
    Else
        ActivateKeyboardLayout aklHebrewIL, 0
    End If
End Sub

את ההשראה קיבלתי מכאן: https://stackoverflow.com/questions/449207/how-can-i-call-activatekeyboardlayout-from-64bit-windows-vista-using-vba

תחומים - פורום חרדי מקצועי

שפת ברירת מחדל באקסל