Bepaal het type besturingssysteem met VBA in Microsoft Excel

Anonim

Om het type besturingssysteem te identificeren, kunnen we macrocode gebruiken. In dit artikel zullen we leren hoe u het type besturingssysteem kunt bepalen dat wordt gebruikt met behulp van VBA-code.

Vraag: Ik zou graag het besturingssysteem van mijn systeem willen weten via VBA-code, of het nu 32 bit of 64 bit is.

Om het type besturingssysteem te bepalen, moeten we de onderstaande stappen volgen:

  • We moeten VB-editor starten
  • Klik op het tabblad Ontwikkelaar
  • Selecteer in de codegroep Visual Basic

  • Klik op Invoegen en vervolgens op Module

  • Hiermee wordt een nieuwe module gemaakt
  • Voer de volgende code in de module in:

 Functie OSis32BIT() As Boolean OSis32BIT = False If InStr(Application.OperatingSystem, "32-bit") Then OSis32BIT = True End If End Functie 
 Functie OSis64BIT() As Boolean OSis64BIT = False If InStr(Application.OperatingSystem, "64-bit") Then OSis64BIT = True End If End Functie 
 Sub TestOSis32BIT() If OSis32BIT Then MsgBox "U gebruikt een 32-bits besturingssysteem", , _ Application.OperatingSystem Else MsgBox "U gebruikt geen 32bit-besturingssysteem", , _ Application.OperatingSystem End If End Sub

Terwijl u de macro uitvoert, krijgt u een berichtvenster, raadpleeg de onderstaande momentopname:

Als u een 64-bits besturingssysteem gebruikt, wordt het berichtvenster bijgewerkt "U gebruikt geen 32-bits besturingssysteem"

Om te controleren of het systeem 32 bit is; we kunnen UDF in een lege cel gebruiken als:

  • =OSis32BIT(); dit zal TRUE retourneren als het besturingssysteem 32 bit is, anders FALSE retourneren

Om te controleren of het systeem 64 bit is; we kunnen UDF in een lege cel gebruiken als:

  • =OSis64BIT(); dit retourneert TRUE als het besturingssysteem 64 bit is, anders wordt FALSE geretourneerd

Conclusie: Op deze manier kunnen we met behulp van VBA-code het besturingssysteem identificeren dat we gebruiken.

Als je onze blogs leuk vond, deel deze dan met je vrienden op Facebook. En je kunt ons ook volgen op Twitter en Facebook.

We horen graag van je, laat ons weten hoe we ons werk kunnen verbeteren, aanvullen of vernieuwen en het voor jou beter kunnen maken. Schrijf ons op de e-mailsite