Microsoft Excelissä voimme tarkistaa, onko tiedosto olemassa tietyssä paikassa käyttämällä VBA -koodia. Makro näyttää tilan viestiruudun muodossa. Tässä artikkelissa tunnistamme, onko jonkin tietyn tiedoston tila olemassa vai ei, VBA -koodin avulla. Voimme käyttää Dir -toimintoa tarkistamaan, onko tiedosto olemassa sijainnissa Excel VBA: n avulla.
Tämän ohjelman avulla voimme tarkistaa, onko samassa paikassa jo olemassa tiedostoja. Joten voimme poistaa tai nimetä vanhan tiedoston uudelleen.
Kysymys: Kun luot makroa tehtävän automatisoimiseksi, tallennamme yleensä tulostiedoston sijaintiin. Haluaisin saada makron tarkistettavaksi ja osoittamaan vastineeksi, että tiedosto on saatavilla tai ei ole kyseisellä polulla.
Tämän esimerkin havainnollistamiseksi tallennamme Sample.xlsx -tiedoston polkuun "D: \ FolderName \ Sample.xlsx"
Tunnistaaksemme, onko työkirja olemassa, meidän on käynnistettävä VB -editori seuraavasti:
- Napsauta Kehittäjä -välilehteä
- Valitse koodiryhmästä Visual Basic
- Napsauta Lisää ja sitten Moduuli
- Tämä luo uuden moduulin
- Syötä seuraava koodi standardimoduuliin
Sub FileExists () Dim FilePath merkkijonona Dim TestStr As String FilePath = "D: \ FolderName \ Sample.xlsx" TestStr = "" On Error Resume Next TestStr = Dir (FilePath) On Error GoTo 0 If TestStr = "" Sitten MsgBox " Tiedostoa ei ole olemassa "Muut työkirjat. Avaa" D: \ FolderName \ Sample.xlsx "End If End Sub
- Nyt makro on valmis suoritettavaksi, käytämme F5 -pikanäppäintä ja "Sample" -tiedosto avautuu
- Jos tiedosto ei ole käytettävissä ennalta määritetyllä polulla, seuraava viestiruutu tulee näkyviin
Johtopäätös: Tällä tavalla voimme helposti tunnistaa, onko tietty tiedosto olemassa tai ei tietyllä polulla käyttämällä VBA -koodia.
Jos pidit blogistamme, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa, täydentää tai innovoida työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse