View Single Post
 
Old 08-26-2020, 08:36 AM
NoSparks NoSparks is offline Windows 10 Office 2010
Excel Hobbyist
 
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 831
NoSparks is just really niceNoSparks is just really niceNoSparks is just really niceNoSparks is just really niceNoSparks is just really nice
Default

you could omit the type=1 and deal with what's returned, something along the lines of

Code:
Sub Macro1()
    '
    ' Macro1 Macro
    
    Dim lnWins As Variant
    
    lnWins = Application.InputBox("give me something")
    
    Select Case lnWins
        Case ""
            MsgBox "InputBox was left blank"
        Case False
            MsgBox "Things got canceled"
        Case Else
            MsgBox lnWins
    End Select
End Sub
Reply With Quote