Excel VBA - Výběr dat

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Piskotak
nováček
Příspěvky: 1
Registrován: listopad 19
Pohlaví: Muž
Stav:
Offline

Excel VBA - Výběr dat

Příspěvekod Piskotak » 28 lis 2019 15:17

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

Reklama
Uživatelský avatar
Grimm
Level 2
Level 2
Příspěvky: 162
Registrován: září 17
Pohlaví: Muž
Stav:
Offline

Re: Excel VBA - Výběr dat

Příspěvekod Grimm » 28 lis 2019 18:55

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

Uživatelský avatar
elninoslov
Level 2.5
Level 2.5
Příspěvky: 366
Registrován: červen 13
Pohlaví: Muž
Stav:
Offline

Re: Excel VBA - Výběr dat

Příspěvekod elninoslov » 29 lis 2019 07:00

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


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Excel a OneDrive
    od sginfo » 11 zář 2023 15:28 » v Kancelářské balíky
    16
    5985
    od mirekol Zobrazit poslední příspěvek
    20 říj 2023 08:31
  • Excel - vlastní formát Příloha(y)
    od Story-Long » 11 srp 2023 14:50 » v Kancelářské balíky
    3
    1837
    od Story-Long Zobrazit poslední příspěvek
    14 srp 2023 10:11
  • Excel - funkce když
    od Martyn20 » 13 črc 2023 11:56 » v Kancelářské balíky
    5
    2317
    od mmmartin Zobrazit poslední příspěvek
    13 črc 2023 18:44
  • Excel - problém se vzorci
    od honzzicek » 28 čer 2023 21:45 » v Kancelářské balíky
    2
    1633
    od honzzicek Zobrazit poslední příspěvek
    01 črc 2023 08:57
  • excel-posun makra
    od actionboy » 12 bře 2024 18:59 » v Kancelářské balíky
    1
    260
    od Grimm Zobrazit poslední příspěvek
    12 bře 2024 21:43

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 5 hostů