@Nepumuk: Problem
22.03.2012 09:13:39
Erich
Hi Nepumik,
mir geht es wie Christian: Win-. und Office-Bits scheinen vertauscht.
Ich habe win7 mit 64 Bit, Office2010 mit 32 Bit.
Diese Routine
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
erzeugt aber diese Tabelle:
| 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 |
Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Kann dat? Mir ist das ein Rätsel.
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich