I have around 10 sheets.

I have Order Button and Lead Button.

If Lead Button is the one selected then I want the entire ORDER word existing on the workbook to be replace by the word LEAD and the ORDER button is selected the entire workbook will remain as is.


If LeadButton.Value = True Then
Sheets("Sheet2",Sheet3, etc). 'Replace
Cells.Replace What:="Order", Replacement:="Lead", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

Else
End If

Haaisst, I just dont know how to declare it. Please help

End Sub