voila jai une procedure VB (une feuille Excel) qui me modifie le contenue de mes cellules (c sa macro qui le modifie )
or cette macro ne modifie que le contenue des cellules et jaimerais quil modifie aussi le code de certaines feuilles
le principe de cette feuille est de :
1: ouvrir la feuille
2: checker les cellules
3: remplacer les string par d'autres
4: fermer et sauver
moi je voudrais avoir un 3bis qui regarde le code alt+F11 (VBA)
puis le modifie de la meme facon
quelqun saurait il comment faire ???
un exemple du code existant :
"""""""""""""""""""""""""""""""""
For Each ws In Worksheets
ws.Activate
Call UnprotectSheet(ws, SheetLocked)
Set c = ws.Cells.Find("toto", LookIn:=xlFormulas, lookat:=xlPart, searchorder:=xlByRows, searchdirection:=xlNext, MatchCase:=False)
Do Until (c Is Nothing)
TypeFunction = 1
c.Select
c.Activate
If ActiveCell.HasArray Then 'if matrix present in the cell
formule = Selection.Formula
pos1 = InStr(formule, ";" )
Toto = Left(formule, pos1)
Field = Mid(formule, pos1 + 1, Len(formule) - pos1 - 1) & ","
pos2 = InStr(Field, "," )
....
....
....
"""""""""""""""""""""""""""""""""""