Bonjour Forum!
Je cherche présentement à faire une macro qui vient récupérer des valeurs dans une feuille excel et qui les copie dans un module du workbook.
J'ai exploré sur deux façons:
La première:
La deuxième:
Pouvez-vous m'aider?
Je cherche présentement à faire une macro qui vient récupérer des valeurs dans une feuille excel et qui les copie dans un module du workbook.
J'ai exploré sur deux façons:
La première:
Code:
Range("A1:C8").Copy
ActiveWorkbook.VBProject.VBComponents("Module4").Select
CodeModule.Lines(22, 1).PasteLa deuxième:
Code:
Dim VBProj As VBIDE.VBProject
Dim VBComp As VBIDE.VBComponent
Dim CodeMod As VBIDE.CodeModule
Dim LineNum As Long
Const DQUOTE = """" ' one " character
Set VBProj = ActiveWorkbook.VBProject
Set VBComp = VBProj.VBComponents("Module4")
Set CodeMod = VBComp.CodeModule
With CodeMod
[I]Ici, je ne trouve pas comment sélectionner la ligne 22 et de copier[/I]
End With
End SubPouvez-vous m'aider?