Private Declare Function LoadKeyboardLayout Lib

[absabdi2005]

Private Declare Function LoadKeyboardLayout Lib "user32" Alias "LoadKeyboardLayoutA" (ByVal pwszKLID As String, ByVal flags As Long) As Long
با سلام. آیا کسی می داند چه کدی بایدجایگزین کد بالا شود تا اکسل های 64 بیتی آن را قبول نماید.؟
ویندوز 8.1 ، 64 بیتی و آکسل 2013 با تشکر.

[~M*E*H*D*I~]

کد زیر رو تست کنید

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

برای اطلاعات بیشتر به لینک زیر مراجعه کنید

http://support.microsoft.com/kb/189862