I've written the following code to ask a user if there are any cash receipts to input:
Code
Sub addCashReceipts()
cshRec As String
If MsgBox("Any cash receipts?", vbYesNo) = yes Then
cshRec = InputBox("Input cash receipt:")
End If
End Sub
Display More
How do i cause this to keep repeating until the user selects no?