كيفية استخدام وظيفة 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.