Cells(Rows.Count, "A").End(xlUp).Row ' Ve sloupci A
pokud tedy nemáš někde v tom sloupci prázdné buňky toto začne od konce listu směrem nahoru hledat první obsazenou buňku (pokud se tedy nepletu).citovat
Zaslal/a Raders486 9.5.2017 15:11
Ahoj.
Potřeboval bych pomoci dosadit do cyklu níže uvedené.
Začátek cyklu Range("S2") / konec cyklu poslední obsazená buňka ve sloupci "S"
If DateValue(ActiveCell) < DateValue(Range("A1")) Then
Call Dluh
Else
If DateValue(ActiveCell) >= DateValue(Range("A1"))
Then
Call BudeDluh
Poradí někdo prosím?
Děkuji
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.