Hello,
I have a piece of cod for print, so I want to ask the user if the date is changed.
if the user hits Yes the code to print the sheets, if the user hits No the UserForm frmUpadte to be shown, he/she makes ...changes and that's all.
I appreciate your help!
Sub LIST_Button7_Click()
If MsgBox("Did you change the date?", vbYesNo + vbQuestion, "890") = vbYes Then
Application.ScreenUpdating = 0
Sheets("890").Visible = 1
Sheets("x-890").Visible = 1
Sheets("890").PrintOut Copies:=1
Sheets("x-890").PrintOut Copies:=1
Sheets("890").Visible = xlSheetVeryHidden
Sheets("x-890").Visible = xlSheetVeryHidden
Application.ScreenUpdating = 1
End If
'this is what I want to add....
frmUpdate.show
With frmUpdate
.TextBox8.Value="890"
.TextBox35.SetFocus
End With
End Sub
Bookmarks