hab ein kleines Problem:
ich möchte mit folgender Routine (geht noch weiter)
Daten aus einem anderen Blatt auf ein neues übernehmen das klappt auch. Aber dabei möchte ich auch gleichzeitig die Zellen formatieren mit:
Range("A" & zeile).Interior.ColorIndex = 31
geht das leider nur für eine Zeile und Spalte.
Ich möchte das aber für die entsprechende Zeile und alle Spalten.
Also z.B. Range("A:Z" & zeile).Interior.ColorIndex = 31
aber das klappt nicht
Wie muss ich das machen?
Gruß und Danke Wolfi
For Each rw In wks_Process.Rows
Tp = rw.Cells(32)
Debug.Print Tp
ElseIf Tp = "PPStage" Then
Name = rw.Cells(2)
wks_SAP_Export.Activate
Range("A" & zeile).Interior.ColorIndex = 31
Range("A" & zeile).Font.ColorIndex = 0
Range("A" & zeile).Font.Bold = True
Range("A" & zeile) = Name
next