Ez az Excel makró lehetővé teszi a fájl elérési útjának átadását annak értékeléséhez, hogy a fájl ott van-e. Például előfordulhat, hogy egy folyamat manipulál egy fájlt valahol a számítógépén. Előfordulhat például, hogy meg kell nyitnia egy meglévő munkafüzetet, hogy naponta adatokat adjon hozzá. Ebben az esetben előfordulhat, hogy tesztelnie kell, hogy létezik-e a kezelni kívánt fájl.
Az első dolog, amit észre kell venni ezzel a makróval kapcsolatban, hogy ez egy függvény, nem pedig egy aleljárás. Ha ezt a makrót funkcióvá teszi, akkor bármilyen fájl elérési utat átadhat neki.
Ebben a makróban a Dir függvényt használja, amely egy karakterláncot ad vissza, amely a fájl nevét jelöli, amely megegyezik azzal, amit átadott neki. Ez a függvény sokféleképpen használható, de itt ellenőrizheti, hogy létezik-e a neki átadott fájl elérési útja:
Függvény FileExists(FPath As String) Boolean-ként
'1. lépés: Deklarálja a változókat
Dim FName As String
'2. lépés: Használja a Dir függvényt a fájlnév lekéréséhez
FName = Dir(FPath)
'3. lépés: Ha a fájl létezik, adja vissza a True értéket; egyébként hamis
Ha FName <> " Akkor FileExists = True _
Egyéb: FileExists = False
Funkció befejezése
Az 1. lépés deklarál egy String változót, amely tartalmazza a Dir függvényből visszaadott fájlnevet. Az FName a String változó neve.
A 2. lépésben megpróbálja beállítani az FName változót. Ezt úgy teheti meg, hogy átadja az FPath változót a Dir függvénynek. Ez az FPath változó a függvénydeklarációkon keresztül kerül átadásra (lásd a kód első sorát). Ez a struktúra megakadályozza, hogy a fájl elérési útját kemény kóddal kelljen kódolnia, hanem változóként adja át.
Ha az FName változó nem állítható be, akkor az átadott útvonal nem létezik. Így az FName változó üres. A 3. lépés csupán az eredményt igaz vagy hamis kifejezésre fordítja.
Ez a függvény is használható bármely fájl elérési útjának kiértékelésére, amelyet átadott neki. Ez a makró függvényként írásának szépsége.
A következő makró bemutatja a funkció használatát:
Almakró1()
Ha a FileExists("C:TempMyNewBook.xlsx") = igaz, akkor
MsgBox "A fájl létezik."
Más
MsgBox "A fájl nem létezik."
Vége Ha
Vége Sub
A makró megvalósításához kimásolhatja és beillesztheti mindkét kódrészletet egy szabványos modulba:
Aktiválja a Visual Basic Editort az Alt+F11 megnyomásával.
Kattintson a jobb gombbal a projekt/munkafüzet nevére a projekt ablakában.
Válassza a Beszúrás → Modul menüpontot.
Írja be vagy illessze be a kódot az újonnan létrehozott modulba.
Lábjegyzetek és végjegyzetek létrehozása a Word 2013-ban. Részletes útmutató, hogyan készíthet különféle stílusú jegyzeteket bibliográfiai információkhoz vagy magyarázó megjegyzésekhez.
Tudjon meg mindent arról, hogyan lehet az Excelben kiemelni a statisztikailag kiugró értékeket, mégpedig egyszerű eszközökkel és módszerekkel. Kiemelt figyelmet fordítunk a kiugró értékek azonosítására és kezelésére.
Az Excel Mintavételi eszközével véletlenszerűen kiválaszthat elemeket egy adatkészletből vagy választhat minden n-edik elemet. Ismerje meg, hogyan használhatja ezt a hasznos funkciót az adatelemzéshez!
Fedezze fel a Microsoft Word 2019 legjobb trükkjeit, amelyek segítenek a hatékonyabb munkavégzésben. Tudd meg, hogyan használhatod ki a program funkcióit!
A Word 2019-ben a bekezdések igazítása és behúzása kulcsfontosságú a dokumentumok megfelelő megjelenítéséhez. Ismerje meg a formázási lehetőségeket és tippeket a hatékonyabb munkához.
Fedezze fel, hogyan használhatja az Excel 2019 Solver bővítményt a komplex problémák megoldására. A célcella, változócellák és kényszerek beállítása lépésről lépésre.
A Word lehetővé teszi dinamikus elemek hozzáadását a dokumentumhoz. Fedezze fel, hogyan lehet különböző mezőket használni a Word programban a dinamikus tartalom létrehozásához.
A SharePoint 2010 oszlopai az adatok tárolására szolgálnak. Fedezze fel a különböző oszlop típusokat és azok alkalmazását a SharePoint rendszeren belül.
A Word 2013 szövegtörlésének képessége kulcsfontosságú, legyen szó szövegalkotásról vagy törlésről. Ismerje meg a hatékony szövegtörlési módszereket!
A fotóalbum funkció a PowerPoint 2016-ban lehetővé teszi, hogy egyszerre több fényképet illesszen be egy prezentációba, megkönnyítve ezzel a többszörös képek kezelését.
