dhevans333
New Member
- Joined
- Sep 27, 2016
- Messages
- 7
Putting together a time-off request template with a "Submit" button (assigned macro that will confirm required data input, validate entries, calculate hours subtracting holidays/weekends, etc., email to supervisor, etc.) that is deleted after submission. I have hidden rows with supervisors review/approval/denial that I want to appear if the button doesn't exist.
Previously rows were hidden until employee entered date of submission, and when supervisor received and opened document, rows would become unhidden using Workbook_Open If statement (cell not empty) - but would rather have it automatically enter the date the Submit button is hit (already set up), and unhide rows if commandbutton no longer there.
Currently:
Private Sub Workbook_Open()
ActiveSheet.Unprotect ("PASSWORD")
If Range("C58") = "" Then
Rows("60:64").EntireRow.Hidden = True
Else: Rows("60:64").EntireRow.Hidden = False
End If
ActiveSheet.Protect ("PASSWORD")
End Sub
Any options?
Previously rows were hidden until employee entered date of submission, and when supervisor received and opened document, rows would become unhidden using Workbook_Open If statement (cell not empty) - but would rather have it automatically enter the date the Submit button is hit (already set up), and unhide rows if commandbutton no longer there.
Currently:
Private Sub Workbook_Open()
ActiveSheet.Unprotect ("PASSWORD")
If Range("C58") = "" Then
Rows("60:64").EntireRow.Hidden = True
Else: Rows("60:64").EntireRow.Hidden = False
End If
ActiveSheet.Protect ("PASSWORD")
End Sub
Any options?