[ dullence @ 25.05.2010. 13:55 ] @
Pozdrav svima. Da li neko možda zna kako da napravim da mi svaki put kada otvorim bilo koji fajl (excel 2003) prikazuje full path u tiile bar-u? Skontao sam da moraju makro-i ali nisam uspeo :( Hvala unapred! |
[ dullence @ 25.05.2010. 13:55 ] @
[ FOX028 @ 26.05.2010. 13:28 ] @
u VBA editoru unesi ovaj kod
ActiveWindow.Caption = ActiveWorkbook.FullName [ dullence @ 26.05.2010. 21:39 ] @
Hvala!Probaću
Ako uspe imaš piće ;) [ Ivek33 @ 27.05.2010. 00:57 ] @
Citat: dullence: da mi svaki put kada otvorim bilo koji fajl (excel 2003) prikazuje full path u tiile bar-u? Snimi ovaj kod ispod u Personal.xls (Personal.xlsb) i prilikom svakog otvaranja već postojeće datoteke prikazat će ti path stazu u title baru (u ThisWorkbook) btw: pogledaj link ako ti je nejasno Putanja do otvorene datoteke Excela u naslovu Code: Public WithEvents xlApp As Excel.Application Private Sub Workbook_Open() Set xlApp = Application End Sub Private Sub workbook_close() Set myTitle.xlApp = Nothing End Sub Private Sub xlApp_WindowActivate(ByVal Wb As Workbook, ByVal Wn As Window) Wn.Caption = Wb.FullName End Sub [ Ivek33 @ 28.05.2010. 10:51 ] @
Citat: FOX028: ActiveWindow.Caption = ActiveWorkbook.FullName Potpuni izgled koda je ovakav i postavlja se u Personal.xls workbook: Code: Sub ChangeCaption() ActiveWindow.Caption = ActiveWorkbook.FullName End Sub S obzirom da je Personal.xls datoteka koja čuva osobne postavke korisničkih funkcija i makronaredbi opće namjene koje nam trebaju biti dostupne kada ih zatrebamo ovaj kod se postavlja u Module1 dotične Personal.xls datoteke Prilikom otvaranja već snimljene *.xls datoteke u naslovnoj traci (title bar) imamo samo naziv datoteke. U momentu kada želimo saznati (vidjeti) full path stazu do otvorene datoteke, pritisnemo ALT+F8 i pokrenemo makronaredbu "PERSONAL.XLS!ChangeCaption", tada će nam se u title baru prikazati full path. Dakle koristimo je po potrebi prikazivanja full path. Ako otvorenu datoteku sa prikazanom putanjom snimimo pod drugim nazivmo (SaveAs) na drugo mjesto, neće nam se prikazati nova putanja do datoteke sve dok ne pokrenemo ponovno makronaredbu. - za ova istraživanja (za one koji ne znaju) izradio sam Tutorijal na temu Kako kreirati PERSONAL.XLS [ dullence @ 16.06.2010. 13:41 ] @
Izvinjavam se, ali tek sam danas stigao da probam ovo i uspeo sam.
HVALA PUNO!!! :) Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.
|