< návrat zpět

MS Excel


Téma: Pomoc s projektem Vba - různé rss

Zaslal/a 4.4.2013 12:52

Zdravím. Mohl by mi pomoci někdo s vychytáním několika věcí na mém projektu ?

První z nich:
V dokumentu prohledávám údaje v rozmezí dat. Např. iod 1.1.2013 do 30.3.2013. Používám

'prvni zaznam
i = 2
Do While .Cells(i, 4) < StartDate
i = i + 1
Loop
StartRow = i

'poslední zaznam (do data)
Do While .Cells(i, 4) < EndDate
i = i + 1
Loop
EndRow = i


Vše šlape dobře, ale pouze v případě, že dotyčný zadá enddate, který opravdu v tabulce je. Pokud v tomto případě není poslední datum 30.3.2013, makro hází chybu. Poradil by někdo, jak to vychytat ?
Díky moc

stop Uzamčeno - nelze přidávat nové příspěvky.

#012695
avatar
jsou li data seřazena vzestupně, tak třeba'poslední zaznam (do data)
Do While .Cells(i, 4) <> "" and .Cells(i, 4) =< EndDate
EndRow = i
i = i + 1
Loop

jen teoreticky :-)

M@citovat
#012696
avatar
šlape jak má. Super.citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

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.

On-line nástroje