Problem mit Formula1 in Validation.Add
16.11.2004 09:47:45
Uli
die Validation.Add-Methode treibt mich gerade in den Wahnsinn:
Ich möchte validieren, dass nur ganze oder "halbe" Zahlen (X,5) in einem Zellbereich eingegeben werden. Das prüfe ich darüber, ob das Zehnfache des Eingabewertes ohne Rest durch 0 geteilt werden kann, also nach der Formel "=Rest(Zellwert*10;5)=0".
Wenn ich das Makro für einen bestimmten Zellbereich aufzeichne, bekomme ich auch ein schlüssiges Coding. Allerdings kann dieses im Nachhinein nicht mehr ausgeführt werden (in etwas folgendermaßen):
With Range("A1:A3").Validation
.Delete
.Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=rest(A1*10;5)=0"
....
Anscheinend mag der Compiler das Gleichheitszeichen vor dem "Rest" nicht. Außerdem frage ich mich, wie ich dafür sorgen kann, dass in jeder Zelle auf die jeweilige Zelle, und nicht A1 referenziert wird (also analog zu dem "RC" in der FormulaR1C1).
Kann mir jemand helfen?
Vielen Dank im Voraus!
Uli