the jeremie
XLDnaute Nouveau
Bonjour, je voudrais sélectionner une plage de 5 cases pour recopier une formule et écrémenter cette plage sur les lignes et les colonnes. Mais je sais pas comment procéder.
Voila le code que j'ai tenté, mais il bloc à Range("col,lig:col+4,lig") , chose que je me doutais, mais je sais pas comment exprimer cela avec une autre commande que Range
Merci d'avance de vos réponses
Voila le code que j'ai tenté, mais il bloc à Range("col,lig:col+4,lig") , chose que je me doutais, mais je sais pas comment exprimer cela avec une autre commande que Range
Sub bilan()
'
' bilan Macro
'
'
col = 6
lig = 6
som = 0
For lig = 6 To 62
Sheets("feuill1").Select
Cells(lig, col).Select
ActiveCell.FormulaR1C1 = "=feuill2!RC[-3]+feuill3!RC[-3]+feuill4!RC[-3]"
Cells(lig, col).Select
selection.AutoFill Destination:=Range("col,lig:col+4,lig"), Type:=xlFillDefault
lig = lig + 1 'car je veux incrémenter les lignes de 2 en 2
Next i
End Sub
Merci d'avance de vos réponses