iCentar » Forum » Racunari i oprema » Softver i operativni sistemi » Ms office

iCentar → Racunari i oprema → Softver i operativni sistemi → Ms office

Pretrazi
Tim
Registriraj se
Vazni alati
Razno. veze
- Oznaci forume kao procitane
- Smjernice
Aktivne teme ...
- u posljednja 24 sata
- od moje posljednje posjete
Vijesti (RSS, ...)
- RSS 2.0
- RSS 1.0
- OPML
- Klipfolio
- Atom 1.0
Prijavi se

Opcije teme

Stranice (1):1

Prikazi prvu neprocitanu poruku

09.06.2019 13:21

Getsbi

Moderator

Registrovan od:04.02.2009
Postovi:128

Predmet:Power point i VBA kôd

Kako u Power point putem VBA kôda napraviti da kartice na slajdu, na događaj On Click, menjaju stanje Bring to Front u Send to Back i obrnuto.

Prilozi:

kartice na slajdu.rar
Preuzimanja:301
Velicina datoteke:23.71 KB

http://mzahorjanski.wix.com/mzahorjanski#

13.06.2019 22:54

zxz

Administrator

Registrovan od:03.02.2009
Postovi:10,642

Predmet:Re: Power point i VBA kôd

Dim ss As ShapeRange
'ActiveWindow.Selection.SlideRange.Shapes("Freeform 20").Select
Set ss = ActiveWindow.Selection.ShapeRange
ss.ZOrder msoBringToFront

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.

16.06.2019 15:14

Getsbi

Moderator

Registrovan od:04.02.2009
Postovi:128

Predmet:Re: Power point i VBA kôd

Javlja gređku pri kompajliranju na liniji Set ss...

PS. u prilogu je slika.

Slicice prilozenih slika:

Greška.JPG
Tip datoteke: Informacije o tipu datoteke za:jpg

jpg
Preuzimanja:292
Velicina datoteke:34.19 KB
Velicina slike: 693 x 342 Pikseli

http://mzahorjanski.wix.com/mzahorjanski#

Ovaj post je ureden 1 puta. Posljednja izmjena 16.06.2019 15:18 od strane Getsbi.

17.06.2019 08:07

zxz

Administrator

Registrovan od:03.02.2009
Postovi:10,642

Predmet:Re: Power point i VBA kôd

pise Selection.
Ukoliko nije selektovan onda ce javiti gresku a to je pri ulazu.
Poslije mozes staviti on error resume nex

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.

17.06.2019 10:43

Getsbi

Moderator

Registrovan od:04.02.2009
Postovi:128

Predmet:Re: Power point i VBA kôd

Ma nije greška pri izvršenju jer ni ne dođe do toga, već neće da iskompajlira programski kôd. Buni se na
reč „Set”. Ako otkočim drugi red, onaj iznad njega, kompajliranje se zaustavi na reč „Freeform 20”. Izgleda kao da nešto nedostaje.
Na početku posta imaš zakačen fajl. Probaj u njemu.

http://mzahorjanski.wix.com/mzahorjanski#

Ovaj post je ureden 2 puta. Posljednja izmjena 17.06.2019 11:55 od strane Getsbi.

18.06.2019 22:42

zxz

Administrator

Registrovan od:03.02.2009
Postovi:10,642

Predmet:Re: Power point i VBA kôd

evo ti na tvom primjeru.

Prilozi:

kartice na slajduzxz.zip
Preuzimanja:287
Velicina datoteke:32.78 KB

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.

19.06.2019 06:03

Getsbi

Moderator

Registrovan od:04.02.2009
Postovi:128

Predmet:Re: Power point i VBA kôd

Hvala. Sad je VBA kôd moguće iskompajlirati ali kod mene ne radi korektno. Trebalo bi da u SlideShow režimu može da se premešta sa kartice na karticu.

U međuvremenu sam na jednom drugom forumu dobio rešenje koje kod mene radi.
Sub toFront(oshp As Shape)
oshp.ZOrder (msoBringToFront)
End Sub

Još jednom zahvaljujem na trudu.

Prilozi:

Kartice na slajdu,ge.rar
Preuzimanja:289
Velicina datoteke:27.48 KB

http://mzahorjanski.wix.com/mzahorjanski#

Stranice (1):1