Šī apmācība iemācīs jums notīrīt masīvu VBA.
Notīrīt visu masīvu
Lai notīrītu visu masīvu, varat izmantot Izdzēst paziņojumu:
| 1 | Dzēst arrPiemērs |
Praksē:
| 123456789101112131415 | Sub ClearArray ()"Izveidojiet statisko masīvuDim arrExample (1 līdz 3) kā virkne'Definējiet masīva vērtībasarrExample (1) = "Šellija"arrExample (2) = "Stīvs"arrExample (3) = "Neema"'Dzēst visu masīvuDzēst arrPiemērs'Pārbaudiet masīva vērtībuMsgBox arrPiemērs (1)Beigu apakš |
Mainiet un notīriet masīvu
Ja jūsu masīvs ir dinamisks (dinamiskais masīvs ir masīvs, kura izmēru var mainīt, nevis statiskajam masīvam, kuru nevar mainīt), varat izmantot ReDim komanda lai mainītu masīva izmērus, notīrot visu vērtību masīvu.
| 12 | 'Dzēst visu masīvuReDim arrExample (no 1 līdz 4) |
Pilns piemērs:
| 12345678910111213141516 | Sub ClearArray2 ()'Izveidot dinamisku masīvuDim arrExample () kā virkneReDim arrExample (no 1 līdz 3)'Definējiet masīva vērtībasarrExample (1) = "Šellija"arrExample (2) = "Stīvs"arrExample (3) = "Neema"'Dzēst visu masīvuReDim arrExample (no 1 līdz 4)'Pārbaudiet masīva vērtībuMsgBox arrPiemērs (1)Beigu apakš |
Notīrīt masīva daļu
Kā minēts iepriekš, ReDim komanda mainīs masīva izmērus, notīrot visas masīva vērtības. Tā vietā jūs varat izmantot ReDim Preserve lai mainītu masīva izmērus, saglabājot visas esošās vērtības. Praksē to var izmantot, lai ātri notīrītu masīva daļu.
| 12 | “Dzēst pozīciju 3+ReDim Preserve arrExample (1 līdz 2) |
Pilns piemērs:
| 12345678910111213141516171819 | Sub ClearArray3 ()'Izveidot dinamisku masīvuDim arrExample () kā virkneReDim arrExample (no 1 līdz 3)'Definējiet masīva vērtībasarrExample (1) = "Šellija"arrExample (2) = "Stīvs"arrExample (3) = "Neema"“Dzēst pozīciju 3+ReDim Preserve arrExample (1 līdz 2)'Mainīt lielumu uz 3 pozīcijāmReDim Preserve arrExample (no 1 līdz 3)'Pārbaudiet masīva vērtībuMsgBox arrPiemērs (3)Beigu apakš |
Apkārt visu masīvu - vērtību atiestatīšana
Tā vietā, lai notīrītu masīva vērtības, izmantojot Erase vai ReDim, jūs varētu pārvietoties pa visu masīvu, atiestatot katru vērtību.
** saite uz cilpu **
