Kuinka käyttää VBA LBound Array -toimintoa? (esimerkkien kanssa)
Excel VBA LBound -toiminto
LBAound VBA: ssa tarkoittaa "Alempi raja " eli se purkaa matriisin pienimmän määrän. Esimerkiksi, jos taulukossa lukee "Dim ArrayCount (2-10) merkkijonona", niin LBound-funktiota käyttämällä löydämme matriisin matriisin pituuden eli 2.
Alla on LBound-funktion syntaksi. Se on hyvin yksinkertainen ja helppo, sillä on vain kaksi parametria.
Lbound (Taulukon nimi [, ulottuvuus])
- Taulukon nimi: Tämä on ensimmäinen argumentti. Tätä parametria varten meidän on määritettävä taulukon nimi, jota käytetään taulukon määrittelemiseen.
- [Dimension]: Jos matriisi on yksi ulottuvuus, sitä ei vaadita, oletusarvoisesti se tarvitsee yhden tai muuten meidän on annettava ulottuvuusnumero.
Joten näiden toimintojen avulla voimme löytää matriisin minimipituuden.
Kuinka käyttää VBA LBound -toimintoa? (Esimerkki)
Voit ladata tämän VBA LBound Excel -mallin täältä - VBA LBound Excel -malliEsimerkki 1
Katso esimerkki alla olevasta koodista.
Koodi:
Sub LBound_Example1 () Dim Count (2 - 5) kokonaislukuna MsgBox LBound (Count) End Sub
Yllä olevassa koodissa olemme määrittäneet matriisin kokonaislukuna ja matriisin kooksi 2 - 5. Seuraavaksi olemme määrittäneet VBA-viestiruudun näyttämään matriisin pienimmän pituuden käyttämällä LBound-toimintoa.
Kun suoritamme koodin, saat alla olevan tuloksen viestiruutuun.
Tuotos:
Koska matriisimme alkaa 2: sta, LBound-toiminto määrittää matriisin pienimmäksi pituudeksi 2.
Esimerkki 2
Katso nyt alla oleva koodi.
Koodi:
Sub LBound_Example2 () Dim Count (5) Kokonaislukuna MsgBox LBound (Count) End Sub
Yllä olevassa emme ole päättäneet alinta rajaa, vaan annoimme vain taulukon pituuden 5: ksi, nyt suoritetaan koodi ja katsotaan arvon alin pituus.
Tuotos:
Se on palauttanut tuloksen arvoksi 0, koska kun emme valitse matriisin aloitus- ja päätepistettä, anna mieluummin staattinen numero, esimerkiksi "Count (5), eli tässä tapauksessa matriisin arvo alkaa 0: sta eikä 1." voi tallentaa siihen nyt 6 arvoa.
Count (0), Count (1), Count (2), Count (3), Count (4), Count (5).
Esimerkki 3
Nyt käytämme data-aluetta ja päätämme alarajan tietojen alueesta. Katso esimerkki alla olevasta datakuvasta.
Tästä alueesta päätämme pienimmän ja suurimman rivikoon.
Määritä ensin muuttuja muunnoksena.
Koodi:
Sub LBound_Example3 () Dim Rng Variant End Sub
Aseta tälle “Rng” -muuttujalle alueen referenssiarvo arvoksi “Alue (“ B2: B5 ”). Arvo”.
Koodi:
Sub LBound_Example3 () Dim Rng kuten variant Rng = Range ("B2: B5"). Arvo End Sub
Tälle alueelle löydämme matalin ja suurimman matriisin pituuden. Avaa viestiruutu ja LBound-toiminto ja anna muuttujan nimi.
Koodi:
Sub LBound_Example3 () Dim Rng kuten variant Rng = Range ("B2: B5"). Arvo MsgBox LBound (Rng) End Sub
Suorita nyt VBA-koodi ja katso pienin arvo pituudesta.
Tuotos:
Vaihda nyt muuttujan viite B2: B5: stä A2: B5: ksi.
Tälle alueelle löydetään ala- ja yläraja-arvot.
Koodi:
Sub LBound_Example3 () Dim Rng kuten variant Rng = Range ("A2: B5"). Arvo End Sub
Koska meillä on enemmän kuin yksi ulottuvuusryhmä, meidän on annettava myös ulottuvuusnumero.
Koodi:
Sub LBound_Example3 () Dim Rng kuten variant Rng = Range ("A2: B5"). Arvo MsgBox LBound (Rng, 1) End Sub
Ensimmäisen sarakkeen löytäminen auttaa ensimmäisen koodin ylärajan yläpuolella, samoin kuin yläreunan löytäminen tässä ensimmäisessä sarakkeessa, koodi auttaa.
Koodi:
Sub LBound_Example3 () Dim Rng kuten variant Rng = Range ("A2: B5"). Arvo MsgBox LBound (Rng, 1) & vbNewLine & UBound (Rng, 1) End Sub
Tämä löytää ensimmäisen sarakkeen alemman ja ylemmän pituuden. Kirjoita samalla tavalla seuraavalle riville vielä yksi viestiruutu, mutta vaihda tällä kertaa ulottuvuus 1: stä 2: een.
Koodi:
Sub LBound_Example3 () Dim Rng Variant Rng = Alue ("A2: B5"). Arvo MsgBox LBound (Rng, 1) & vbNewLine & UBound (Rng, 1) MsgBox LBound (Rng, 2) & vbNewLine & UBound (Rng, 2) Lopeta ala
Suorita koodi ja katso tulos viestiruudussa.
Tuotos:
Ensimmäisen ulottuvuuden alaraja on 1 ja yläraja 4.
Napsauta "Ok" saadaksesi seuraavat ulottuvuusrajat.
Tuotos:
Toisen ulottuvuuden alaraja on 1 ja yläraja 2.
Muistettavaa täällä
- LBound-funktio palauttaa matriisin minimipituuden.
- Kun matriisin pituus on staattinen eli yksi numero, taulukko alkaa aina numerosta 0 eikä 1: stä.
- Jos kyseessä on moniulotteinen taulukko, meidän on määritettävä mitan numero.