MS Excel

Téma: VBA pro roztažení vzorce

Zaslal/a junis 11.10.2025 9:53

Zdravím, potřebuji pomocí VBA roztáhnout vzorec pod sebe do všech vyplněných řádků.
Vložení je jasné, ale potřebuji stáhnout vzorec dolů a nevím, kolik je celkem vyplněných řádků v listu.
Moc děkuji

Příloha: zip

57550_sesit1.zip (13kB, staženo 4x)

Zaslat odpověď >

Lugr(11.10.2025 15:31)#057554

Sub Vzorec()

'Vlož vrozec do O4 a roztáhni do všech vyplněných řádků

Dim POCET As Long
Dim wsDATA As Worksheet
Set wsDATA = Worksheets("Inventura")

POCET = wsDATA.Cells(Rows.Count, "A").End(xlUp).Row - 3
wsDATA.Range("O4").Resize(POCET).Formula = "=IFERROR(VLOOKUP(RC[-5],POLEDAT!R4C3:R100003C4,2,FALSE),"""")"

End Subcitovat

junis(11.10.2025 17:56)#057555

Lugr Děkuju. SUPRcitovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio