automate modifiant du code [VB-Excel] - Programmation
Marsh Posté le 04-12-2001 à 11:11:55
Je sais que sais possible de modiffier le code VBA par un macro VBA... mais je ne l'ai jamais fait...
Regarde dans la doc sous VBE (Visual Basic Environement)
Marsh Posté le 04-12-2001 à 13:37:55
Je crois qu'il faut référencer dans ton projet VB ou ta feuille VBA la bibliothèque 'Microsoft Visual Basic 6.0 Extensibility' pour avoir accès aux modules de code
Désolé, je n'ai pas d'exemple sous la main.
A+
Marsh Posté le 30-11-2001 à 16:21:43
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, "," )
....
....
....
"""""""""""""""""""""""""""""""""""