Excel VBA környezeti funkció

A VBA Environ, ahol az Environ jelentése Környezet, az operációs rendszerben található információk megszerzésére szolgál. Az Excel VBA Environ funkció olyan értéket ad vissza, mint például a rendszerben elérhető elérési út, hely, név, kiterjesztés. Ezen a környezeten (operációs rendszer) kívül a felhasználónévre, a jogosultságra, a mappanévre stb. Vonatkozó információk is tartoznak.

A VBA Environ csak a kifejezést bemenetinek tekinti. Ahol ez a kifejezés bármi lehet. Az alábbiakban a Environ szintaxisa látható.

Hogyan lehet használni a környezeti függvényt az Excel VBA alkalmazásban?

Az alábbiakban bemutatjuk a különféle példákat a Környezet funkció használatához az Excel VBA-ban.

Itt letöltheti ezt a VBA Environ Excel sablont - VBA Environ Excel sablon

VBA környezet - 1. példa

Különböző módokon szerezhet információt az operációs rendszerről a VBA Environ segítségével. Az egyiket ebben a példában látjuk. Az alábbiakban felsorolom a rendszerem lehetséges felhatalmazott felhasználóit, amelyek IGAZ vagy HAMIS lehetnek. Ezeket a neveket a Sheet2-ben említettük.

Kövesse az alábbi lépéseket a VBA Environ funkció használatához:

1. lépés: A VBA Environ segítségével most megtudjuk, melyik a jelenlegi operációs rendszer helyes engedélyezett felhasználóneve. Az 1. lap az a hely, ahol a C3 cellában megtalálhatjuk a rendszer helyes felhasználói nevét.

2. lépés: Az „ Engedélyezett? ” Cím alatt ”Látni fogjuk, hogy a felhasználónév engedélyezett-e vagy sem az If és a CountIf funkcióval, az alábbiak szerint. Ha a felhasználónév érvényes és engedélyezett, akkor IGEN kapunk, ha érvényes, de nem engedélyezett, akkor a Nem értéket kapjuk. Mind a jogosulatlan, mind az érvénytelen felhasználónévhez továbbra is nem.

3. lépés: Most hozzon létre egy excel munkalapon egy Parancsgombot, amely elérhető a Fejlesztő lapon a Beszúrás menü aktív X vezérlőjében, az alább látható módon.

4. lépés: Most hozzon létre egy parancsgombot a lapon bárhol. Bármely alakzatot választhatunk a parancsgomb felett.

5. lépés: Kattintson a jobb gombbal a létrehozott gombra, és lépjen a Tulajdonságok opcióra.

6. lépés: Ennek alapján bármire megváltoztathatjuk az alapértelmezett nevet. Itt a Run Environ- et választottuk az alább látható módon.

7. lépés: Most kattintson jobb gombbal ugyanazon a gombbal, és válassza a Kód megtekintése menüpontot a VBA ablakban való belépéshez.

7. lépés: Ebben az esetben megkapjuk a parancsgomb előre elkészített alfolyamatát.

Kód:

 Privát alpont CommandButton2_Click () Sub befejezése

8. lépés: Válassza ki azt a lapot, amelyre alkalmazni akarjuk a Environ funkciót.

Kód:

 Privát albeállítás CommandButton2_Click () Sheets ("Sheet1") End Sub

9. lépés: Ezután válassza ki azokat a tartomány cellákat, ahol látni akarjuk a kimenetet.

Kód:

 Privát alcsoport CommandButton2_Click () Sheets ("Sheet1"). Range ("C3") = Sub Sub End

10. lépés: Most használja a Environ funkciót azzal a mezővel, amelyet meg akarunk szerezni. Itt szeretnénk látni USERNAME felhasználót.

Kód:

 Privát al CommandButton2_Click () Sheets ("Sheet1") Range ("C3") = Environ ("USERNAME") End Sub

11. lépés: Most nyisson meg egy IF-ELSE hurkot, ahol írja be azt a feltételt, ha az E3 tartomány cellája IGEN, majd küldjön üzenetet, mint jogosult felhasználó.

Kód:

 Private Sub CommandButton2_Click () Sheets ("Sheet1"). Range ("C3") = Environ ("USERNAME") Ha Sheets ("Sheet1"). Range ("E3") = "Yes" Akkor MsgBox "Engedélyezett felhasználó!" Befejezés Sub

12. lépés: Az Else alatt adja meg az üzenetet jogosulatlan felhasználóként, az alább látható módon.

Kód:

 Private Sub CommandButton2_Click () Sheets ("Sheet1"). Range ("C3") = Environ ("USERNAME") Ha Sheets ("Sheet1"). Range ("E3") = "Yes" Akkor MsgBox "Engedélyezett felhasználó!" Else MsgBox "Unathorized User" End If End Sub

13. lépés: Most lépésről lépésre összeállítjuk a kódot az F8 funkciógomb megnyomásával, hogy kiderüljön, van-e hiba vagy sem. Ha minden rendben van, akkor lépjen ki a VBA ablakból és szüntesse meg a Tervezés mód kiválasztását a Fejlesztő lapon, az alább látható módon.

14. lépés: Most futtatjuk a makrót, ha rákattintunk a „Run Environ” nevű parancsgombra. Látjuk, hogy a C3-on az engedélyezett felhasználónév Game2- ként lesz kinyomtatva, majd ugyanezt kétszer is megerősítjük. Egyszer az üzenetdoboz mellett, az E3 cellában pedig más.

Ez azt jelenti, hogy a Sheet2-nél Game2- ként megemlített felhasználónév érvényes és engedélyezett.

VBA környezet - 2. példa

Van egy másik módszer, amellyel teljes információkat kaphatunk a meglévő operációs rendszerről. Ez ugyanúgy működik, mint az 1. példában láttuk. Ehhez kövesse az alábbi lépéseket:

1. lépés: Nyissa meg a modult az Insert menü lapon.

2. lépés: Most az Explicit opció alatt definiáljuk azokat a funkciókat, amelyeket látni akarunk.

Kód:

 Opció Explicit Function CompName () Funkció vége

3. lépés: Tegyük fel, hogy ha szeretné látni a számítógép nevét, akkor használjon bármilyen szót, amely meghatározza a számítógépet. Itt a CompName-t választottuk, és az Environ funkciót a „ Számítógép neve ” használatával használjuk.

Kód:

 Opció Explicit Function CompName () CompName = Environ ("ComputerName") End Function

4. lépés: Nyissunk meg egy másik funkciót, amelyen látni fogjuk az ideiglenes fájl elérési útját, az alább látható módon.

Kód:

 Opció Explicit Function CompName () CompName = Environ ("ComputerName") End Function Function Function Temp () End Function

5. lépés: Most ismét használjon bármilyen szót, amely meghatározza a Temp fájl elérési útját, például a TempDir, és illessze be a EnEM funkciót a TEMP segítségével .

Kód:

 Opció Explicit Function CompName () CompName = Environ ("ComputerName") Funkció vége Funkció Temp () TempDir = Environ ("Temp") End Function

6. lépés: Ezután nyissa meg az alprocesszort, amelyben mindkét fent definiált függvényt felhasználni fogjuk a részletek megtekintésére.

Kód:

 Opció Explicit Function CompName () CompName = Environ ("ComputerName") End Function Funkció Temp () TempDir = Environ ("Temp") End Function Sub Enviro () End Sub

7. lépés: Adjon meg egy hosszúságú változót, amelyben látni fogjuk a részleteket.

Kód:

 Opció Explicit Function CompName () CompName = Environ ("ComputerName") End Function Funkció Temp () TempDir = Environ ("Temp") End Function Sub Enviro () Dim A as Long End Sub

8. lépés: Nyisson meg egy Következő hurkot, és adja meg az A változó hosszát, mennyi ideig lesz a karakterkorlát. Itt 50-re állítottuk.

Kód:

 Opció Explicit Funkció CompName () CompName = Environ ("ComputerName") Funkció vége Funkció Temp () TempDir = Environ ("Temp") Funkció vége End Enviro () Halvány A, Amíg A = 1 - 50 End sub

9. lépés: Most használja a Hibakeresést az A változóhoz és a környezeti funkcióhoz, az alább látható módon.

Kód:

 Opció Explicit Funkció CompName () CompName = Environ ("ComputerName") Funkció vége Funkció Temp () TempDir = Environ ("Temp") Funkció vége Sub Enviro () Halvány A, Amíg A = 1 - 50 DebugPrint környezet (A) ) Következő vége al

10. lépés: Összeállítja a kód egyes lépéseit, és nyisson meg egy azonnali ablakot a Nézet menü lapon.

11. lépés: Most futtassa a kódot a menüsor alatt található Play gombra kattintva.

12. lépés: A közvetlen ablakban látni fogjuk az operációs rendszer teljes részleteit, amelyek az általunk bejelentett funkciókhoz kapcsolódnak.

Az Excel VBA környezeti funkció előnyei

  • Úgy tűnik, bonyolult, de könnyen megvalósítható.
  • Ez a számítógép és az operációs rendszer teljes részleteit tartalmazza.
  • Minden konkrét részletet felsorolhatunk, és igényeink szerint is.
  • Láthatjuk azt is, hogy kik jogosultak a rendszer használatához és szerkesztéséhez.

Dolgok, amikre emlékezni kell

  • A VBA Environ nem korlátozódik a fenti példákban bemutatott folyamatra. A VBA Environ segítségével sokkal több operációs rendszer adatot szerezhetünk, például bármilyen elérési utat, helyet, mappát vagy fájlt, akár bármilyen fájlméretet is.
  • Ha valamelyik érték, amelyet bevittünk, nem egy környezeti karakterlánc-tábla, akkor nulla hosszúságú karakterláncot kapunk.
  • Miután elvégeztük a kódolást, mentse el a fájlt makróban az excel formátumban, hogy elkerülje a kódot.

Ajánlott cikkek

Ez egy útmutató a VBA Environhez. Itt tárgyaljuk, hogyan lehet használni az Environ Function-t az Excel VBA-ben, a gyakorlati példákkal és a letölthető Excel sablonnal együtt. Megnézheti más javasolt cikkeinket -

  1. VBA IF nyilatkozatok | Excel sablonok
  2. Hogyan kell használni az Excel VBA rendezési funkciót?
  3. VBA Míg a hurok (példák Excel sablonnal)
  4. VBA számláló (példák)

Kategória:

VBA