ERLANDSEN DATA CONSULTING Excel & VBA Tips   Information in English / Informasjon på engelsk

Disse websidene oppdateres ikke lengre og er kun tilgjengelig for historikken sin skyld.

Klikk her for å gå til den oppdaterte informasjonen.

Sjekk hvilket operativsystem som benyttes

Sjekk hvilket operativsystem som benyttes

Funksjonen nedenfor returnerer True dersom operativsystemet som benyttes er 32bit.

Function OSis32BIT() As Boolean
    OSis32BIT = False
    If InStr(Application.OperatingSystem, "32-bit") Then OSis32BIT = True
End Function

Sub TestOSis32BIT()
    If OSis32BIT Then
        MsgBox "Du benytter et 32bit operativsystem", , _
            Application.OperatingSystem
    Else
        MsgBox "Du benytter ikke et 32bit operativsystem", , _
            Application.OperatingSystem
    End If
End Sub

 

Dokumentet er sist oppdatert 1999-08-16 12:35:22      Utskriftsvennlig versjon

 

Erlandsen Data Consulting     http://www.erlandsendata.no/   
Excel & VBA Tips   Copyright ©1999-2024    Ole P. Erlandsen   All rights reserved
E-post kontaktadresse