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