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ž

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 1.5
Level 1.5
Příspěvky: 102
Registrován: září 17
Pohlaví: Muž

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: 271
Registrován: červen 13
Pohlaví: Muž

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
  • spoluvytváření excel
    od chytilji » 14 črc 2020 07:33 » v Kancelářské balíky
    0
    221
    od chytilji
    14 črc 2020 07:33
  • excel tlačítko
    od pajdaj » 09 dub 2020 14:05 » v Kancelářské balíky
    2
    434
    od elninoslov
    10 dub 2020 02:54
  • Excel - vzoreček
    od SmejkalM » 18 bře 2020 07:33 » v Vše ostatní (sw)
    6
    998
    od elninoslov
    20 bře 2020 13:18
  • makro excel
    od pajdaj » 08 dub 2020 09:09 » v Kancelářské balíky
    4
    589
    od pajdaj
    09 dub 2020 07:24
  • Excel - zamčené listy
    od Persil » 11 bře 2020 11:14 » v Kancelářské balíky
    1
    763
    od atari
    11 bře 2020 11:35

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

Kdo je online

Uživatelé prohlížející si toto fórum: CommonCrawl [Bot] a 5 hostů