3. diel - Riadky a stĺpce vo VBA

V predchádzajúcom cvičení, Riešené úlohy k lekcii 1-2 MS Office - VBA pre Excel, sme si precvičili získané skúsenosti z predchádzajúcich lekcií.

Dnešné lekciu začneme vysvetlením použitie vlastnosti Range.Range.

Použitie ďalšie vlastnosti Range na oblasť Range posunie adresovanie vnútornej oblasti Range do ľavého horného rohu vyššieho Range. V prípade, že je adresa posunutá mimo oblasti vyššieho Range, je použitá oblasť / bunka z celého listu, posunutá o ľavý horný roh nadriadeného Range.

Dim vRng As Excel.Range
    Set vRng = Range("B3:B6")
    Debug.Print vRng.Range("A1").Address      'vypíše $B$3, tedy levý horní roh vRng
    vRng.Range("A1").Select

'příklad adresování mimo oblast prvního Range
    Set vRng = Range("D7:K26")
    Debug.Print vRng.Range("A1").Address      'vypíše $D$7, tedy levý horní roh vRng
'pokud je adresa v podřízeném Range mimo rozsah vyššího objektu Range, je platná a posunutá
    Debug.Print vRng.Range("S1").Address      'vypíše $V$7=buňku z listu posunutou o vRng, tedy D7
    vRng.Range("S1").Select

Príklad s použitím klauzuly With:

With Worksheets(1).Range("C3:D5")
   .Range("A1").Value = "test"                        'zapíše test jako hodnotu do buňky C3
   .Range("A1").Select
End With

Zmena veľkosti Range

Vlastnosť Resize mení

...koniec náhľadu článku...
Pokračuj ďalej