codigo vba para checar se uma determinada macro existe

[Humm]

salve.

como checar via codigo vba se uma determinada macro existe?

[Marcelo_2]

ehae..

Essa rotina é do Mestre Machadinho (Infoexame)... tenta adaptar ahe:

Function ExisteConsulta(sConsulta As String) As Boolean
set db=Opendatabase("c:\XXX\xxx.mdb")
bTmp=False
For Each qd In db.QueryDefs
  If qd.Name = sConsulta Then
    bTmp = True
    Exit For
  End If
Next
ExisteConsulta = bTmp
End Function

Editado Março 13, 2011 por Marcelo_2