Innholdsfortegnelse
Denne opplæringen vil demonstrere hvordan du fyller en matrise med en rekke celler.
Tilordne område til matrise
Vi kan enkelt fylle ut en variant med en rekke celler.
Tilordne verdi fra en enkelt kolonne
Dette eksemplet går gjennom området ("A1: A10") og tildeler celleverdiene til en matrise:
| 12345678910111213 | Sub TestArrayValuesSingle ()'Deklarere matrisen som en variantmatriseDim arRng () Som variant'Angi heltallet for å lagre antall raderDim iRw som heltall'Tilordne område til en matrisevariabelarRng = Range ("A1: A10")'gå gjennom radene - 1 til 10For iRw = 1 Til UBound (arRng)'vis resultatet i det umiddelbare vinduetDebug.Print arRng (iRw, 1)Neste iRwSlutt Sub |
De UBound brukes til å sette matrisen øvre grense (f.eks. 10) slik at løkken vet å sløyfe 10 ganger.
DeDebug.Print funksjonen vil vise deg verdien som finnes i matrisen i det umiddelbare vinduet.
Tilordne verdi fra flere kolonner
| 123456789101112131415161718 | Sub TestArrayValuesMultiple ()'Deklarere matrisen som en variantmatriseDim arRng () Som variant'Angi heltallet for å lagre antall raderDim iRw som heltall'Angi heltallet for å lagre antall kolonnerDim iCol som heltall'Tilordne område til en matrisevariabelarRng = Område ("A1: C10")'gå gjennom radene - 1 til 10For iRw = 1 Til UBound (arRng, 1)'nå - mens du er i rad 1, går du gjennom de tre kolonneneFor iCol = 1 til UBound (arRng, 2)'vis resultatet i det umiddelbare vinduetDebug.Print arRng (iRw, iCol)Neste iColNeste iRwSlutt Sub |
I koden ovenfor har vi fylt ut matrisen med verdiene i område ("A1: C10").
De UBound brukes igjen - men denne gangen er det nødvendig to ganger - en gang for å gå gjennom radene, og deretter igjen for å gå gjennom kolonnene.
De Debug.Print funksjonen vil vise deg verdien som finnes i matrisen i det umiddelbare vinduet.
