تشخیص ویندوز 32 بیتی یا 64 بیتی توسط اکسل

[elam]

من تو یکی از فایل هام از کد زیر استفاده کردم ( برای استفاده از زبان فارسی به صورت پیشفرض )


Private Declare Function GetKeyboardLayoutName Lib "user32" _
Alias "GetKeyboardLayoutNameA" (ByVal pwszKLID As String) As Long
Private Declare Function LoadKeyboardLayout Lib "user32" _
Alias "LoadKeyboardLayoutA" _
(ByVal pwszKLID As String, ByVal flags As Long) As Long


حالا اگه این فایل را من تو یه سیستم با ویندوز 64 بیتی ارور میده چطور میشه کد را اصلاح کرد به طوریکه تو هر دو تا ویندوز ( 32 و 64 بیتی) جواب بده ممنون

[Amir Ghasemiyan]

سلام دوست عزيز
اينجا قبلا توضيح دادم. پست 4
[حل شده] تغییر زبان کیبورد (http://forum.exceliran.com/showthread.php/6113-%D8%AA%D8%BA%DB%8C%DB%8C%D8%B1-%D8%B2%D8%A8%D8%A7%D9%86-%DA%A9%DB%8C%D8%A8%D9%88%D8%B1%D8%AF?p=31368&viewfull=1#post31368)