Wie bekomme ich es hin, dass bestimmte Funktionen/Anweisungen gar nicht erst kompiliert werden, wenn der Anwender eine bestimmte Excel-Version (z.b. XP) unterschreitet?
Dankeschön
Wie bekomme ich es hin, dass bestimmte Funktionen/Anweisungen gar nicht erst kompiliert werden, wenn der Anwender eine bestimmte Excel-Version (z.b. XP) unterschreitet?
Dankeschön
Sub Version()
Dim version
version = Application.version
If Version <> "10.0" then exit sub
End Sub
dann schalte doch ein Makro vor.
Sub Versionstest()
if Application.Version = "10.0" Then
Call "DeinMakro"
End If
End Sub
Gruß
FCH
vielleicht hilt Dir die Verwendung der Compiler-Konstanten?Sub Test_Prog()
Code eingefügt mit Syntaxhighlighter 1.13
#If VBA6 Then
MsgBox "VBA6"
#Else
MsgBox "kein VBA6"
#End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen