plotpo
03-19-2020, 05:46 AM
Hey folks,
maybe you can help me with the following bit of code that throws a syntax error on the second msgbox? I may be blind but I just can't see the problem :crying:
Select Case MsgBox("Ein Lieferschein zur Rechnung " & Sheets("UBDateneingabe").Range("E2") _
& " vom " & Sheets("UBDateneingabe").Range("F2") & " wurde erstellt! Drucken?", vbYesNo, "Fertig!")
Case vbYes
ActiveSheet.PrintPreview
Case vbNo
MsgBox("Lieferschein öffnen?", vbYesNo)
End Select
The second Msgbox will have to open a file if yes is selected, and do nothing if no is selected, but I haven't even gotten that far yet. The printing works though!
Thank you!
maybe you can help me with the following bit of code that throws a syntax error on the second msgbox? I may be blind but I just can't see the problem :crying:
Select Case MsgBox("Ein Lieferschein zur Rechnung " & Sheets("UBDateneingabe").Range("E2") _
& " vom " & Sheets("UBDateneingabe").Range("F2") & " wurde erstellt! Drucken?", vbYesNo, "Fertig!")
Case vbYes
ActiveSheet.PrintPreview
Case vbNo
MsgBox("Lieferschein öffnen?", vbYesNo)
End Select
The second Msgbox will have to open a file if yes is selected, and do nothing if no is selected, but I haven't even gotten that far yet. The printing works though!
Thank you!