Redéfinir par macro une formule copiée

[Colasmar]

Bonjour,
Je ne m'en sort pas avec un problème qui est pourtant probablement simple.
Je veux que ma macro copie une formule d'une cellule vers une autre mais en changeant une partie des références.
Par exemple ma formule en F30 est
=BDLire(F24:I29;2;AB29:AB30)
Je veux la recopier en F32 et qu'elle devienne
=BDLire(F24:I29;2;AB31:AB32)
Donc que les références de la base de données restent fixes et changer les références de la zones de recherche. Evidemment je ne peux utiliser des références absolues ou un nom sur la base de données car elle peut changer de place.
J'ai essayé de récupérer la formule dans une variable mais je n'y arrive pas et, de toutes les façons, après je ne sais pas comment en changer certaines données.

Volia si certains ont des idées mercie beaucoup.
Amicalement et bon week-end.

 

[pierrejean]

un petit exemple serait bien plus simple a travailler
peux-tu reduire un fichier de facon a ce que le zip soit < 50k
et nous le poster

 

[porcinet82]

Salut Colasmar,

Peut etre de la manière suivante mais j'ai pas testé :

for j=1 to 3
i=29
k=30
'=BDLire(F24:I29;2;AB' & i & ':AB' & i
i=i+2
next j

@+

Edition: Salut PierreJean, on s'est croisé

Message édité par: porcinet82, à: 04/02/2006 17:22

 

[Jacou]

Bonjour à tous
pour récupérer la formule contenue dans la cellule F30 dans une variable
formule$ = Range('F30').Formula

 

[Euh difficile de poster un exemple]

Pas facile de vous poster un exemple pas trop lourd. En effet je me suis embarqué dans un truc un peu complexe.
Mais ma question est simplement :
1) comment je peux récupérer une formule se trouvant dans une cellule de mon tableau (par exemple à l'intérieur d'une variable)
2) à partir de cette formule récupérée comment intervenir dessus avant de la réinjectée dans une autre cellule (sachant que pour ma part la modification porte sur le fait de décaler d'une ligne certaines références).

Je vais essayer le truc avec les post de jacou et porcinet