[es] - pomoć sa macroom i još nešto

snenad_82
Nenad Stevanovic
Niš

Član broj: 126686
Poruke: 74
*.ninet.rs.

Profil

^{01.08.2012. u 12:29 - pre 142 meseci}

Potrebna mi je pomoć oko macroa. Napravio sam formu u sheetu1 koju treba popunjavati. Sada želim da svaki put kada neko popuni formu kombinacijom tastera je sačuva u sheet2. To je sve ok. Idem na record macro snimim šta mi treba međutim ne znam kako da editujem macro da mi svaki sledeći put snimi formu ispod postojeće (one koje je prethodni put snimio). Znači treba mi red(ovi) koda koji će da pomeri paste za određeni broj redova npr 55. Ili ako neko zna neko elegantnije rešenje bio bih mu vrlo zahvalan.
Takođe da li neko zna kako da funkciju =WEEKDAY() nateram da piše ćirilicu?

Prikačeni fajlovi

građevinski dnevnik.xlsx - 74.21k

Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 850

Sajt: https://www.zile028.com

+49 Profil

Re: pomoć sa macroom i još nešto

^{01.08.2012. u 12:33 - pre 142 meseci}

Okaci to sto si radio, bice lakse onome ko pokusa da ti pomogne u resavanju problema.

[email protected]=

Odgovor na temu

3okc
Χoᴘᴦoѡ

Moderator
Član broj: 811
Poruke: 1319

Jabber: 3okc@elitesecurity.org

+116 Profil

Re: pomoć sa macroom i još nešto

^{01.08.2012. u 12:43 - pre 142 meseci}

Ako otvoriš Immediate prozor i otkucaš ?[a65536].end(xlup).offset(1).address dobićeš adresu prve slobodne ćelije u koloni A.

Dakle, odredi sebi referentnu kolonu pa prilagodi gornju komandu da ti izračuna slobodnu ćeliju od koje će se upisivati.

Što se tiče f-je WEEKDAY(), ona ispisuje redne brojeve dana u nedelji.

Have you found helpful examples, solutions or ideas-in-work, please consider the
following:
• Citation of *actual page* you are going to using is welcome.
• Have you saw "Value Added" examples you are going to incorporate to your
profitable blog, daily job or any money making venture: How about online donation?
↗Ana & Vlade Divac Foundation
Hvala!

Odgovor na temu

snenad_82
Nenad Stevanovic
Niš

Član broj: 126686
Poruke: 74
*.ninet.rs.

Profil

Re: pomoć sa macroom i još nešto

^{01.08.2012. u 14:56 - pre 142 meseci}

evo fajla

građevinski dnevnik

Odgovor na temu

snenad_82
Nenad Stevanovic
Niš

Član broj: 126686
Poruke: 74
*.ninet.rs.

Profil

Re: pomoć sa macroom i još nešto

^{06.08.2012. u 08:05 - pre 142 meseci}

Dobijam Run time error 9 Subscript out of range šta trebam da promenim?

Code:
'
' Macro1 Macro
'
' Keyboard Shortcut: Ctrl+w
'
    Range("C2:AA53").Select
    Selection.Copy
    Sheets("Sacuvano").Select
    Range("A1").Select
    Range("A65536").End(xlUp).Offset(1, 0).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Gradevinski dnevnik").Select
    ActiveWindow.SmallScroll Down:=-18
    Range( _
        "E3:L3,E4:L4,F8,F10,F12,H8,H10,H12,M8:P13,Z4,U8,U10,U12,W8,W10,W12,Y8:AA9,Y10:AA10,Y12:AA12,C16:S17,C19:S20,C22:D50,S22:S50,E44:Q50" _
        ).Select
    Range("E44").Activate
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = ""
    Range("C22").Select
    ActiveCell.FormulaR1C1 = ""
    Range("D22").Select
    ActiveCell.FormulaR1C1 = ""
    Range("F8").Select
    ActiveCell.FormulaR1C1 = ""
    Range("H8").Select
    ActiveCell.FormulaR1C1 = ""
    Range("U8").Select
    ActiveCell.FormulaR1C1 = ""
    Range("Y8:AA9").Select
    ActiveCell.FormulaR1C1 = ""
    Range("C16:E16").Select
    ActiveCell.FormulaR1C1 = ""
    Range("C22").Select
End Sub

Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 850

Sajt: https://www.zile028.com

+49 Profil

Re: pomoć sa macroom i još nešto

^{06.08.2012. u 09:01 - pre 142 meseci}

To je obicno greska o nepostojanju odredjenog Sheet-a, u tvom slucaju je to verovatno Sheet pod nazivom Sacuvano, a takodje proveri da li ti se poklapa naziv Sheet-a Gradjevinski dnevnik sa nazivom tog Sheet-a u kodu.

Na ovom linku imas nesto o proveri postojanja odredjenog Sheet-a, ovo bi ti bilo korisno za u buduce da ne dolazi to takvih gresaka.
http://www.ozgrid.com/forum/showthread.php?t=58548

[email protected]=

Odgovor na temu

snenad_82
Nenad Stevanovic
Niš

Član broj: 126686
Poruke: 74
*.ninet.rs.

Profil

Re: pomoć sa macroom i još nešto

^{06.08.2012. u 12:54 - pre 142 meseci}

hvala
u pravu si nije prepoznao đ iz naziva sheeta kad sam prepravio na dj i na jednom i drugom mestu sve funkcioniše

Odgovor na temu