Commandbar Exists


Function CbExists(sCbName As String) As Boolean

    ‘Returns true if sCbName is the name of an existing
    ‘commandbar.
    
    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.