Procédure pour modifier un userform et un classeur fermé
Fermé
titdebutant
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour,
je souhaite injecter une modification d'un userform et des feuilles dans un classeur fermé.
J'ai tenté la procédure avec un fichier ouvert, mais ce n'est pas possible apparemment car lorsque le fichier cible s'ouvre, il ouvre directement un userform par macro et donc je ne peux plus le supprimer.
est ce que c'est possible avec un classeur fermé ?
voici le bout de code que j'utilise :
je souhaite injecter une modification d'un userform et des feuilles dans un classeur fermé.
J'ai tenté la procédure avec un fichier ouvert, mais ce n'est pas possible apparemment car lorsque le fichier cible s'ouvre, il ouvre directement un userform par macro et donc je ne peux plus le supprimer.
est ce que c'est possible avec un classeur fermé ?
voici le bout de code que j'utilise :
Dim VBComps As Object
Set VBComps = ActiveWorkbook.VBProject.VBComponents
With VBComps("Vacances")
Select Case .Type
Case 100
With .CodeModule
.DeleteLines 1, .CountOfLines
End With
Case Else
VBComps.Remove VBComps("Vacances")
End Select
End With
ThisWorkbook.VBProject.VBComponents("Vacances").Export _
ThisWorkbook.Path & "\UserForm1.frm"
ActiveWorkbook.VBProject.VBComponents.Import ActiveWorkbook.Path & "\" & "UserForm1.frm"
Kill ThisWorkbook.Path & "\" & "UserForm1.frm"
Kill ThisWorkbook.Path & "\" & "UserForm1.frx"
A voir également:
- Procédure pour modifier un userform et un classeur fermé
- Modifier dns - Guide
- Modifier liste déroulante excel - Guide
- Modifier l'extension d'un fichier - Guide
- Rouvrir un onglet fermé - Guide
- Modifier story facebook - Guide
Merci de poster toutes tes questions sur le même post en cliquant sur le bouton "répondre" en bleu. Ce sera plus simple pour te suivre...
Strumpfette, modératrice.