Results 1 to 3 of 3
  1. #1
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    msgbox, yes no (2000 sp 1)

    simple...

    i have this line of code, i would want to insert the tipical msgbox with YES/NO:

    COUNT = Application.Evaluate("=SUMPRODUCT((C5:C15000=""" & VAR_PERIODO & """)*(H5:H15000=""" & DATA & """))")

    If COUNT > 0 Then
    appear
    msgbox with yes/no
    if yes then call FILTRO
    if no exit sub

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: msgbox, yes no (2000 sp 1)

    Try this:

    Count = ...
    If Count > 0 Then
    If MsgBox("Do you want to apply a filter?", vbQuestion + vbYesNo) = vbYes Then
    Call Filtro
    Else
    Exit Sub
    End If
    End If

    Replace "Do you want to apply a filter?" with the appropriate question.

  3. #3
    Gold Lounger
    Join Date
    Jan 2004
    Location
    Italy
    Posts
    3,245
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: msgbox, yes no (2000 sp 1)

    TKS...(Good morning to new year, Hans!)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •