Commandbar Exists

Function CbExists(sCbName As String) As Boolean

    ‘Returns true if sCbName is the name of an existing
    On Error Resume Next
        CbExists = Not Application.CommandBars(sCbName) Is Nothing
    On Error GoTo 0
End Function

Posted in Uncategorized

One thought on “Commandbar Exists

  1. I don’t know about anyone else, but my initial response time on this blog is getting even slower than JWalk’s.

Posting code? Use <pre> tags for VBA and <code> tags for inline.

Leave a Reply

Your email address will not be published.