Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red

[es] :: Office :: Excel :: pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red

[ Pregleda: 2658 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

kUjKoJa
Nish

Član broj: 45095
Poruke: 67
93.86.55.*



+1 Profil

icon pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red08.07.2008. u 21:47 - pre 192 meseci
Pozdrav dobri ljudi...

Imam jedan problem, i ne znam kako da ga rešim
Naime, imam jednu tabelu sa dnevnim izveštajem koji radim svakog dana.
Hteo bih sada da napravim makro, koji bi klikom na dugme, rezulate tog izveštaja (konkretno 4 ćelije, recimo e1, e2, e3, e4) iskopirao u novi sheet, ali u tabelu tako da uvek novi rezultat iskopira u novi red.

Tako bi hronološki čuvao podatke svakodnevnog izveštaj, pa bi lakše mogao da radim rekapitulacije na mesečnom nivou.

Dajte mi primer u VBA za jednu ćeliju, pa ću se ja valjda snaći nakon toga...

Znači:
danas da kopira polje e1 iz sheeta1 u sheet2 a1.
sutra da kopira polje e1 iz sheeta1 u sheet2 a2.
preksutra da kpira polje e1 iz sheeta1 u sheet2 a3.
Znači uvek u naredni slobodni red..

Nadam se da sam dobro objasnio...

Hvala unapred.
 
Odgovor na temu

timmy
Jovan Timotijevic

Moderator
Član broj: 37087
Poruke: 634

Sajt: www.e-tim.net


+89 Profil

icon Re: pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red09.07.2008. u 00:02 - pre 192 meseci
Probaj sa sledecim kodom:

Code:

Public Sub KopirajE1()
    Sheets("Sheet2").Activate
    Range("A1").Select
    Do While ActiveCell.Value <> ""
        ActiveCell.Offset(1, 0).Range("A1").Select
    Loop
    ActiveCell.Value = Range("Sheet1!e1").Value
End Sub


Inace umesto Do...Loop krace bi bilo

Code:

    Range("A1").End(xldown).Select


ali samo ako barem necega ima u A1 i A2

Pozdrav
 
Odgovor na temu

Ivek33

Član broj: 66174
Poruke: 2898



+66 Profil

icon Re: pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red09.07.2008. u 07:22 - pre 192 meseci
Citat:
kUjKoJa: Dajte mi primer u VBA za jednu ćeliju, pa ću se ja valjda snaći nakon toga...
pogledaj i ovu temu http://www.elitesecurity.org/t328307
 
Odgovor na temu

[es] :: Office :: Excel :: pomoć, prebacivanje rezultata u novu tabelu, uvek u novi red

[ Pregleda: 2658 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.