Sub ZeigeVersionen()
Cells(1, 1) = "Bei Ihnen läuft Excel " & Application.Version
Cells(2, 1) = "unter " & Application.OperatingSystem
#If VBA7 Then
Cells(4, 1) = "VBA7 64Bit"
#Else
Cells(4, 1) = "VBA7 32Bit"
#End If
#If Win64 Then
Cells(5, 1) = "Win64 64Bit"
#Else
Cells(5, 1) = "Win64 32Bit"
#End If
#If Win64 Then
Cells(6, 1) = "Win64"
#ElseIf Win32 Then
Cells(6, 1) = "Win32"
#Else
Cells(6, 1) = "Win16"
#End If
End Sub
| A | |
| 1 | Bei Ihnen läuft Excel 14.0 |
| 2 | unter Windows (32-bit) NT 6.01 |
| 3 | |
| 4 | VBA7 64Bit |
| 5 | Win64 32Bit |
| 6 | Win32 |
Sub ZeigeVersionen()
#If VBA7 Then
Cells(4, 1) = "VBA 7"
#Else
Cells(4, 1) = "VBA 6"
#End If
#If Win64 Then
Cells(5, 1) = "VBA 64Bit"
#Else
Cells(5, 1) = "VBA 32Bit"
#End If
End Sub
Um herauszufinden, ob Du die 32-Bit- oder 64-Bit-Version von Excel verwendest, kannst Du folgende Schritte unternehmen:
Excel öffnen und gehe zu Datei > Hilfe (in älteren Versionen Datei > Über).
Dort findest Du die Informationen zur Excel-Version anzeigen. Beachte die Angaben zur Bit-Version (32 oder 64).
Eine weitere Methode ist die Verwendung von VBA. Öffne den VBA-Editor mit ALT + F11, erstelle ein neues Modul und füge den folgenden Code ein:
Sub ZeigeVersion()
MsgBox "Bei Ihnen läuft Excel " & Application.Version & vbLf & _
"unter " & Application.OperatingSystem & vbLf & _
IIf(Application.VBE.Version >= "7.0", "VBA7", "VBA6") & vbLf & _
IIf(Application.VBE.Version >= "7.0" And Application.OperatingSystem Like "*64*", "64-Bit", "32-Bit")
End SubFühre das Makro aus, um die Bit-Version zu ermitteln.
Problem: Das Makro zeigt nicht die erwartete Bit-Version an.
Problem: Die Bit-Version in den Einstellungen stimmt nicht mit der angezeigten Version überein.
Task-Manager verwenden:
Systeminformationen anzeigen:
Hier sind einige einfache Beispiele, um die Bit-Version zu ermitteln:
Um die Excel-Version anzuzeigen, kannst Du diesen Code verwenden:
Sub ZeigeExcelVersion()
MsgBox "Excel Version: " & Application.Version
End SubUm zu überprüfen, ob Du auf einem 64-Bit-System arbeitest, kannst Du den folgenden Code verwenden:
Sub ZeigeBetriebssystem()
If Application.OperatingSystem Like "*64-bit*" Then
MsgBox "64-Bit Betriebssystem"
Else
MsgBox "32-Bit Betriebssystem"
End If
End SubNutze die #If-Direktive in VBA, um bedingte Kompilierung durchzuführen:
#If Win64 Then
MsgBox "64-Bit Excel"
#Else
MsgBox "32-Bit Excel"
#End IfVermeide die Verwendung von Funktionen, die nur in einer der beiden Versionen verfügbar sind. Teste immer die Bit-Version vor der Verwendung.
1. Wie kann ich die Excel-Version anzeigen?
Um die Excel-Version anzuzeigen, gehe zu Datei > Hilfe und sieh nach, ob 32-Bit oder 64-Bit angegeben ist.
2. Gibt es eine Möglichkeit, die Bit-Version per VBA zu überprüfen? Ja, Du kannst die oben genannten Makros verwenden. Achte darauf, die Konstanten korrekt zu definieren.
3. Was, wenn ich unterschiedliche Bit-Versionen für Windows und Excel habe? Das ist möglich. Du kannst sowohl 32-Bit Windows als auch 64-Bit Excel verwenden. Überprüfe die Prozesse im Task-Manager, um Klarheit zu bekommen.