قيمة VBA | كيفية استخدام خاصية Excel VBA Value؟ (أمثلة)
خاصية Excel VBA القيمة
القيمة هي خاصية في VBA تُستخدم في الغالب مع طريقة النطاق لتعيين قيمة إلى نطاق معين ، فهي عبارة عن تعبير يحمل في ثناياه عوامل في VBA ، على سبيل المثال ، إذا استخدمنا النطاق ("B3"). القيمة = 3 سيتم تعيين هذا الخلية B3 بقيمة 3 ، وليس بالضرورة أن يتم استخدام خاصية القيمة مع طريقة النطاق فقط التي يمكننا استخدامها مع وظائف أخرى أيضًا.
في وقت مبكر من تعلمنا باستخدام VBA ، نشعر بالفضول لمعرفة كيفية تخزين البيانات في الخلايا. إذا كنت تشعر بالفضول ، فأنت بحاجة إلى فهم خاصية "القيمة". في هذه المقالة ، سنشرح لك خاصية "القيمة" ، وكيفية إدراج القيم أو تعيينها ، وكيفية الحصول على قيمة من الخلية ، وأشياء أخرى كثيرة.
في إحدى المقالات السابقة ، ناقشنا "خلايا نطاق VBA". يمكن أن يساعدنا كائن النطاق في الإشارة إلى خلية واحدة بالإضافة إلى خلايا متعددة. لاستخدام كائن RANGE أولاً ، نحتاج إلى تحديد الخلية التي نحتاج إلى إدراج القيمة فيها والقيمة التي سنقوم بإدراجها.
كيفية استخدام خاصية القيمة في VBA؟
يمكنك تنزيل قالب Excel الخاص بوظيفة القيمة VBA من هنا - قالب Excel لوظيفة القيمة VBAمثال # 1 - كائن النطاق لتعيين القيم إلى الخلايا
- على سبيل المثال ، إذا كنت تريد إدراج قيمة في الخلية A1 ، فعليك إحالة الخلية A1 مثل هذا النطاق ("A1")
رمز:
القيمة الفرعية () النطاق ("A1") End Sub
- بعد إحالة الخلية باستخدام كائن RANGE الآن ، ضع نقطة (.) لرؤية قائمة IntelliSense لجميع الخصائص والأساليب المرتبطة بهذا الكائن.
رمز:
نطاق القيمة الفرعية () ("A1"). End Sub
- قم بتكوين مجموعة متنوعة من الخيارات حدد الخاصية "VALUE".
رمز:
نطاق القيمة الفرعية () ("A1"). قيمة نهاية فرعية
- بمجرد تحديد الخاصية "VALUE" ، نحتاج إلى تعيين القيمة على الخلية A1 بوضع القيمة في علامة التساوي.
رمز:
نطاق القيمة الفرعية () ("A1"). القيمة = "مرحبًا بك في VBA" End Sub
- حسنًا ، سيؤدي هذا إلى إدراج القيمة "مرحبًا بك في VBA" في الخلية A1.
- إذا كنت ترغب في إدخال نفس القيمة إلى خلايا متعددة ، فقم بإحالة الخلايا مثل الكود أدناه.
رمز:
نطاق القيمة الفرعية () ("A1: A5"). القيمة = "مرحبًا بك في VBA" End Sub
- سيؤدي هذا إلى إدراج القيمة من الخلية A1 إلى A5 .
- إذا كنت ترغب في إدراج قيم في خلايا مختلفة ولكن ليس لسلسلة الخلية ، فنحن بحاجة إلى استخدام الرمز وعنوان الخلية في وسيطات منفصلة مثل أدناه.
رمز:
نطاق القيمة الفرعية () ("A1، A5، B4، C2"). القيمة = "مرحبًا بك في VBA" End Sub
- سيؤدي هذا إلى إدراج النص "مرحبًا بك في VBA" في الخلايا A1 و A5 و B4 و C2 .
المثال رقم 2 - أدخل القيمة باستخدام خاصية CELLS
ليس من خلال كائن RANGE ولكن أيضًا باستخدام خاصية VBA CELLS ، يمكننا إدراج القيم. ولكن إحدى المشكلات المتعلقة بكائن CELLS هي أننا لا نتمكن من الوصول إلى قائمة IntelliSense كما حصلنا على كائن RANGE.
هنا نحتاج إلى ذكر أرقام الصفوف والأعمدة التي نحتاجها لإدخال القيمة. على سبيل المثال ، إذا كنت تريد إدخال القيمة في الخلية A1 ، فإن الكود هو CELLS (1،1) ، إذا كنت تريد إدخال القيمة في الخلية B5 ، فإن الرمز هو CELLS (5،2) أي يساوي B5 زنزانة.
لا يمكننا إدراج قيم لخلايا متعددة باستخدام خاصية CELLS ، وهذا بخلاف كائن RANGE الخاص بنا.
مثال # 3 - الحصول على قيمة الخلية
لقد رأينا كيفية إدراج القيم في الخلايا ، والآن سنرى كيفية الحصول على القيم من الخلايا.
الخطوة 1: تحديد متغير على أنه String.
رمز:
القيمة الفرعية () Dim K As String End Sub
الخطوة 2: بالنسبة لهذا المتغير "k" ، سنقوم بتعيين قيمة الخلية A1. في الخلية A1 ، قمت بإدخال القيمة "مرحبًا بك في VBA".
لذلك سيكون الرمز k = Range (“A1”). القيمة
رمز:
القيمة الفرعية () Dim K As String K = Range ("A1"). Value End Sub
الخطوة 3: اعرض نتيجة المتغير "k" في مربع رسالة VBA.
رمز:
القيمة الفرعية () Dim K As String K = Range ("A1"). القيمة MsgBox K End Sub
من خلال تشغيل الكود ، يجب أن تكون نتيجة قيمة الخلية A1 في مربع الرسالة.
يمكننا أيضًا استخدام كائن RANGE للحصول على بيانات الخلية A1 ، سيظهر لك الرمز أدناه نفس الشيء.
رمز:
القيمة الفرعية () Dim K As String Set CellValue = Range ("A1") MsgBox CellValue End Sub
يجب أن يحصل هذا أيضًا على قيمة الخلية A1 في مربع الرسالة.
مثال 4 - قيمة الخطأ إذا تطلبت أكثر من قيمة خلية واحدة
للحصول على مثال ، انظر إلى الكود أدناه.
رمز:
القيمة الفرعية () Dim K As Range Set CellValue = Range ("A1: A5") MsgBox CellValue End Sub
إذا قمت بتشغيل الكود أعلاه ، فسنحصل على الخطأ "عدم تطابق النوع".
سبب حصولنا على هذا الخطأ لأنه عندما يتم تعيين متغير الكائن على أكثر من خلية واحدة "قيمة" الخاصية لا تفهم حقًا قيمة الخلية التي يجب تقديمها ، لذلك يمكنها الحصول على قيمة خلية واحدة في كل مرة.
