Tuer un usf par une macro

[BenHarber]

Bonjour le Forum,
Pouvez-vous me dire s'il est possible de supprimer un userform à partir d'une macro (située dans le même fichier que l'usf en question) ?
Si oui, quel est le code ?
Merci d'avance pour vos réponses.

Cordialement,

 

[Creepy]

Re : Tuer un usf par une macro

Bonjour le Forum, BenHarber,

Ci-joint un lien vers Excelabo avec un exemple. A toi d'adapter le code pour correspondre à ton besoin

Les astuces excel d'Excelabo : Les Macros

A+

Creepy

 

[MichelXld]

Re : Tuer un usf par une macro

bonjour BenHarber, bonjour Creepy

tu peux utiliser

Sub suppressionUSF()
    'Nécéssite d'activer la référence
    'Microsoft Visual Basic for Applications Extensibility 5.3
    
    'L'UserForm ne doit pas être en cours d'affichage
    Dim VBComp As VBComponent
    
    Set VBComp = ThisWorkbook.VBProject.VBComponents("UserForm1")
    ThisWorkbook.VBProject.VBComponents.Remove VBComp
End Sub

L'UserForm ne doit pas être en cours d'affichage.


bon apres midi
MichelXld

 

[BenHarber]

Re : Tuer un usf par une macro

Creepy, Michel XlD
Merci à vous 2 pour vos réponses, toujours rapides et précises !
Ca me va bien.
Merci.

Cordialement,