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

Usklađivanje 2 makroa

[es] :: Office :: Excel :: Usklađivanje 2 makroa

[ Pregleda: 1489 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.



+2 Profil

icon Usklađivanje 2 makroa25.02.2018. u 15:08 - pre 74 meseci

Postoji makro koji nakon aktivacije izabranog radnog lista pokreće drugi makro.

Izvršenje drugog makroa je nemoguće zaustaviti verovatno zbog zadnje komande Sheets("IZVESTAJ ZA ODELJENSKO VECE").Select
Neophodno je da se izvršenje makroa DUGMEZAIZVESTAJ okonča na radnom listu IZVESTAJ ZA ODELJENSKO VECE.U prilogu su naredbe. Hvala .

Snić
Prikačeni fajlovi
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2267
89.216.49.*

Sajt: www.gowi.rs


+109 Profil

icon Re: Usklađivanje 2 makroa26.02.2018. u 08:07 - pre 74 meseci
Pokušaj u debug modu da vidiš gde i zašto program pada.
U kodu postavi breakpoint na prvu liniju makroa "DUGMEZAIZVESTAJ". Aktiviraj list "IZVESTAJ ZA ODELJENSKO VECE" da se pokrene makro i onda izvršavaj makro korak po korak (Shift+F8) i vidi šta će da se dešava

Ima uputstava o ovome na netu npr.Debug Excel VBA


Sam kod je dosta nesređen, verovatni si snimio makro pa posle nisi očistio od nepotrebnih delova. Npr. imaš Application.CutCopyMode = False ali pre toga nemaš kopiranje. Takođe kod snimanja makro ubacuje se Select komanda što najčešće nije potrebno.

Za dodatnu pomoć potrebno je da postaviš primer koji ti ne radi (nije neophodno da bude kompletna radna sveska sa svim elementima, ali bitni delovi). Ja sam napravio model da bi probao da je problem u Select na kraju kao što si naveo, ali nije.
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
Prikačeni fajlovi
 
Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.



+2 Profil

icon Re: Usklađivanje 2 makroa26.02.2018. u 10:59 - pre 74 meseci
Kod je snimljen i on radi kada se aktivira preko buttona bez problema.Debug mod se uopšte ne pojavljuje kao problem jer izvršenje makroa ide u nedogled. Izvršenje makroa je moguće zaustaviti samo preko upravljača zadacima. Meni je sumnjiva zadnja naredba zbog toga što u prvom makrou stoji naredba da se aktivacijom lista IZVEŠTAJ ZA VEĆE pokrene makro DUGME ZA IZVEŠTAJ u kome je zadnja naredba Select list IZVEŠTAJ ZA VEĆE. Selektovanjem ovog lista kreće njegova aktivacija i izvršenje naredbe iz prvog makroa. Evo i konkretnog primera. Hvala.
Snić
Prikačeni fajlovi
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2267
89.216.49.*

Sajt: www.gowi.rs


+109 Profil

icon Re: Usklađivanje 2 makroa26.02.2018. u 14:28 - pre 74 meseci
Citat:
Debug mod se uopšte ne pojavljuje kao problem jer izvršenje makroa ide u nedogled.

Nisam razumeo šta si hteo da kažeš. Debug mode se i koristi da se vidi zašto se makro izvršava u nedogled.
Uglavnom, kad sam uradio kao što je već napisano i startovao rutinu u debug modu video sam da se na
Code:
Sheets("IZVESTAJ ZA ODELJENSKO VECE").Select

Opet pokreće procedura Workbook_SheetActivate(ByVal Sh As Object) i opet pokreće makro DUGMEZAIZVEŠTAJ i tako u nedogled.

Ja ostajem pri tome da ovaj makro zahteva dosta prepravki, jer ga je teško pratiti i održavati u ovom obliku, ali ako tebi odgovara probaj da na počektu rutine
DUGMEZAIZVEŠTAJ staviš
Code:
 Application.EnableEvents = False

Na taj način sprečićeš da se unutar makroa okida događaj Workbook_SheetActivate pa bi trebalo da sve bude ok.
Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.



+2 Profil

icon Re: Usklađivanje 2 makroa26.02.2018. u 18:04 - pre 74 meseci
Ovo radi ali dozvoljava samo jednom izvršenje svih naredbi iz koda. Ako nakon toga promenimo brojke u listu UPIS pa opet kliknemo na list IZVEŠTAJ ZA ODELJENSKO VEĆE podaci u IZVEŠTAJU ... neće biti sortirani. Sortiraće nove podatke tek po naknadnom otvaranju dokumenta.U suštini problem je rešen. Hvala.
Snić
 
Odgovor na temu

Jpeca
Predrag Jovanović
poslovni analitičar
Gowi
Pančevo

Moderator
Član broj: 25683
Poruke: 2267
89.216.49.*

Sajt: www.gowi.rs


+109 Profil

icon Re: Usklađivanje 2 makroa27.02.2018. u 09:07 - pre 74 meseci
Nisam napisao ali na kraju makroa vrati na staro (iza poslednjeg Select):
..
Code:
 
 Sheets("IZVESTAJ ZA ODELJENSKO VECE").Select
   'Vracanje na staro
   Application.EnableEvents = True
End Sub



Nije to loše Rembrante, samo što ne bi dodao još malo boje?
 
Odgovor na temu

Siki 5

Član broj: 240086
Poruke: 116
*.dynamic.sbb.rs.



+2 Profil

icon Re: Usklađivanje 2 makroa27.02.2018. u 10:29 - pre 74 meseci
Sada je sve kako treba. Hvala ...
Snić
 
Odgovor na temu

[es] :: Office :: Excel :: Usklađivanje 2 makroa

[ Pregleda: 1489 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

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