OVH Cloud OVH Cloud

Suppression d'un composant VBProject

3 réponses
Avatar
gerardjean
Bonjour,

je cherche à supprimer des composants d'un classeur (userform) via VBA.
l'instruction Workbooks(nom du classeur).VBProject.VBcomponents.Remove (nom
du composant) affiche l'erreur 438 (propriété ou méthode non gérée par cet
objet).
Auriez-vous une petite idée du Pb?

Salutations

NB. j'utilise Excel 2003

3 réponses

Avatar
lSteph
Bonjour,
dans VBE menu outils références as-tu coché Microsoft Vba extensibility?

lSteph

"gerardjean" a écrit dans le message
de news:
Bonjour,

je cherche à supprimer des composants d'un classeur (userform) via VBA.
l'instruction Workbooks(nom du classeur).VBProject.VBcomponents.Remove
(nom
du composant) affiche l'erreur 438 (propriété ou méthode non gérée par cet
objet).
Auriez-vous une petite idée du Pb?

Salutations

NB. j'utilise Excel 2003


Avatar
Ange Ounis
Comment est défini 'nom du composant' ?
La méthode Remove a besoin d'une définition complète de l'objet à supprimer :

Sub DelUserform(NomClasseur$,NomUserform$)
With Workbooks(NomClasseur).VBProject.VBComponents
.Remove .Item(NomUserform)
End With
End Sub

----------
Ange Ounis
----------

Bonjour,

je cherche à supprimer des composants d'un classeur (userform) via VBA.
l'instruction Workbooks(nom du classeur).VBProject.VBcomponents.Remove (nom
du composant) affiche l'erreur 438 (propriété ou méthode non gérée par cet
objet).
Auriez-vous une petite idée du Pb?

Salutations

NB. j'utilise Excel 2003


Avatar
gerardjean
Merci pour ta réponse, le résultat est OK


Comment est défini 'nom du composant' ?
La méthode Remove a besoin d'une définition complète de l'objet à supprimer :

Sub DelUserform(NomClasseur$,NomUserform$)
With Workbooks(NomClasseur).VBProject.VBComponents
.Remove .Item(NomUserform)
End With
End Sub

----------
Ange Ounis
----------

Bonjour,

je cherche à supprimer des composants d'un classeur (userform) via VBA.
l'instruction Workbooks(nom du classeur).VBProject.VBcomponents.Remove (nom
du composant) affiche l'erreur 438 (propriété ou méthode non gérée par cet
objet).
Auriez-vous une petite idée du Pb?

Salutations

NB. j'utilise Excel 2003