حل مشکل فارسی نوشتن در کدهای vba اکسل

حل مشکل فارسی نوشتن در کدهای vba اکسل

حل مشکل فارسی نوشتن در کدهای vba اکسل

با سلام و عرض ادب خدمت یکایک دنبال کنندگان محترم سایت آموزشی اکسل لرن. در این مقاله آموزشی کوتاه قصد داریم پیرامون حل مشکل فارسی نوشتن در کدهای vba اکسل را با یکدیگر بررسی و نسبت به رفع آن اقدام کنیم.

کاربرانی که با ماکرونویسی در محیط اکسل آشنایی دارند، گاها پس از نصب ویندوز جدید با مشکل فارسی نوشتن در کدهای وی بی ای روبرو هستند. در ادامه نمایی از کارکترهای عجیب و غریب را مشاهده خواهید نمود که با درج کارکترهای فارسی در محیط کدنویسی وی بی ای ایجاد می گردند:

حل مشکل فارسی نوشتن در کدهای vba اکسل
حل مشکل فارسی نوشتن در کدهای vba اکسل

حال به منظور رفع این مشکل می بایست ابتدا وارد محیط Control Panel از ویندوز خود شوید. بدین منظور تنها کافی است همانند تصویر زیر عبارت Control Panel را در قسمت سرچ ویندوز جستجو نمایید:

حل مشکل فارسی نوشتن در کدهای vba اکسل
حل مشکل فارسی نوشتن در کدهای vba اکسل

با انتخاب Control Panel، پنجره کنترل پنل را مشاهده خواهید نمود. سپس نیاز است مطابق با تصویر زیر وارد بخش Region شوید:

حل مشکل فارسی نوشتن در کدهای vba اکسل
حل مشکل فارسی نوشتن در کدهای vba اکسل

در ادامه از سربرگ Administrative برروی Change System locale … کلیک نمایید:

حل مشکل فارسی نوشتن در کدهای vba اکسل
حل مشکل فارسی نوشتن در کدهای vba اکسل

سپس مقدار Current system locale را برروی Persian (فارسی) تنظیم کنید:

حل مشکل فارسی نوشتن در کدهای vba اکسل
حل مشکل فارسی نوشتن در کدهای vba اکسل

پس از اعمال تغییرات فراموش نکنید حتما یکبار ویندوز خود را ریستارت(Restart) کنید.

همچنین به منظور درک بهتر شما عزیزان، یک ویدیوی کوتاه آموزشی پیرامون حل مشکل فارسی نوشتن در کدهای vba اکسل با توجه به مراحل فوق آماده نمودیم که در ادامه می توانید آن را مشاهده نمایید:

در پایان امیدواریم این مقاله آموزشی مورد رضایت شما عزیزان قرار گرفته باشد لذا در صورت وجود هرگونه انتقاد و پیشنهاد می توانید آن را در قسمت نظرات برای ما ارسال نمایید تا در اسرع وقت پاسخگوی آن باشیم. با تشکر از همراهی شما.

پیشنهاد ما به شما

فیسبوک توییتر گوگل + لینکداین تلگرام واتس اپ کلوب

امتیاز شما به مطلب

دوست داشتم: 209
دوست نداشتم: 196
میانگین امتیازات: 1.07

13 دیدگاه در “حل مشکل فارسی نوشتن در کدهای vba اکسل”

سلام
برخی از فونت‌ها از کارکترهای عربی پشتیبانی نمی‌کنند و حتی با وجود فارسی بودن تنظیمات کنترل پنل، نمیشه با اونا فارسی نوشت.
پس اگه از تنظیمات فارسی کنترل پنل که پایین‌تر دوستمون توضیح داده مطمئنید، مراحل زیر را دنبال کنید.
توی محیط vba از منوی tools\options
در پنجره‌ی بازشده از تب Editor Format
فونتی را انتخاب کنید که arabic را هم ساپورت کنه.
من خودم از فونت Calibri Light(arabic) استفاده کردم.

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

سلام ارادتمندم
از جایگاه کاربرگ استفاده کنید.
Worksheets(1)
یعنی اولین کاربرگ
Worksheets(2)
یعنی دومین ..

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

سلام آقا مجتبی متاسفانه بنده ماکرویی در این خصوص ندارم. از این بابت پوزش میطلبم

سلام،
من از نظر نمایش حروف فارسی در محیط vba مشکلی ندارم، ولی بعنوان مثال نتایج AutoFilter تنها برای اعداد و حروف لاتین اجرا میشه و حروف فارسی شناسایی نمیشه.
ممنون میشم راهنمایی کنید.

سلام وقتتون بخیر. واقعیت جناب بدیعی بنده راه حلی برای این موضوع ندارم اما میتوانید از بچه های گروه هم بپرسید. از طریق ربات زیر عضو گروه تلگرامی ما شوید. آنجا در صورت امکان شمارو با تصویر راهنمایی خواهند کرد.عضویت در گروه تلگرامی ما کاملا رایگان است Masoudhosseini_bot

محمد جان کاملا مشکلم حل شد ممنون

جناب حسینی سلام
ورژن اکسل چند باید باشه فایلها ارور میدن و روی عکسش علامت تعجب داره ممنون

سلام فرزاد جان، متوجه نشدم متاسفانه. سعی کنید اکسل نسخه جدید را داشته باشید. آخرین نسخه اکسل 2021 است.

سلام پس از تغییر به فارسی مشکل تبدیل جداکننده پیش میاد و فقط ی جداکننده برای ما ؛ حق انتخاب میذاره ک در این صورت توابع رو نمیتونیم درست ببینیم

سلام دوست عزیزم امیدوارم حالتون خوب باشه. عذرخواهی میکنم این فضای برای پاسخگویی به سوال شما مناسب نیست به همین خاطر پیشنهاد میکنم در گروه تلگرامی ما مطرح کنید.
دریافت لینک گروه از ربات Masoudhosseini_bot در تلگرام

در خدمتتون هستیم ❤️

Sub AddLineBreaksForB_Titr()
Dim para As Paragraph
Dim rng As Range
Dim fontName As String

fontName = “B Titr” ‘ نام فونت مورد نظر

For Each para In ActiveDocument.Paragraphs
Set rng = para.Range
If rng.Font.Name = fontName Then
rng.InsertAfter vbCrLf
End If
Next para
End Sub

پاسخ دهید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *