seychellesartprojects.org

وظيفة Excel VBA CHR

VBA CHR هي وظيفة مضمنة تندرج تحت فئة String / Text Functions وتستخدم للحصول على الحرف المكافئ لرمز ASCII. وظيفة Excel Workspace المكافئة لـ CHR هي Application.WorksheetFunction.CHAR.

الموضح أدناه هو بناء جملة Chr.

هذه الوظيفة لها حجة واحدة. أين،

CharCode = هذه معلمة مطلوبة. إنه رمز ASCII الذي سيتم استرداد حرف مكافئ له.

ترجع الدالة قيمة سلسلة تدل على الحرف المكافئ لرمز ASCII المحدد. ASCII هي مجموعة فرعية من معيار ترميز أحرف Unicode وتتكون من 128 رمزًا في مجموعة الأحرف. تتكون الرموز من الأحرف الكبيرة والصغيرة والأرقام والأحرف الخاصة بما في ذلك أحرف التحكم وعلامات الترقيم. يحتوي كل رمز في مجموعة الأحرف على قيمة عشرية مكافئة (من 0 إلى 127) وقيمة سداسية عشرية وقيمة ثماني.

مثال

يمكنك تنزيل قالب Excel VBA CHR هذا هنا - قالب Excel VBA CHR

الخطوة 1 : في ورقة Excel ، أضف نصي رأس في الخلية A1 و C1 كما هو موضح في الشكل أدناه. العمود A لإدخال رمز ASCII والعمود C لطباعة الحرف المقابل المحسوب باستخدام وظيفة CHR.

الخطوة 2 : اتبع الخطوات الموضحة في القسم التالي لإنشاء زر في مصنف Excel (يرجى تمرير المقالة) وتغيير التسمية التوضيحية الخاصة به إلى "انقر هنا".

الخطوة 3 : اكتب مقتطف الشفرة التالي في VBA. يقرأ الرمز القيمة من الخلية A2 والتي يتم تقديمها كمدخل لوظيفة CHR. يتم استرداد النتيجة في String char1 ثم تعيينها إلى الخلية C2.

رمز:

 Sub Button1_Click () 'تُرجع هذه الدالة الحرف للقيمة التي تم إدخالها في الخلية A2 Dim char1 كسلسلة' قم بتعريف متغير char1 على أنه String char1 = Chr (Range ("A2"). Value) 'قراءة القيمة من نطاق الخلية A2 ("C2 ") .Value = char1 'إخراج الطباعة في الخلية C2 End Sub 

الخطوة 4: احفظ رمز VBA Excel وارجع إلى مصنف Excel لإدخال قيمة الإدخال في الخلية A2 كما هو موضح أدناه.

أدخل 65 كإدخال ASCII حيث سيتم العثور على الحرف المقابل في الخلية C2.

الخطوة 5: انقر فوق الزر "انقر هنا" لطباعة النتيجة في الخلية C2.

لاحظ النتيجة المطبوعة في الخلية C2. مقتطف الشفرة الذي كتبناه في الخطوة الخطوة 3 مسؤول عن قراءة الإدخال من الخلية A2 ، وتشغيل وظيفة Chr عليها وطباعة القيمة في الخلية C2 كما هو موضح أدناه.

هنا ، يتم إدخال الإدخال على أنه 65 والإخراج المستلم هو A. لذا ، Chr (65) = A.

الخطوة 6 : حاول تغيير الإدخال في الخلية A2 ولاحظ أنك تحصل على الإخراج المعني في الخلية C2 كما هو موضح أدناه.

على سبيل المثال CHR (37) =٪ وهكذا.

كيفية إنشاء زر في Excel؟

كدالة VBA ، يمكن استخدامها في كود ماكرو excel الذي يتم إدخاله من خلال محرر Microsoft Visual Basic المدمج في MS Excel. الرجوع إلى الخطوات الواردة أدناه لمعرفة المزيد.

الخطوة 1: قم بتشغيل وضع المطور في Excel

لكي يتم استخدام أي وظيفة من وظائف VBA في Excel ، يجب على المرء تشغيل وضع المطور من ملف-> قائمة الخيارات كما هو موضح في الشكل أدناه.

انقر فوق ملف -> خيارات -> شريط العميل -> المطور -> موافق

نتيجة لذلك ، ستتم إضافة خيار شريط أدوات جديد يسمى "Developer" إلى المصنف كما هو موضح في الصورة أدناه.

الخطوة 2: حفظ المصنف

احفظ مصنف Excel باسم "مصنف Excel Macro-Enabled".

الخطوة 3: أدخل عنصر تحكم نموذج في مصنف

• انقر فوق علامة التبويب المطور. وفي قسم الضوابط الفرعي ، انقر فوق الخيار "إدراج" في VBA.

• اختر زر التحكم الأول

• لاحظ أن مؤشر المصنف يتغير إلى رمز قابل للرسم.
• أثناء محاولتك رسم زر ، سيتم تشغيل نافذة حوار جديدة باسم "Assign Macro". هناك يمكنك تحديد اسم الماكرو الذي سيتم استخدامه في كود VB بينما نتعلم المزيد. على سبيل المثال Button1_Click. انقر فوق موافق.

• سيتم بعد ذلك إدراج زر تلقائيًا في المصنف. نص التسمية التوضيحية للزر قابل للتعديل ويمكن تحريره بالنقر المزدوج على الزر.

الخطوة 4: اكتب كود VB

• حدد الزر وانقر فوق الخيار الأول من اليسار أسفل القسم الفرعي "Code" في علامة التبويب Developer ، أي "Visual Basic".

• سيؤدي هذا إلى إطلاق نافذة جديدة لمشروع VBA كما هو موضح في الصورة أدناه.

 

• كما هو مبين في الشكل أعلاه ، يتم ملء هيكل فارغ للماكرو الذي تم إنشاؤه مسبقًا ، مثل Button1_Click في نافذة رمز VB.
• يمكنك كتابة تعريف الماكرو حسب نيتك. هنا ، سنرى مثالاً لوظيفة VBA CHAR في القسم التالي.

الخطوة 5: التبديل بين مصنف Excel و VB IDE

يمكنك التبديل بين مصنف Excel و VB IDE بالنقر فوق الرمز الأيسر المتطرف أسفل قائمة "ملف" ، أي "عرض Microsoft Excel" كما هو موضح أدناه.

أشياء للذكرى

• يمكن لوظيفة CHR إرجاع الأحرف القابلة للطباعة بالإضافة إلى الأحرف غير القابلة للطباعة الموجودة على لوحة المفاتيح والتي يفهمها الكمبيوتر. على سبيل المثال ، الحروف والأرقام والأحرف الخاصة الأخرى هي أحرف قابلة للطباعة. ومع ذلك ، فإن المفاتيح الأخرى مثل Enter و Space و Esc هي أحرف غير قابلة للطباعة.
• CHR هي وظيفة VBA ولا يمكن استخدامها في Excel كما هي. وظيفتها المقابلة في Excel هي Application.WorksheetFunction.CHAR