Odredite vrstu operacijskog sustava pomoću VBA u programu Microsoft Excel

Anonim

Za identifikaciju vrste OS -a možemo koristiti makro kôd. U ovom ćemo članku naučiti kako odrediti vrstu operacijskog sustava koji se koristi pomoću VBA koda.

Pitanje: Htio bih znati OS mog sustava putem VBA koda je li 32 -bitni ili 64 -bitni.

Da bismo odredili vrstu operacijskog sustava, moramo slijediti korake u nastavku:

  • Moramo pokrenuti VB editor
  • Kliknite karticu Developer
  • Iz grupe kodova odaberite Visual Basic

  • Pritisnite Umetni pa Modul

  • Ovo će stvoriti novi modul
  • Unesite sljedeći kôd u Modul

 Funkcija OSis32BIT () Kao Boolean OSis32BIT = Netačno Ako je InStr (Application.OperatingSystem, "32-bitni") Zatim OSis32BIT = Istina Kraj Ako je funkcija završena 
 Funkcija OSis64BIT () Kao Boolean OSis64BIT = Netačno Ako je InStr (Application.OperatingSystem, "64-bitni") Zatim OSis64BIT = Istina Kraj Ako je funkcija završena 
 Pod TestOSis32BIT () Ako je OSis32BIT Zatim MsgBox "Upotrebljavate 32 -bitni operacijski sustav",, _ Application.OperatingSystem Ostalo MsgBox "Ne koristite 32 -bitni operacijski sustav",, _ Application.OperatingSystem End If End Sub 

Dok pokrećete makro, dobit ćete okvir s porukom, pogledajte donju snimku:

Ako koristite 64 -bitni operacijski sustav, okvir za poruku će se ažurirati "Ne koristite 32 -bitni operacijski sustav"

Za provjeru je li sustav 32 -bitni; UDF možemo koristiti u praznoj ćeliji kao:

  • = OSis32BIT (); ovo će vratiti TRUE ako je operacijski sustav 32 -bitni, u suprotnom vratiti FALSE

Za provjeru je li sustav 64 -bitni; UDF možemo koristiti u praznoj ćeliji kao:

  • = OSis64BIT (); ovo će vratiti TRUE ako je operacijski sustav 64 -bitni, u suprotnom vratiti FALSE

Zaključak: Na ovaj način pomoću VBA koda možemo identificirati operativni sustav koji koristimo.

Ako vam se sviđaju naši blogovi, podijelite ih sa svojim prijateljima na Facebooku. Također nas možete pratiti na Twitteru i Facebooku.

Voljeli bismo čuti vaše mišljenje, javite nam kako možemo poboljšati, nadopuniti ili inovirati svoj rad i učiniti ga boljim za vas. Pišite nam na web stranici e -pošte