Innholdsfortegnelse
Denne korte opplæringen vil demonstrere hvordan du bruker GetFileName -metoden til FileSystemObject.
Få filnavn med VBA FileSystemObject
Denne leksjonen bruker FileSystemObject. For å bruke det, må du angi en referanse til VB-skriptets kjøretidsbibliotek. Se her for mer informasjon.
For å få filnavnet fra en hvilken som helst bane, kan du bruke:
123456789101112 | Sub FSOGetFileName ()Dim filnavn som strengDim FSO som nytt filsystemobjektSett FSO = CreateObject ("Scripting.FileSystemObject")'Få filnavnFilnavn = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Få filnavn ingen utvidelseFileNameWOExt = Venstre (Filnavn, InStr (Filnavn, ".") - 1)Slutt Sub |
Filnavnvariabelen vil da inneholde verdien av "Eksempelfil.txt", FilnavnWOExt -variabel vil være uten utvidelsen "Eksempelfil".
Få filnavn uten utvidelse
Som nevnt ovenfor, bruker du denne kodelinjen for å få filnavnet uten utvidelse:
1 | FileNameWOExt = Venstre (Filnavn, InStr (Filnavn, ".") - 1) |