كيفية استخدام وظيفة vba ubound؟
تم إدراج وظيفة VBA UBOUND في فئة جدول وظائف VBA. عند استخدامه في التعليمات البرمجية لـ VBA، يمكنه إرجاع أعلى فهرس لبعد في المصفوفة المتوفرة . بعبارات بسيطة، يساعدك هذا في العثور على الحد الأعلى للمصفوفة، مما يؤدي إلى إرجاع أعلى قيمة في النتيجة.
بناء الجملة
UBound(اسم الصفيف، [البعد])
الحجج
- ArrayName : المصفوفة التي تريد العثور على أعلى فهرس لها.
- [البعد] : عدد صحيح لتحديد أبعاد المصفوفة (هذه وسيطة اختيارية وإذا تم حذفها، يأخذ VBA 1 افتراضيًا).
مثال
لفهم كيفية استخدام وظيفة VBA UBOUND بشكل عملي، يجب عليك الاطلاع على المثال أدناه حيث قمنا بكتابة كود vba باستخدامه:
Sub example_UBOUND() Dim myAry(0 To 1100) As Double Range("A1").Value = UBound(myAry, 1) End Sub
في الكود أعلاه استخدمنا UBOUND للحصول على أعلى فهرس للبعد من المصفوفة “myAry” وأرجعت 1100 في النتيجة وهي أعلى قيمة من 0 إلى 1100.