Hello group,

I'm using the following code on a selected range to change the cell value
into "paid"

Worksheets("sales").Range("invoices").Select

For Each cell In Selection
If Not IsEmpty(cell.Value) Then
If cell.Value < "Paid" Then
cell.Value = "Paid"
End If
End If
Next cell

However I would also like it to work when the range is filtered, meaning
only on the visible cells.

I hope someone can get me going

Thanks

Edwin