Clever-Excel-Forum

Hallo,

ich bin neu hier und hoffe das ich in der richtigen Rubrik bin. Ich nutze die Aufzeichnungsfunktion für ein Makro in Excel 2016 und versuche ein Registerblatt, welches beschriftete Kontrollkästchen beinhaltet mit dem aufgezeichnteten Makro zu kopieren. Das manuelle Kopieren (also ohne Makro) klappt immer problemlos, die beschrifteten Kontrollkästchen erscheinen in der Kopie genau so wie im Original.

Sobald ich den Kopiervorgang im Makro aufgezeichnet habe und anschließend ausführen will, erscheint hinter der von mir vergebenen Beschriftung des Kontrollkästchens immer die Beschriftung "Kontrollkästchen". Was mache ich da falsch? Huh

Screenshot vor der Kopie mit dem Makro:

[
Bild bitte so als Datei hochladen: Klick mich!
]

Screenshot nach der Kopie mit dem Makro:

[
Bild bitte so als Datei hochladen: Klick mich!
]

Hier der Makroinhalt:

Sub Makro3()
'
' Makro3 Makro
'
' Tastenkombination: Strg+o
'
    Sheets("Tabelle2 (3)").Select
    ActiveSheet.CheckBoxes.Add(379.5, 90.75, 48, 14.25).Select
    ActiveSheet.CheckBoxes.Add(379.5, 121.5, 48.75, 18.75).Select
    ActiveSheet.CheckBoxes.Add(379.5, 105.75, 46.5, 15.75).Select
    ActiveSheet.CheckBoxes.Add(619.5, 90.75, 45, 14.25).Select
    ActiveSheet.CheckBoxes.Add(619.5, 121.5, 45.75, 18.75).Select
    ActiveSheet.CheckBoxes.Add(619.5, 105.75, 43.5, 15.75).Select
    Sheets("Tabelle2 (3)").Copy After:=Sheets(4)
End Sub

Viele Grüße und Danke für jede Hilfe im voraus

Matthias

Hallo Matthias,

was soll das ganze Add und Select, einfach das Blatt komplett kopieren und fertig.

Code:
Public Sub aaa()

Sheets("Tabelle2 (3)").Copy After:=Sheets(4)

End Sub

Gruß Werner

Matthias W

Werner.M