Hallo Excel VBA-Profis,
ich habe folgendes Problem. In einer Anwendung nutze ich das List.Object und möchte diese Anwendung auch unter Excel 2000 anwenden. Mit Hilfe der bedingten Compilation ist es möglich je nach Bedingung der vordefinierten Konstanten einen Teil des Codes ausführen zu lassen und den anderen Teil zu vernachlässigen. Leider muss ich dafür eine Konstante definieren. Ich möchte aber diese bedingte Codeausführung versionsabhängig gestalten, etwa wie im folgenden Codeabschnitt, so dass ich keine Konstante mit #Const blnVersion = True definieren kann:
Dim intZahl As Integer
Dim blnVersion As Boolean
intZahl = Val(Application.Version)
If intZahl = 11 Then
blnVersion = True
Else
blnVersion = False
End If
#If blnVersion Then
Msgbox "Anweisung für Version 11"
#Else
MsgBox "Anweisung für Version 9"
#End If
Leider funktioniert das nicht. Für jede Hilfe wäre ich sehr dankbar!!!