I Microsoft Excel kan vi sjekke om filen finnes på et bestemt sted ved hjelp av VBA -kode. Makroen vil vise statusen i form av meldingsboks. I denne artikkelen vil vi identifisere, om statusen til en bestemt fil eksisterer eller ikke, ved hjelp av VBA -kode. Vi kan bruke Dir -funksjonen til å sjekke om filen finnes på plassering ved hjelp av Excel VBA.
Ved å bruke dette programmet kan vi sjekke om det finnes en fil som allerede finnes på samme sted. Så vi kan slette eller gi nytt navn til den gamle filen.
Spørsmål: Når vi lager makro for å automatisere oppgaven, lagrer vi vanligvis utdatafilen på et sted. Jeg vil gjerne ha en makro for å bekrefte og til gjengjeld vise at filen er tilgjengelig eller ikke på den spesifikke banen.
For å illustrere dette eksemplet lagrer vi “Sample.xlsx” -filen i banen “D: \ FolderName \ Sample.xlsx”
For å identifisere om arbeidsboken eksisterer, må vi følge trinnene nedenfor for å starte VB -editor:
- Klikk på kategorien Utvikler
- Velg Visual Basic fra kodegruppen
- Klikk på Sett inn og deretter modul
- Dette vil opprette en ny modul
- Skriv inn følgende kode i standardmodulen
Sub FileExists () Dim FilePath As String Dim TestStr As String FilePath = "D: \ FolderName \ Sample.xlsx" TestStr = "" On Error Resume Next TestStr = Dir (FilePath) On Error GoTo 0 If TestStr = "" Then MsgBox " Filen eksisterer ikke "Else Workbooks.Open" D: \ FolderName \ Sample.xlsx "End If End Sub
- Nå er makroen klar til å kjøre, vi bruker F5 -hurtigtasten og "Eksempel" -filen åpnes
- Hvis filen ikke er tilgjengelig på den forhåndsdefinerte banen, vises følgende meldingsboks
Konklusjon: På denne måten kan vi enkelt gjenkjenne om en bestemt fil eksisterer eller ikke på en bestemt bane ved hjelp av VBA -kode.
Hvis du likte bloggene våre, del den med vennene dine på Facebook. Og du kan også følge oss på Twitter og Facebook.
Vi vil gjerne høre fra deg, gi oss beskjed om hvordan vi kan forbedre, utfylle eller innovere arbeidet vårt og gjøre det bedre for deg. Skriv til oss på e -post