Re: DEMO ==> Liste Deroulante Dynamique
Bonsoir tout le monde
Salut Vériland
Je m'excuse de m'insérer dans ce post mais comme je vois que vous êtes là tout les deux, voilà mon problème:
J'ai voulu installé ton programme " PostVL " et j'ai eu cette erreur.
Public Sub SupprimeBarreMenu()
Dim IndexBarre As Long
On Error Resume Next
IndexBarre = CommandBars(MesMacros).Index --------- erreur d'éxécution "5":
Argument ou appel de procédure incorrect
If IndexBarre = 0 Then IndexBarre = 1
CommandBars(IndexBarre).Controls(NomBarre).Delete
End Sub
Comme j'ai vu que c'était la barre de Mes Macros, j'ai pensé qu'en installant le programme de Ti ( que je salue ),
l'erreur partirai.
Mais j'ai eu la même erreur.
Function TestBarreMenu() As Boolean
Dim LBar As CommandBar
On Error Resume Next
Set LBar = CommandBars(NomBarre) --------- erreur d'éxécution "5":
Argument ou appel de procédure incorrect
TestBarreMenu = Not LBar Is Nothing
On Error GoTo 0
End Function
J'ai XP.
C'est peut-être ça car avec " USF_XLD_ContactsV2 " de @+Thierry, j'avais eu pas mal de problèmes
avec cette version.
Si vous pouviez regardé, ce serait pas mal. ( rien ne presse, c'est vendredi et il faut un peu décompréssé
avant le week-end ).
Bon week-end et A+
Salut ;o)