Formule transformomer en VBA

[maval]

Bonjour,

Voila j'ai une formule pour mettre les n° de tables 2 par 2 qui fonctionne très bien j'aimerai si possible changer la formule en code VBA.

Ma formule:

=SI(OU(MOD(LIGNE();2)=0;G3=0;G3="");"";ENT(LIGNES(G$3:G3)/2)+1)

Je joint mon exemple

Cordialement

Maval

 

[vgendron]

Re : Formule transformomer en VBA

Salut
voir PJ
l'idée est d'écrire ta fonction dans une chaine formule
puis faire cells(x,y).formulalocal=formule

 

[JCGL]

Re : Formule transformomer en VBA

Bonjour à tous,

Peux-tu essayer :

Range("F3:F101").Formula = "=IF(OR(MOD(ROW(),2)=0,RC[1]=0,RC[1]=""""),"""",INT(ROWS(R3C[1]:RC[1])/2)+1)"

A + à tous

 

[maval]

Re : Formule transformomer en VBA

Bonjour JCGL, Vgendron,

Je vous remercie et vous souhaite une bonne journée.

@+

Max