Nach der Eingabe in die Zelle möchte ich, dass oberhalb der aktuellen Zeile eine neue Zeile eingefügt wird.
Private Sub Worksheet_Change(ByVal Target As Range)
Füge oberhalb der aktuellen Zeile eine neue Zeile ein.
End Sub
Danke im Voraus
Horst
Private Sub Worksheet_Change(ByVal Target As Range)
Füge oberhalb der aktuellen Zeile eine neue Zeile ein.
End Sub
Danke im Voraus
Horst
Gruß
Peter
klappt das wirklich so? Hier mein Versuch:
mfg Holger
es klappt mit der ursprünglich geposteten Version und geht ohne Select.
Gruß
Peter
mfg Holger
jetzt weiß ich, was Du meinst, kann das aber in Version 8 nicht nachvollziehen. Das Einfügen von Zellen löst kein Worksheet_Change aus.
Gruß
Peter
Danke Horst
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