Full path in title bar?

Full path in title bar? 25.05.2010. u 14:55 · pre 200 meseci #1

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!

Potpis

28

Re: Full path in title bar? 26.05.2010. u 14:28 · pre 200 meseci #2

u VBA editoru unesi ovaj kod

ActiveWindow.Caption = ActiveWorkbook.FullName

Potpis

[email protected]=

Re: Full path in title bar? 26.05.2010. u 22:39 · pre 200 meseci #3

Hvala!Probaću
Ako uspe imaš piće ;)

Potpis

28

Re: Full path in title bar? 27.05.2010. u 01:57 · pre 200 meseci #4

Citat:

dullence: da mi svaki put kada otvorim bilo koji fajl (excel 2003) prikazuje full path u tiile bar-u?

Ima nekoliko načina
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

Re: Full path in title bar? 28.05.2010. u 11:51 · pre 200 meseci #5

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

Re: Full path in title bar? 16.06.2010. u 14:41 · pre 199 meseci #6

Izvinjavam se, ali tek sam danas stigao da probam ovo i uspeo sam.
HVALA PUNO!!!
:)

Potpis

28

Forum kao aplikacija na telefonu

Srodne teme