wenn ich versuche Spalten zu entfernen die nicht auf dem aktuellen Tabellen-Blatt liegen fällt mir folgende Prozedur auf die Nase:
Sub SpalteEntfernen(Spalte As Integer, Name As String)
Dim sht As Worksheet
Set sht = Sheets(Name)
sht.Columns(Spalte).Select
Selection.Delete Shift:=xlToLeft
End Sub
Wieso funktioniert das denn nicht? Wechsel ich vor Ausführung des Makros auf das "richtige" Blatt geht das einwandfrei durch.Danke im Voraus