VBA automatisch mitkopieren
18.02.2014 12:00:27
Hans
ich habe per Makrorecorder das kopieren und anlegen eines neuen Tabellenblattes erzeugt.
Ich kopiere immer ein bestimmtes "blanko" Tabellenblatt, welches alle notwendigen Formeln und Grunddaten hat um weiter zu arbeiten.
Ich habe jedoch hinter eine Zelle folgenden Code gelegt:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, Range("a1")) Is Nothing Then
Range("a2").Select
End If
If Target = Range("A1") Then ActiveSheet.Name = Target
End Sub
...welcher mir also näch Änderung der Zelle A1 mein Tabellenblatt umbenennt. Dieser Code wird natürlich durch das von mir angelegte Makro nicht übernommen.
Wie müsste ich vorgehen, damit diese Funktion auch in einem neuen Tabellenblatt vorhanden ist?
Vielen Dank
Gruß
Hans
Anzeige