I am very new to this, I am making conditional formatting to highlight numbers above the average of all values in a row.
I need to apply this formatting to all rows in all sheets in the workbook.
From what I've collected this is what I've got:
Sub AllSheets() Dim ws As Worksheet For Each ws In Worksheets Range("A1:S1").Copy For Each r In Selection.Rows r.PasteSpecial (xlPasteFormats) Next r Application.CutCopyMode = False Next ws End Sub
But when I run this, it only applies it to the active selected cells. How would I fix this?