I need help.
I have vba code that print labels and i need to modify the code.
Before printing the user will ask to print the the document.
If the user will choose "YES" then continue printing. If the user opt to "NO" it will cancel printing.
Here is my codes but i don't know how to combine.. Any help will be appreciated.Thanks in advance.
and this codeCode:Sub PrintLabels() 'Please Do not alter any codes Here! Dim Labels As Long, Lbl As Long Labels = Sheets("INPUT").[C13] With Sheets("FORM") For Lbl = 1 To Labels Step 2 .Range("B9") = Lbl If Lbl < Labels Then .Range("B23") = Lbl + 1 Else .Range("B23") = "" End If .PrintOut Copies:=1 Next Lbl End With End Sub
Code:Sub Print_option() MSG1 = MsgBox("Are you sure you want to print this document? ", vbYesNo, "SAVE PAPER!Check Before you Print!") If MSG1 = vbYes Then MsgBox "Print" Else MsgBox "Cancel" End If End Sub




Reply With Quote
Bookmarks