A lot would depend on what the macro does after the THEN statement. The one
you posted below goes straight to an ELSE statement. Post the correct macro.

Mike

"Fingerjob" wrote:

This marco take over 1 min to run for me....
Does anybody have clue if i can get the run time down.

Br

Petter


Sheets("Sheet2").Select
For i = 0 To 92
rownr = 105 - i
Fjern = Cells(rownr, 6).Value
If Fjern = "Order backlog" Or Fjern = "Orders received" Then
Else: Range("e" & rownr & ",g" & rownr & ",k" & rownr & ":m" &
rownr).ClearContents
End If
Next i