Gruppe
Allgemein
Problem
Wie kann ich ein Makro in Abhängigkeit der abzufragenden Excel-Version verzweigen?
StandardModule: basMain
Sub VersionsTest()
Select Case Left(Application.Version, 1)
Case Is >= 8: Call Meldung1
Case 5, 7: Call Meldung2
End Select
End Sub
Private Sub Meldung1()
MsgBox prompt:="Version >= 8"
End Sub
Private Sub Meldung2()
MsgBox prompt:="Version 5/7"
End Sub