Bonjour,

Je suis sous ACCESS 2002 SP3 et je ne sais pas comment supprimer les modules de Formulaire.

Je n'ai aucun problème pour supprimer un Module Général, ni pour supprimer les lignes de code à l'intérieur d'un Modules de Formulaire, mais je reçois un message d'erreur lorsque j'essaie de supprimer l'objet Module lié à un Formulaire.

Voici le code que j'utilise, ça marche pour un Module Général, mais ça ne marche pas pour un Module de Formulaire.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub SupprimerModule(NomMod As String)
   Dim VBC As Object
   With Application.VBE.ActiveVBProject
      For Each VBC In .VBComponents
         If VBC.Name = NomMod Then
            VBComponents.Remove VBC
            Exit Sub
         End If
      Next VBC
   End With
End Sub
Si quelqu'un peut m'expliquer mon erreur ou bien me trouver le code VBA adapté pour supprimmer un Module de Formulaire, je lui en serai reconnaissant.

D'avance merci