Ich wollte mal endlich ein Makro in Eigenregie vollenden. Natürlich gelingt es mir nicht. Also muss ich wieder auf Eure Hilfe bitten und hoffen. Ich möchte gerne per Makro einzelne Tabellenspalten bei Fehler mit den Überschriften löschen. Aber ich bekomme den Fehler fehler beim kompilieren syntaxfehler .
Was mache ich Falsch? Hier mal das Makro und ich hänge eine Beispieldatei an.
Sub Bei_Fehler_löschen()
' Bei_Fehler_löschen'
Dim strTabelle As String, strRange As String
strTabelle = Range("A27")
strRange = Range("A28")
Range(strRange).Select
Range(str.range[[#All],[str.Range]]).Select
Selection.ListObject.ListColumns(1).Delete
Range("A25").Select
End Sub
Mit dem Makrorekorder wird immer der jeweilige Text der Spalte im Makro nur aufgezeichnet.Vielen Dank im voraus.
https://www.herber.de/bbs/user/149401.xlsm
LG Robert