Excel VBA deklarēt masīvu
Masīva deklarēšana VBA ir ļoti līdzīga mainīgo deklarācijai, to dara tas pats blāvs paziņojums vai statisks publisks vai privāts paziņojums, vienīgā atšķirība masīva deklarēšanā un mainīgā deklarēšanā ir tā, ka, deklarējot masīvu, mums jānorāda izmērs masīva augšējā robeža un masīva apakšējā robeža.
VBA kodā mēs varam deklarēt vienu mainīgo masīvu, kurā var ievietot mainīgo skaitu, nevis deklarēt atsevišķus mainīgos. Tas var palīdzēt samazināt rindu skaitu kodā.
Masīvs ir sava veida mainīgais, kas var saturēt vairāk nekā vienu vērtību, atšķirībā no parastajiem mainīgajiem, kas vienlaikus var saturēt tikai vienu vērtību. Masīvs ir uzlabotā VBA mainīgo deklarēšanas versija. Piemēram, iedomājieties situāciju, kad mainīgajiem vēlaties piešķirt 5 studentu vārdus, un vispārējā praksē mēs deklarējam piecus mainīgos lielumus visiem pieciem mainīgajiem, kurus mēs piešķiram individuāliem studentu vārdiem pa vienam; zemāk ir tā paša koda piemērs.
Kods:
Apakšgrupas_piemērs () Dim students1 kā virkne Dim students2 kā virkne Dim students3 kā virkne Dim students4 kā virkne Dim students5 kā virknes beigas Sub
Tā vietā, lai deklarētu tik daudz mainīgo, kā būtu ar ideju deklarēt vienu mainīgo masīvu, kurā var ievietot visus studentu vārdus.
Jā, tas ir iespējams, deklarējot masīvu VBA.
Piemēri
1. piemērs
Lai paziņotu, mums nav jāveic īpaša VBA kodēšana. Drīzāk mums jāievēro vienkārši jēdzieni.
Vispirms sāciet apakšprocedūru.
Kods:
Apakšgrupas_piemērs () Beigu apakšgrupa
Tagad, kā parasti, deklarējiet mainīgo kā virkni.
Kods:
Apakšgrupas_piemērs () Blāvēt studentu kā virknes beigu apakšgrupu
Kad mainīgais ir deklarēts, tagad pārliecinieties, cik vērtību tam vajadzētu būt. Šajā gadījumā es vēlos saglabāt piecus studentu vārdus, tāpēc tagad mums ir jānosaka masīva lielums, ti, no 1 līdz 5. Iekavās norādiet to pašu mainīgajam.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virknes beigu apakšgrupa
Tagad šim vienam mainīgajam mēs varam saglabāt 5 studentu vārdus.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virknes students (1) = "Jānis" students (2) = "Pēteris" students (3) = "Ricky" students (4) = "Maikls" students (5) = "Andersons" End Sub
Paskatieties, cik daudz rindu esam samazinājuši, deklarējot mainīgo kā masīvu. Tas ir viens no veidiem, kā to izdarīt. Mēs joprojām varam saīsināt šo kodu, iekļaujot to VBA cilpās.
Tagad, piemēram, tie paši pieci vārdi, kas man ir darblapas šūnās
Tagad es gribu parādīt šos numurus VBA ziņojumu lodziņā; labi, paziņosim, ka vēl viens mainīgais cilpām ir Integer datu tips.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virkne Dim K kā vesels skaitlis Beig
Kā parasti, masīva mainīgo esmu saglabājis no 1 līdz 5 izmēriem.
Tagad atveriet cilni FOR NEXT VBA, un, tā kā mums ir pieci vārdi, ievadiet ierobežojumu no 1 līdz 5.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virkne Dim K kā skaitlis K = 1 līdz 5 Nākamais K beigu apakšsadaļa
Lai piešķirtu vērtības masīva mainīgajam, mums nav jāievēro iepriekšējais veids, kā šādi norādīt studentu (1), studentu (2) skaitļu pozīcijas piegādes cilpu mainīgajam “k”.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virkne Dim K kā vesels skaitlis K = 1 līdz 5 students (K) = Nākamais K beigu apakšsadaļa
Šim masīva mainīgajam mums ir vajadzīgas vērtības no darblapas, tāpēc rekvizīta CELLS izmantošana iegūst vērtības no darblapas.
Kods:
Apakšgrupas_piemērs () Bloks students (no 1 līdz 5) kā virkne Dim K kā veselais skaitlis K = 1 līdz 5 studentam (K) = šūnas (K, 1). Vērtība Nākamā K beigu apakšdaļa
Tagad, izmantojot ziņojumu lodziņu, parādiet masīva mainīgā vērtību.
Kods:
Apakšgrupas_piemērs () Blāvs students (no 1 līdz 5) kā virkne Dim K kā veselais skaitlis K = 1 līdz 5 studentam (K) = šūnas (K, 1). Vērtība MsgBox students (K) Nākamā K beigu apakšnodaļa
Tagad palaidiet kodu. Ziņojuma lodziņā mēs redzēsim vārdu. Atkal nospiediet Labi, lai redzētu otro vārdu. Šādi nospiežot Labi, mēs varam redzēt visus piecus vārdus.
2. piemērs - divdimensiju masīvi
We have seen above how the array works, now we will see to dimensional arrays. Two-dimensional arrays concentrate on both rows and columns.
In the above example, we have determined the array’s size as 1 to 5; this either concentrates on rows or columns.
By using two-dimensional arrays, we can concentrate on both rows and columns. For this, we need to enclose two loops.
First, define the variable then late we will decide about the size of the array.
Code:
Sub Two_Array_Example() Dim Student As String End Sub
First, decide row size then decide the column length.
Code:
Sub Two_Array_Example() Dim Student(1 To 5, 1 To 3) As String End Sub
For this, I have structured the data for student names, marks, and grade status.
Now come back to the coding window.
Declare two more variables for a loop.
Code:
Otrā apakšsadaļa_Array_Piemērs () Blāvs students (no 1 līdz 5, no 1 līdz 3) kā virkne Dim K kā veselais skaitlis, J kā veselais skaitlis Beiga
Tagad pievienojiet cilpu, kā parādīts zemāk.
Kods:
Divu apakškārtas_Array_Piemērs () Bloks students (no 1 līdz 5, no 1 līdz 3) kā virkne Dim k kā vesels skaitlis, J kā vesels skaitlis uz k = 1 līdz 5, ja J = no 1 līdz 3 darblapām ("Studentu saraksts"). Atlasiet Studentu (k, J) = Šūnas (k, J). Vērtības darblapas ("Kopēt lapu"). Atlasiet Šūnas (k, J). Vērtība = Students (k, J) Nākamais J Nākamais k Beigu apakšsadaļa
Tas darīs to, ka tas nokopēs datus no lapas “Studentu saraksts” un ielīmēs sadaļā “Kopēt lapu”.
Atceramās lietas
- Masīvs ir plašs jēdziens; šī ir tikai ievaddaļa.
- Lai saprastu masīva deklarāciju, jums ir nepieciešamas uzlabotas kodēšanas prasmes.
- Jo vairāk jūs savā kodā izmantojat masīvus, jo vairāk jūs pieradīsit.
