See näide illustreerib vahemiku objekti atribuuti aastal Exceli VBA. Kasutame seda omadust vahemiku valimiseks aktiivsest lahtrist kuni viimase kirjeni veerus.
Olukord:
Mõned veerus A olevad müüginäitajad. Oletame, et lisate aja jooksul rohkem müüginumbreid.
Asetage oma töölehele käsunupp ja lisage järgmised koodiridad:
1. Veeru viimase kirje valimiseks lisage lihtsalt järgmine koodirida:
Vahemik ("A5"). Lõpp (xlDown). Valige
Märkus: vahemiku ("A5") asemel saate kasutada ka vahemikku ("A1"), vahemikku ("A2") jne. See koodirida on samaväärne END+ALLA -noole vajutamisega.
Tulemus, kui klõpsate lehel käsunuppu:
2. Vahemiku lahtrist A5 kuni veeru viimase kirjeni valimiseks lisage järgmine koodirida:
Vahemik (vahemik ("A5"), vahemik ("A5"). Lõpp (xlDown)). Valige
Tulemus, kui klõpsate lehel käsunuppu:
3. Vahemiku valimiseks aktiivsest lahtrist kuni veeru viimase kirjeni asendage lihtsalt vahemik ("A5") ActiveCelliga.
Vahemik (ActiveCell, ActiveCell.End (xlDown)). Valige
Tulemus, kui valite lahtri A2 ja klõpsate lehel käsunuppu:
Märkus. Teistes suundades liikumiseks saate kasutada konstante xlUp, xlToRight ja xlToLeft. Nii saate valida vahemiku aktiivsest lahtrist kuni rea viimase kirjeni.