Discussion :

[bakman]

bonjour je souhaite supprimer un module à partir de vba

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim vbProj As object
Set wk = Application.Workbooks.Open(Application.FileDialog(msoFileDialogFilePicker).SelectedItems(1))
Set vbProj = wk.VBProject
vbProj.VBComponents.Remove vbProj.VBComponents.Item("moduleARemplacer")

Jusque ici ca fonctionne or quand je veux le remplacer je me retrouve avec le nouveau module importer qui porte comme nom "moduleAremplacer1" j'ai donc
choisi d'utiliser ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
wk.RefreshAll

Ce qui a pour but de rafraichir le projet vba de facon a faire disparaitre le module supprimé. Mais il ne disparait que si j'arrete l'execution
juste apres la suppression mais le problème persiste je m'aprecois de ca ce matin mais pourtant il me semble que cela fonctionné bien avant ...

[bakman]

Je me suis aperçu qu'il faut sortir du sub courant pour que le projet soit rafraichi!

solution:
j'effectue ma suppression puis avant de réimporté le module j'ai met en timer la fonction d'import à 1 sec le code arrete son execution ce qui force le rafraichissement. Et rappel ma fonction d'import

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
    Call deleteModule
    Application.OnTime Now + TimeValue("00:00:01"), "importModule"
    Exit Sub