تغییر زبان کیبورد از طریق VBA

**~M*E*H*D*I~** · 2012/07/06, 13:17

RE: تنظیمات تخصصی format cell

سلام
البته من مقاله ای در زمینه تغییر زبان در اکسل با وی بی خوندم قبلا که باید یه مرور مجدد بکنم شاید راهی باشه

**~M*E*H*D*I~** · 2012/07/11, 09:13

RE: تنظیمات تخصصی format cell

سلام
من این کار رو تو یک فرم پیاده کردم حالا بنا به نوع برنامه و رویداد ها و شرط های برنامه تابع رو میتونید فراخوانی کنید

فایل های پیوست شده

LANG.xlsm (26.0 کیلو بایت, مشاهدات 442)

**mahsa shayesteh** · 2012/07/11, 12:05

RE: تغییر زبان کیبورد از طریق VBA

سلام خدمت استاد گرامی
بسیار جالب و کاربردی بود تشکر از زحمات شما

**motabasem** · 2012/07/12, 02:12

RE: تغییر زبان کیبورد از طریق VBA

با سلام و تشکر از راهنمایی استاد ارجمند
راهنمایی تان خیلی عالی و سودمند بود و تشکر از همچنین اساتیدی موجب موباهات اینجانب است

**majid_mx4** · 2014/12/30, 14:43

با سلام
ضمن تشکر از جناب آقای مهدی مدیر محترم و جواب خوبشان و کسب اجازه از ایشان

فایل پیوست یک حالت دیگری از تعیین زبان است که اجازه تایپ انگلیسی در تکست باکس را نمی دهد.

با تشکر میر

فایل های پیوست شده

Only farsi In Textbox Mir.xlsm (17.1 کیلو بایت, مشاهدات 242)

**modizen** · 2015/07/25, 18:13

با عرض سلام
چطور می تونم از این فرم ها در یک شیت کاریم استفاده کنم

**Ali Parsaei** · 2015/07/25, 21:07

نوشته اصلی توسط modizen

با عرض سلام
چطور می تونم از این فرم ها در یک شیت کاریم استفاده کنم

سلام،
اينها مربوط به قسمت ويژوال بيسيک اکسل است و براي استفاده از آن بايد با کدنويسي آشنا شويد و مطالب آموزشي و جزوات در اين باره را تهيه و مطالعه نماييد. قسمت ويژال بيسيک توسط دگمه هاي alt+f11 در دسترس قرار مي گيرد. جهت تمرين و رفع اشکالات هم مي توانيد از مثالهاي موجود در سايت کمک بگيريد.

**linux6020** · 2020/05/26, 21:39

نوشته اصلی توسط ~M*E*H*D*I~

سلام
من این کار رو تو یک فرم پیاده کردم حالا بنا به نوع برنامه و رویداد ها و شرط های برنامه تابع رو میتونید فراخوانی کنید

سلام من این را دانلود کردم
بر روی ویندوز 64 بیت ارور میده میگه باید آپدیت بشه برای ویندوز 64 بیت
راهنمایی میکنید چکار کنم

**majid_mx4** · 2020/05/27, 03:37

با سلام و کسب اجازه

فقط کافیست در خطایی که به رنگ قرمز نمایش داده میشود بعد از Declare این دستور را rePtrSafe اضافه کنید.

برای مثال میشود :Private Declare PtrSafe Function GetKeyboardLayoutName

پایدار باشید میر

**rea behrooziz** · 2025/02/10, 20:58

با سلام، من می خواهم در یک تاکس باکس فارسی تایپ کرده و کیبورد بصورت اتومات به انگلیسی تغییر کند و کدهای زیر را نوشتم ولی ارور میدهد.
Private Sub TextBox1_Enter()

SwitchKeyboardLang (En_Lang)

End Sub