Šis piemērs māca, kā izvēlēties veselas rindas un kolonnas iekšā Excel VBA. Vai tu esi gatavs?
Ievietojiet komandas pogu savā darblapā un pievienojiet šādas koda rindiņas:
1. Sekojošā koda rindiņa atlasa visu lapu.
Šūnas. Izvēlieties
Piezīme: tā kā mēs ievietojām komandu pogu pirmajā darblapā, šī koda rinda atlasa visu pirmo lapu. Lai atlasītu šūnas citā darblapā, šī lapa vispirms jāaktivizē. Piemēram, tālāk norādītās koda rindas atlasa visu otro darblapu.
Darblapas (2). Aktivizēt
Darblapas (2). Šūnas. Atlasiet
2. Sekojošā koda rindiņa izvēlas otro kolonnu.
Kolonnas (2). Atlasiet
3. Sekojošā koda rinda izvēlas septīto rindu.
Rindas (7). Atlasiet
4. Lai atlasītu vairākas rindas, pievienojiet šādu koda rindiņu:
Rindas ("5: 7"). Atlasiet
5. Lai atlasītu vairākas kolonnas, pievienojiet šādu koda rindiņu:
Kolonnas ("B: E"). Atlasiet
6. Uzmanieties, lai nesajauktu rindu un kolonnu rekvizītus ar rindu un kolonnu rekvizītiem. Rekvizīti Rindas un kolonnas atgriež diapazona objektu. Rindas un kolonnas rekvizīti atgriež vienu vērtību.
Koda rinda:
MsgBox šūnas (5, 2). Rinda
Rezultāts:
7. Atlasiet šūnu D6. Šī koda rinda atlasa visu aktīvās šūnas rindu.
ActiveCell.EntireRow.Select
Piezīme: apmale tikai ilustrācijai.
8. Atlasiet šūnu D6. Sekojošā koda rindiņa ievada vērtību 2 kolonnas pirmajā šūnā, kurā ir aktīvā šūna.
ActiveCell.EntireColumn.Cells (1). Vērtība = 2
Piezīme: apmale tikai ilustrācijai.
9. Atlasiet šūnu D6. Šī koda rinda ievada vērtību 3 rindas pirmajā šūnā zem rindas, kurā ir aktīvā šūna.
ActiveCell.EntireRow.Offset (1, 0). Šūnas (1). Vērtība = 3
Piezīme: apmale tikai ilustrācijai.
