Citat:
FOX028: ActiveWindow.Caption = ActiveWorkbook.FullName
Ovaj kod ne daje konstantnu mogućnost prikazivanja full path staze. No kad je već spomenut u temi, evo malo pojašnjenje za buduće čitaoce teme.
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