Funkcia Excel VBA LBound
LBound vo VBA znamená „Lower Bound“, tj extrahuje najmenšie číslo poľa. Napríklad, ak pole hovorí „Dim ArrayCount (2 až 10) ako String“, potom pomocou funkcie LBound nájdeme najmenší počet dĺžok poľa, tj 2.
Nižšie je uvedená syntax funkcie LBound. Je to veľmi jednoduché a ľahké; má to iba dva parametre.
Lbound (názov poľa (, dimenzia))
- Názov poľa: Toto je prvý argument. Pre tento parameter musíme zadať názov poľa, ktorý sa používa na jeho definovanie.
- (Dimenzia): Ak má pole jednu dimenziu, nie je to potrebné. Štandardne to trvá jeden, inak musíme zadať číslo dimenzie.
Pomocou týchto funkcií teda môžeme zistiť minimálnu dĺžku poľa.
Ako používať funkciu VBA LBound? (Príklad)
Príklad č
Napríklad si pozrite nasledujúci kód.
Kód:
Sub LBound_Example1 () Dim Count (2 až 5) As Integer MsgBox LBound (Count) End Sub
Vo vyššie uvedenom kóde sme definovali pole ako celé číslo a veľkosť poľa ako 2 až 5. Ďalej sme priradili schránku so správou VBA, ktorá zobrazuje najnižšiu dĺžku poľa pomocou funkcie LBound.
Keď spustíme kód, dostaneme nižšie uvedený výsledok do okna správy.
Výkon:
Pretože naše pole začína od 2, funkcia LBound určuje najnižšiu dĺžku poľa ako 2.
Príklad č
Teraz sa pozrite na nižšie uvedený kód.
Kód:
Sub LBound_Example2 () Dim Count (5) As Integer MsgBox LBound (Count) End Sub
Vo vyššie uvedenom prípade sme nerozhodli o najnižšej hranici. Namiesto toho sme teraz zadali dĺžku poľa ako 5. Spustíme kód a uvidíme najnižšiu dĺžku hodnoty.
Výkon:
Výsledok vrátil ako 0, pretože keď neurčíme začiatočný a koncový bod poľa, poskytneme statické číslo, napríklad „Count (5), tj. V tomto prípade hodnota poľa začínajúca od 0, nie od 1. Takže do nej teraz môžeme uložiť celkovo 6 hodnôt.
Počet (0), Počet (1), Počet (2), Počet (3), Počet (4), Počet (5).
Príklad č
Teraz použijeme rozsah údajov a z rozsahu údajov rozhodneme o dolnej hranici. Napríklad si pozrite nasledujúci dátový obrázok.
Z tohto rozsahu určíme najmenšiu a najvyššiu veľkosť riadku.
Najskôr definujte premennú ako variant.
Kód:
Sub LBound_Example3 () Dim Rng ako variant End Sub
Pre túto premennú variantu „Rng“ nastavte referenčnú hodnotu rozsahu ako „Rozsah („ B2: B5 “). Hodnota.“
Kód:
Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Hodnota End Sub
Pre tento rozsah nájdeme najnižšiu a najvyššiu dĺžku poľa. Otvorte schránku správ a funkciu LBound a zadajte názov premennej.
Kód:
Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("B2: B5"). Hodnota MsgBox LBound (Rng) End Sub
Teraz spustite kód VBA a uvidíte najnižšiu hodnotu z dĺžky.
Výkon:
Teraz zmeňte odkaz na premennú z B2: B5 na A2: B5.
Pre tento rozsah nájdeme dolnú a hornú hranicu.
Kód:
Sub LBound_Example3 () Dim Rng As Variant Rng = Range ("A2: B5"). Hodnota End Sub
Pretože máme viac ako jedno dimenzionálne pole, musíme dodať aj číslo dimenzie.
Kód:
Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) End Sub
To find the first column first lower bound above code will help, similarly to find the upper bound in this first column below code will help.
Code:
Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) End Sub
This will find the first column lower length and upper length. Similarly, in the next line, write one more message box but this time, change the dimension from 1 to 2.
Code:
Sub LBound_Example3() Dim Rng As Variant Rng = Range("A2:B5").Value MsgBox LBound(Rng, 1) & vbNewLine & UBound(Rng, 1) MsgBox LBound(Rng, 2) & vbNewLine & UBound(Rng, 2) End Sub
Run the code and see the result in the message box.
Output:
Pre prvú dimenziu je dolná hranica 1 a horná hranica 4.
Kliknutím na tlačidlo „OK“ získate ďalšie limity dimenzií.
Výkon:
Pre druhú dimenziu je dolná hranica 1 a horná hranica 2.
Na čo je potrebné pamätať tu
- Funkcia LBound vráti minimálnu dĺžku z poľa.
- Keď je dĺžka poľa statická, tj. Jediné číslo, potom pole vždy začína od čísla 0, nie od 1.
- V prípade viacrozmerného poľa musíme určiť číslo dimenzie.
