Microsoft Excel

Herbers Excel/VBA-Archiv

bestimmte Zeilen verändern

Betrifft: bestimmte Zeilen verändern von: Fabienne
Geschrieben am: 31.08.2004 16:59:16

Hello!

Mein Makro soll in jeder Zeile wo "Manufacturer= " steht "*Manufacturer= " schreiben. Und bei den Wörtern in den 40 darauffolgenden Zeilen soll ebenfalls ein * vorangestellt werden.

Kann mir jemand helfen den Code anzupassen? Danke!!

Sub Sterne_einfügen()
    Dim l As Integer
    For l = 1 To Range("A1000").End(xlUp).Row
    If Range("A" & l).Value = "Manufacturer=" Then ActiveCell.FormulaR1C1 = "*Manufacturer="
    Next l
    
End Sub

  


Betrifft: AW: bestimmte Zeilen verändern von: Kay
Geschrieben am: 31.08.2004 18:09:50

Hallo Fabienne

versuche das mal:

Sub Sterne_einfügen()
    Dim l As Integer
    For l = 1 To Range("A1000").End(xlUp).Row
    If Range("A" & l).Value = "Manufacturer=" Then Range("A" & l) = "*Manufacturer="
    Next l
    
End Sub


Gruß
Kay


 

Beiträge aus den Excel-Beispielen zum Thema "bestimmte Zeilen verändern"