GetFolder

GetFolder to właściwość obiektu Scripting.FileSystemObject informująca o napędzie (czyli dysku) dla danego pliku.
Przykładowa funkcja zwracająca tę wartość może wyglądać tak:

Public Function MyKatalog()
Dim FSO As Object
Set FSO=CreateObject(„Scripting.FileSystemObject”)
MyKatalog= FSO.GetFolder(ThisWorkbook.Path)
Set FSO = Nothing
End Function

 

 

 

 

 

 

Po wstawieniu funkcji do komórki arkusza w Excelu – otrzymamy nazwę folderu, na którym zapisany jest ten skoroszyt.

GetFolder

 


http://helion.pl/plugins/new/random-katalog.cgi?k=3,34&a=9&nr=4737c http://helion.pl/plugins/new/random-katalog.cgi?k=3,34&a=10&nr=4737c http://helion.pl/plugins/new/random-katalog.cgi?k=3,34&a=11&nr=4737c http://helion.pl/plugins/new/random-katalog.cgi?k=3,34&a=12&nr=4737c

 

Kurs Excel programowanie w VBA Kurs Access - programowanie w VBA

 

Excel 2016 i programowanie VBA



Skomentuj

Wprowadź swoje dane lub kliknij jedną z tych ikon, aby się zalogować:

Logo WordPress.com

Komentujesz korzystając z konta WordPress.com. Wyloguj /  Zmień )

Zdjęcie na Google

Komentujesz korzystając z konta Google. Wyloguj /  Zmień )

Zdjęcie z Twittera

Komentujesz korzystając z konta Twitter. Wyloguj /  Zmień )

Zdjęcie na Facebooku

Komentujesz korzystając z konta Facebook. Wyloguj /  Zmień )

Połączenie z %s