brauche schon wieder einmal eure hilfe
wieviel argumente kann man bei der funktion union definieren?
wenn ich das so definiere, bringt er einen fehler beim kompilieren? bis zu DZ kommt kein fehler
gibt es evtl ne andere möglichkeit, soviel spalten auf einmal zu löschen?
Dim loeschbereich As Range
Set loeschbereich = Union(.Columns(1), .Columns(6), .Columns("H:T"), .Columns("W:Y") _
, .Columns("AB:AC"), .Columns("AE:BD"), .Columns("BF:BZ") _
, .Columns("CB:CC"), .Columns("CE:DD"), .Columns("DF:DZ") _
, .Columns("EB:EC"), .Columns("EE:ED"), .Columns("FF:FZ") _
, .Columns("GB:GC"), .Columns("GE:GD"), .Columns("HF:HZ") _
, .Columns("IB:IC"), .Columns("IE:ID"), .Columns("JF:JZ") _
, .Columns("KB:KC"), .Columns("KE:KD"), .Columns("LF:LZ") _
, .Columns("MB:MC"), .Columns("ME:MD"), .Columns("NF:NZ") _
, .Columns("OB:OC"), .Columns("OE:OD"), .Columns("PF:PZ") _
, .Columns("QB:QC"), .Columns("QE:QD"), .Columns("RF:RZ") _
, .Columns("SB:SC"), .Columns("SE:SD"), .Columns("TF:TZ") _
, .Columns("UB:UC"), .Columns("UE:UD"), .Columns("VF:VZ") _
, .Columns("WB:WC"), .Columns("WE:WD"), .Columns("XF:XZ") _
, .Columns("YB:YC"), .Columns("YE:YD"), .Columns("ZF:ZZ") _
, .Columns("AAB:AAC"), .Columns("AAE:AAD"), .Columns("ABF:ABZ") _
, .Columns("ACb:ACC"), .Columns("ACE:ACD"), .Columns("ADF:ADZ"))
loeschbereich.Delete