postavitev v zadnjo vrstico, ki je večja od nič
postavitev v zadnjo vrstico, ki je večja od nič
pozdravljeni,
kako bi se z makrom postavil v zadnjo vrstico stolpca A, ki ima vrednost večjo on 0.
Dodal bi še, da so v stolpu A formule.
Za odgovor se najlepše zahvaljujem.
lp
kako bi se z makrom postavil v zadnjo vrstico stolpca A, ki ima vrednost večjo on 0.
Dodal bi še, da so v stolpu A formule.
Za odgovor se najlepše zahvaljujem.
lp
Re: postavitev v zadnjo vrstico, ki je večja od nič
Pozdravljeni,
Problem bo rešila spodnja koda:
Problem bo rešila spodnja koda:
Koda: Izberi vse
Dim r As Long
r = Cells(60000, 1).End(xlUp).Row
While (r > 1) And (Cells(r, 1) <= 0)
r = r - 1
Wend
Cells(r, 1).Select
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: postavitev v zadnjo vrstico, ki je večja od nič
Hvala Matjaž ...
Re: postavitev v zadnjo vrstico, ki je večja od nič
Matjaž, če lahko mal nadaljujem, na tole kodo....
in sicer, najde mi zadnjo vrednost v celici, ki je večja od nič(kot sva rekla), nadalje bi želel,
da mi od tu dalje označi do stolpca "L" in
nato povsem do vrha(vedno), torej do prve vrstice. Mislim Matjaž, da ste razumeli, kaj želim.
Za odgovor se resnično zahvaljujem.
in sicer, najde mi zadnjo vrednost v celici, ki je večja od nič(kot sva rekla), nadalje bi želel,
da mi od tu dalje označi do stolpca "L" in
nato povsem do vrha(vedno), torej do prve vrstice. Mislim Matjaž, da ste razumeli, kaj želim.
Za odgovor se resnično zahvaljujem.
Re: postavitev v zadnjo vrstico, ki je večja od nič
Popraviti morate samo zadnjo vrstico, ki izbira celice in sicer na:
Koda: Izberi vse
Range(Cells(r, 1), Cells(1, 12)).Select
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: postavitev v zadnjo vrstico, ki je večja od nič
madonca, kako je enostavno......če znaš
še enkrat hvala Matjaž.
še enkrat hvala Matjaž.
Re: postavitev v zadnjo vrstico, ki je večja od nič
Pozdravljen Matjaž še enkrat ,
očitno se vrtim v začaranem krogu....rad bi za območje. ki mi ga vaš makro izbere,
nastavil področje tiskanja....pa niti tega ne uspem...z snemanjem mi ni uspelo,
pisati pa žal ne znam....kako torej določiti področje tiskanja za izbran obseg...
Iskrena hvala.
očitno se vrtim v začaranem krogu....rad bi za območje. ki mi ga vaš makro izbere,
nastavil področje tiskanja....pa niti tega ne uspem...z snemanjem mi ni uspelo,
pisati pa žal ne znam....kako torej določiti področje tiskanja za izbran obseg...
Iskrena hvala.
Re: postavitev v zadnjo vrstico, ki je večja od nič
V zadnjo vrstico zapišite:
Koda: Izberi vse
ActiveSheet.PageSetup.PrintArea = Selection.Address
lp,
Matjaž Prtenjak
Administrator
Matjaž Prtenjak
Administrator
Re: postavitev v zadnjo vrstico, ki je večja od nič
to je to....
najlepša hvala
najlepša hvala