Hello,
What's wrong with the last line of my code?
The Set statement gives me a
Run-time Error '424': Object Required


Dim RowBtm
Dim TotalRow As Range

'
' Select/Copy Cost headers/Formulas
'
'turns off screen repainting so the user can't see what you're doing
Application.ScreenUpdating = False
'unhide the sheet you want to work
Sheets("Cost_Columns_for_BOM").Visible = True

Sheets("Cost_Columns_for_BOM").Select
Set TotalRow = Range("O15:S15").Select

TONY