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
Bookmarks