جدول المحتويات
في هذه المقالة ، سأوضح لك كيف يمكنك تعيين متغير إلى قيمة خلية باستخدام VBA في Excel. ستتعلم كيفية تعيين متغير لقيمة خلية واحدة ونطاق من الخلايا.
تنزيل المصنف التدريبي
تنزيل هذا المصنف التدريبي للتمرين أثناء يقومون بقراءة هذه المقالة.
تعيين المتغير إلى Cell.xlsm
3 أمثلة سريعة لتعيين متغير إلى قيمة خلية في Excel
هنا لدينا مجموعة بيانات تحتوي على أسماء بعض العملاء ، أرقام الاتصال ، و عناوين البريد الإلكتروني في النطاق B3: D13 من ورقة العمل.
نحن نهدف إلى تعيين المتغيرات على قيم الخلايا من مجموعة البيانات هذه باستخدام VBA .
1. اضبط المتغير على قيمة خلية واحدة باستخدام Excel VBA
أولاً ، سنتعلم تعيين متغير على قيمة خلية واحدة باستخدام VBA .
من أجل على سبيل المثال ، دعنا نضبط قيمة الخلية B4 على متغير يسمى Customer_Name .
من الأفضل أن تعرف نوع البيانات للقيمة وتعلنها من قبل. ثم قم بتعيين القيمة في هذا المتغير.
على سبيل المثال ، هنا الخلية B4 تحتوي على الاسم ، Boris Pasternak . إنه متغير من نوع السلسلة . لذلك ، يمكنك استخدام سطري الرموز التاليين 2 :
8815
ولكن لا بأس إذا لم تكن متأكدًا من نوع البيانات. في هذه الحالة ، اكتب السطر الثاني فقط ، وسوف يقرأ VBA القيمة بشكل صحيح لـأنت.
6311
الآن ، للتحقق مما إذا كان VBA قد قرأ القيمة بشكل صحيح أم لا ، أدخل السطر قيمة MsgBox مع أي من مجموعتي الرموز ثم قم بتشغيل الكود.
سيظهر مربع رسالة يوضح لك قيمة الخلية B4 ، بوريس باسترناك .
2. قم بتعيين قيم نطاق الخلايا المجاورة في متغير باستخدام Excel VBA
الآن ، سنقوم بتعيين قيم نطاق الخلايا المجاورة في متغير. على سبيل المثال ، دعنا نقرأ النطاق B3: D13 في المتغير Rng .
هنا سيكون نوع بيانات المتغير نطاق . يمكنك إما التصريح به من قبل على النحو التالي:
4670
أو يمكنك تعيين القيم مباشرة معه.
5670
الآن ، للوصول إلى قيم كائن النطاق ، عليك الوصول إليهم بأرقام الصفوف والأعمدة الخاصة بهم باستخدام كائن خلايا .
على سبيل المثال ، إلى خلية الوصول B4 ، يجب عليك استخدام Rng.Cells (2،1) [ الخلية B4 في الصف الثاني و الأول عمود النطاق B3: D13 .]
أدخل السطر MsgBox Rng.Cells (2،1) داخل الكود الخاص بك وتشغيله. سيظهر بوريس باسترناك ، القيمة في الخلية B4 .
3. قم بتعيين قيم نطاق غير متجاور من الخلايا في متغير باستخدام Excel VBA
أخيرًا ، سنقوم بتعيين قيم نطاق غير متجاور من الخلايا في متغير.
على سبيل المثال ، دعنا نحاول القراءةالنطاق B3: B13 و D3: D13 في متغير يسمى Rng .
إنه مرة أخرى نوع بيانات النطاق . يمكنك إما التصريح به مسبقًا أم لا.
سنستخدم طريقة الاتحاد من VBA للانضمام 2 أو أكثر غير متجاورة نطاقات من الخلايا في نطاق واحد.
1843
الآن للوصول إلى الخلية B4 ، عليك مرة أخرى إدخال السطر MsgBox Rng.Cells (1،1). ثم إذا قمنا بتشغيل الكود ، فسيتم عرض المحتوى في الخلية B4 ، بوريس باسترناك .
أشياء يجب تذكرها
تعمل جميع الطرق الموضحة أعلاه مع ورقة العمل النشطة فقط. إذا كنت تريد الوصول إلى ورقة عمل غير نشطة ، فعليك ذكر اسم ورقة العمل قبل النطاق.
على سبيل المثال ، للوصول إلى النطاق B4 من الورقة 1 ، يجب عليك استخدام:
3628
