Guten Abend,
kann mir jemand weiterhelfen, ich versuche über ein Makro eine Tabellenvorlage im Tabellenblatt "KALK" einzufügen, wenn ich auf dem
Tabellenblatt bin funktioniert die Anweisung, bin ich jedoch auf dem Tabellenblatt "Startseite" von dort aus möchte ich das Makro auch starten,
wird ein Fehler in der dritten Zeile angezeigt. ( Hab schon alle Variationen probiert :-(
Besten Dank im Voraus
Dim lng_zeile As Long
ThisWorkbook.Worksheets("KALK").Application.CutCopyMode = False
lng_zeile = Worksheets("KALK").Cells(Rows.Count, 4).End(xlUp).Row
ThisWorkbook.Worksheets("KALK").ListObjects.Add(xlSrcRange, Range("D11:BX" & lng_zeile), , xlYes).Name = "tbl_KALK"
ThisWorkbook.Worksheets("KALK").ListObjects("tbl_KALK").TableStyle = "TableStyleMedium1"
Angelika