title image


Smiley So geht's mit VBA
Hi Martin, so geht's:Sub SchaffEbbes() Dim r As Range, Zelle As Range Set r = Worksheets(1).UsedRange For Each Zelle In r If Zelle = "" Then Zelle.Delete Shift:=xlToLeft End If NextEnd SubViel Spass Günther

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: