إكسل VBA صفيف
مصفوفة واحدة | صفيف ثنائي الأبعاد
ل مجموعة مصفوفة هي مجموعة من المتغيرات. في Excel VBA، يمكنك الرجوع إلى متغير محدد (عنصر) لصفيف باستخدام اسم الصفيف ورقم الفهرس.
مصفوفة واحدة
لإنشاء صفيف أحادي البعد ، قم بتنفيذ الخطوات التالية.
ضع زر أمر في ورقة العمل الخاصة بك وقم بإضافة الأسطر التعليمات البرمجية التالية:
Films(1) = "Lord of the Rings"
Films(2) = "Speed"
Films(3) = "Star Wars"
Films(4) = "The Godfather"
Films(5) = "Pulp Fiction"
MsgBox Films(4)
النتيجة عند النقر فوق زر الأمر الموجود على الورقة:

تفسير: سطر التعليمة الأولى بتعريف صفيف سلسلة مع اسم الأفلام. يتكون الصفيف من خمسة عناصر. بعد ذلك ، نقوم بتهيئة كل عنصر من المصفوفة. وأخيرًا ، نعرض العنصر الرابع باستخدام MsgBox.
صفيف ثنائي الأبعاد
لإنشاء صفيف ثنائي الأبعاد ، قم بتنفيذ الخطوات التالية. هذه المرة سنقرأ الأسماء من الورقة.

ضع زر أمر في ورقة العمل الخاصة بك وقم بإضافة الأسطر التعليمات البرمجية التالية:
Dim i As Integer, j As Integer
For i = 1 To 5
For j = 1 To 2
Films(i, j) = Cells(i, j).Value
Next j
Next i
MsgBox Films(4, 2)
النتيجة عند النقر فوق زر الأمر الموجود على الورقة:

تفسير: سطر التعليمة الأولى بتعريف صفيف سلسلة مع اسم الأفلام. الصفيف له بعدان. يتكون من 5 صفوف وعمودين. نصيحة: الصفوف تذهب أولاً ، ثم الأعمدة. يتم استخدام المتغيرات الأخرى من النوع Integer لـ Double Loop لتهيئة كل عنصر في الصفيف. وأخيرًا ، نعرض العنصر عند تقاطع الصف 4 والعمود 2.