VBA-Bedingung verfeinern
12.10.2004 10:21:33
Hans
ich möchte eine Bedingung schreiben.Den zweiten Teil (else) habe ich schon fertig. Ich möchte nun das Drucken von mehreren Bedingungen abhängig machen: In Zelle I5 dürfen nur Zahlen eingetragen werden (ist schon da). In die Zellen D9 sowie D11 dürfen nur Buchstaben eingetragen werden.
Meine Frage: Als Anfänger weiß ich nicht, wie man die Bedingungen verknüpft.
Es soll beim "Nichtdruck" in der jeweils darüber liegenden Zelle eine Fehlermeldung erscheinen (siehe code für I5). Löscht der Benutzer nach Erhalt der Meldung die Falschen Werte aus der Zelle, soll auch die Fehlermeldung wieder verschwinden.
Hier der Code:
Sub Makro2()
If Not IsNumeric([I5]) Then
Range("I4") = "Bitte nur Zahlen eintragen"
Else
... drucke Zellen ... aus. (code existiert bereits)
Vielen Dank für Anregungen. Hans