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 vie 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)

Esimerkki 1

Katso esimerkiksi alla oleva koodi.

Koodi:

Sub LBound_Example1 () Dim Count (2 - 5) kokonaislukuna MsgBox LBound (Count) End Sub

Yllä olevassa koodissa olemme määrittäneet matriisin kokonaisluvuksi 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

Edellä mainitussa tapauksessa emme ole päättäneet alimmasta rajasta. Pikemminkin toimitimme matriisin pituuden nyt 5: nä. Suoritetaan koodi ja katsotaan arvon alin pituus.

Tuotos:

Tulos on palautettu arvoksi 0, koska kun emme valitse matriisin aloitus- ja päätepistettä, anna mieluummin staattinen numero, esimerkiksi "Count (5), ts. Tässä tapauksessa matriisin arvo alkaen 0, ei Voimme 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 esimerkiksi alla olevaa datakuvaa.

Tästä alueesta päätämme pienimmän ja suurimman rivikoon.

Määritä ensin muuttuja muunnoksena.

Koodi:

Sub LBound_Example3 () Dim Rng Variant End End Sub

Määritä tälle Rng-muunnelmamuuttujalle alueen viitearvo 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 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:

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, ts. Yksi numero, taulukko alkaa aina luvusta 0, ei 1: stä.
• Jos kyseessä on moniulotteinen taulukko, meidän on määritettävä mitan numero.