Recopier une formule toutes les X lignes via macro

Pierrot93

XLDnaute Barbatruc

• 8 Novembre 2013

• #2

Re : Recopier une formule toutes les X lignes via macro

Bonjour,

regarde ceci :

Code:

    Range("B5:B1515").FormulaR1C1 = "= RIGHT(RC[-1])"

c'est pour l'exemple...

bonne fin d'après midi
@+

 

Vote positif 0 Vote négatif

L

LPandre

XLDnaute Impliqué

• 8 Novembre 2013

• #3

Re : Recopier une formule toutes les X lignes via macro

Salut Pierrot,
ça marche pô ! =>

Elle saute pas de 15 lignes en 15 lignes, qui est vraiment indispensable , car il y a du texte entre ces quinze lignes.

 

Dernière édition: 8 Novembre 2013

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 8 Novembre 2013

• #4

Re : Recopier une formule toutes les X lignes via macro

Re,

aarf... j'avais zappé ca :

toutes les 15 lignes dans la colonne B

Cliquez pour agrandir...

mofifie comme suit :

Code:

Dim i As Long
For i = 5 To 1515 Step 15
    Cells(i, 2).FormulaR1C1 = "= RIGHT(RC[-1])"
Next i

 

Vote positif 0 Vote négatif

L

LPandre

XLDnaute Impliqué

• 8 Novembre 2013

• #5

Re : Recopier une formule toutes les X lignes via macro

YES !!

MERCI Pierrot.

 

Vote positif 0 Vote négatif