PC-HELP.CZ

Dobrý den,

chci se zeptat, jestli se dají vybrat data od prázdného řádku k prázdnému řádku. Dokážu vybrat data takto Range("A1:C10").Select. Ale to se nedá opakovat, protože je různý počet hodnot. Potřeboval bych vybrat data od A2 do C11 a potom od A13 do C30, s tím aby to bylo proměnné, protože další tabulka má zase jiný počet hodnot.

Obrázek

Oblast mužeš vybrat ručně myší přes InputBox.
Využít CurrentRegion.
Nebo hledat poslední obsazený řádek přes ....End(xlDown).Row

Kód: Vybrat vše

Sub VyberPostupneOblasti()
Dim RNG As Range
    On Error Resume Next
    For Each RNG In Range("A:A").SpecialCells(xlConstants).Areas
        RNG.Resize(, 3).Select
        MsgBox "Vybraná oblasť " & RNG.Address
        '... niečo, čo sa má diať s oblasťou
        'Výber oblasti je možný aj pomocou indexu .Areas(1), .Areas(2, ...)
    Next RNG
End Sub

PC-HELP.CZ

Excel VBA - Výběr dat

Excel VBA - Výběr dat

Re: Excel VBA - Výběr dat

Re: Excel VBA - Výběr dat