This is the code I wrote:
Private Sub chkboxE4NA_Click()
unprotect the sheet first
ActiveSheet.Unprotect
'Draws a line accross both pages in Worksheet E4 and directs the user to E5
ActiveSheet.Shapes.AddLine(0#, 1.5, 543.75, 713.25).Select
Selection.ShapeRange.Line.Weight = 2.25
Selection.ShapeRange.Flip msoFlipHorizontal
ActiveSheet.Shapes.AddLine(546.75, 1.5, 1073.25, 714#).Select
Selection.ShapeRange.Line.Weight = 2.25
Selection.ShapeRange.Flip msoFlipHorizontal
€˜Check box on page two
chkE4NA1.Value = True
'Protect the sheet
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
ActiveSheet.EnableSelection = xlUnlockedCells
€˜Move the user to Worksheet E5
Sheets("E5").Select

End Sub
________________________
Basically as the user goes down the workbook and finds out he does not need
to fill out worksheet E4, all he has to do is check the checkbox and this
crosses out page one and two and then directs the user to the next worksheet.

Two problems:
ONE: if the user decides after he checks the checkbox to go back and fill
out the worksheet, he has to manually delete the lines.
How can this be done with a simple unchecking of the checkbox?

TWO: if the user unchecks the checkbox, this action draws a new set of
diagonal lines overlaping the first ones.
If problem one can not be solved, how can the repetition of the diagonal
lines be avoided when the user unchecks the checkbox?


Thank you