Bonjour,
Je souhaite savoir si il est techniquement possible d'insérer des commentaires avant une macro automatiquement (interagir avec l'éditeur VBA).

J'ai un fichier qui contient les données suivantes :
Nom macro;Role;Appelée par

Actuellement j'utilise cette macro pour générer des commentaire et manuellement j'insère ces commentaires avant les macros.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub EcrireTxt()
    Dim Fs As Object, A As Object
    Dim i As Long
 
    Set Fs = CreateObject("Scripting.FileSystemObject")
    Set A = Fs.CreateTextFile("C:\Users\Documents\commentaire.txt", True)
    With Sheets("Feuil1")
        For i = 2 To .Cells(.Rows.Count, "A").End(xlUp).Row
            A.WriteLine ("'--------------------------------------------------------------")
            A.WriteLine ("'Nom Macro : " & .Range("A" & i).Value)
            A.WriteLine ("'Appelée par : " & .Range("C" & i).Value)
            A.WriteLine ("'Rôle : " & .Range("B" & i).Value)
            A.WriteLine ("'--------------------------------------------------------------")
            A.WriteLine (vbCrLf)
        Next i
    End With
    A.Close
    Set A = Nothing
    Set Fs = Nothing
End Sub
L'objectif est donc si possible d'automatiser cette dernière étape.

Cependant ma demande est peut être impossible à réaliser. Je n'ai vu aucune ressource parlant de cette possibilité.
Éventuellement y'aurait-il des alternative ?

Merci.