VBA, Nach Zelländerung eine Zelle nach unten
10.02.2005 10:44:02
Werner
leider kann ich trotz intensiver Suche nicht die Lösung meines wohl recht einfachen Problems finden und brauche einen kompetenten Rat.
Ich muß in einer komplexen Tabelle vielfach den Monat ändern.
Dazu habe ich mit dem Recorder folgendes Makro aufgenommen:
..................
Sub feb()
' feb Makro
' Makro am 09.02.2005 von Werner aufgezeichnet
' Tastenkombination: Strg+q
ActiveCell.FormulaR1C1 = _
"=IF(COUNTIF(Februar!R[4]C[-2]:R[4]C[39],""anton"")>0,"""",""anton"")"
Range("H1").Select
End Sub
...............
Das funktioniert auch hervoragend, ich tausche über das Makro in einer kopierten Zelle den Monatsnamen aus; allerdings geht es nicht mit der nächsten Zelle darunter weiter, weder enter noch Pfeiltasten werden vom Makro berücksichtigt.......Was muss ich einfügen damit ich direkt die nächste Zelle darunter bearbeiten kann?
tnx im Voraus
Der Werner
Anzeige