title image


Smiley Moment mal!
Hi Marco,



ich meinte bei neuen Fragen. ;-)



Ich hatte dir eigentlich das geschrieben:



Spalte2 = WorksheetFunction.Match(Suchbegriff2, [1:1], 0)

Range(Cells(2, Spalte2), Cells(lz, Spalte2)).ClearContents



Dadurch werden die Inhalte gelöscht. Du willst jetzt doch die Zellen löschen? Und noch dazu die ganze Spalte? Versuch's mal so:



Spalte2 = WorksheetFunction.Match(Suchbegriff2, [1:1], 0)

Columns(Spalte2).Delete Shift:=xlToLeft


Gruß,



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: