Moje doświadczenia z Excelem, Accesem i programowaniem w VBA
Blog > Komentarze do wpisu

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

 


 

Kurs Excel programowanie w VBA Kurs Access - programowanie w VBA

 

Excel 2016 i programowanie VBA



czwartek, 14 czerwca 2018, marzatela













Polecane wpisy

TrackBack
TrackBack URL wpisu:
Komentarze
Gość: czeles, 195.93.222.*
2018/08/09 14:23:23
Funkcja nazywa się Katalog() a nie MyKatalog().
-
2018/08/09 15:26:41
@Czeles
Masz rację, moja pomyłka. Poprawiłam.
Dzięki.


Książki warte polecenia
zobacz szczegóły...


A tu oferta na dziś:

Wydawnictwo Strefa Kursów



ministat liczniki.org



Napisz do mnie!