vbYesNo as a Function

nightcrawler23

Well-known Member
Joined
Sep 24, 2009
Messages
721
Just as we can have a msgbox return the values vbyes, vbno, vbcancel how can i make function return this.

Below is a code i wrote. but this gives me an error "Argument not optional" and the function name is highlighted.

Code:
Sub sheetExist(prop As String)
Dim sh As Worksheet

For Each sh In ThisWorkbook.Worksheets
    If sh.Name = sh.CodeName & "_" & prop Then
        sheetExist= MsgBox("sheetExist", _
            vbYesNoCancel & vbCritical, "Property Match")
        Exit For
    End If
Next sh

End Sub
 

Excel Facts

Copy formula down without changing references
If you have =SUM(F2:F49) in F50; type Alt+' in F51 to copy =SUM(F2:F49) to F51, leaving the formula in edit mode. Change SUM to COUNT.
Try renaming it from a sub to a function.
It looks like it's trying to call itself without the parameter.
 
Upvote 0

Forum statistics

Threads
1,224,599
Messages
6,179,828
Members
452,946
Latest member
JoseDavid

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top