Heres My Code
This is in the code for each worksheet.
What id like to do is if its Checked add a - before the Sheetname in question, and if its unchecked remove the - from the sheetname, keeping the name intact . Basically add a - before the name and remove the - after the name.
Code:
Sub CheckBox1_Click()
Call UnProtectAll
If Me.CheckBox1.Value = False Then
Range("H2").Interior.Color = 5296274 'green
Me.Tab.Color = 5296274
Range(ActiveCell.Address).Name = "StartCell"
Clear_DataQuote
Else
Range("H2").Interior.Color = 255 'red
Me.Tab.Color = 255
Range(ActiveCell.Address).Name = "StartCell"
Clear_DataQuote
End If
Call ProtectAll
End Sub
This is in the code for each worksheet.
What id like to do is if its Checked add a - before the Sheetname in question, and if its unchecked remove the - from the sheetname, keeping the name intact . Basically add a - before the name and remove the - after the name.