title image


Smiley Re: Zellen pro Zeile nach rechts auffüllen
Hallo Michael,



so, wie ich das sehe, brauchst Du nur in Spalte1 jeder Zeile (beginnend ab der zweiten) solange Zellen einzufügen, bis in Spalte5 ein Wert steht. Ist mit VBA eigentlich kein Problem. Wenn Du das noch nie gemacht hast: Das Ganze für mehrere Zeilen mit dem Makrorekorder aufzeichnen, 'Sheets("Tabelle1")' durch 'Sheets(1) ersetzen und z.B. 'Range("B4")' durch 'Cells(4, 2)'. Dadurch lassen sich die Cells sehr schön durch Schleifen ansprechen:for i=2 to letzteZeile

do while Sheets(1).Cells(i, 5).value = ""

'hier müsste dann das Zelleneinfügen hin

loop

nextZuerst natürlich mit einer Kopie der Originaldatei versuchen. Außerdem vor dem Starten des Makros die Datei speichern. Do...Loop-Schleifen gehen gern mal ins Leere. Da hilft dann nur noch der Taskmanager zum Abschießen von Excel.



Gruß, Frank

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: