bonjour,
voici ce que je cherche a faire:
j'ai dans une colonne :

colonne B
1
2
3
4
...


dans la colonne voisine je veux, dans la colonne C:
R01 'sur la meme ligne que 1
R02
R03
R04


voila pour les details, j'ai un bouton aui ajoute des lignes dans un tableau... la colonne C contient la formule "R" & B1
voila apres avoir fait ma copie, je mets dans la colonne B :
pour B4 : b3 + 1
pour B5 : b4 + 1

et dans la colonne C :

je recherche a mettre le ;formulaR1C1 qui va bien mais je galere

sinon je fais tout ca grace a un for que voici :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
    For idLigne = lastCellRowID To lastCellRowID - 1 + nbLigneAAjouter
 
'       FeuilleGestionDesRisques.Cells(idLigne, myRangeID.Column).Value = FeuilleGestionDesRisques.Cells(idLigne - 1, myRangeID.Column).Value + 1 ' compteur invisible
        FeuilleGestionDesRisques.Cells(idLigne, myRangeID.Column + 1).FormulaR1C1 = "=RC[-1]" ' compteur visible
 
'voici ce que j'ai essayé de faire (en commentant les deux lignes precedentes)
 
'       FeuilleGestionDesRisques.Cells(idLigne - 1, myRangeID.Column).Copy
'        FeuilleGestionDesRisques.Cells(idLigne, myRangeID.Column).PasteSpecial xlPasteAllExceptBorders, xlPasteSpecialOperationAdd
 
'        FeuilleGestionDesRisques.Cells(idLigne - 1, myRangeID.Column + 1).Copy
'        FeuilleGestionDesRisques.Cells(idLigne, myRangeID.Column + 1).PasteSpecial xlPasteFormulasAndNumberFormats, xlPasteSpecialOperationAdd
 
 
    Next idLigne