Sélectionner une plage contenant des variables

[the jeremie]

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

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

 

[Pierrot93]

Re : Sélectionner une plage contenant des variables

Bonjour,

modifie peut être ainsi :

    Selection.AutoFill Destination:=Range(Cells(lig, col), Cells(lig, col + 4)), Type:=xlFillDefault

bonne journée
@+

 

[the jeremie]

Re : Sélectionner une plage contenant des variables

Merci, de ton aide. le code fonctionne. et en plus j'ai compris ton code et pas recopier bètement... Je progresse.

 

[Pierrot93]

Re : Sélectionner une plage contenant des variables

Re,

on peut faire un peu plus court :

    Selection.AutoFill Destination:=Cells(lig, col).Resize(, 5), Type:=xlFillDefault

 

[the jeremie]

Re : Sélectionner une plage contenant des variables

étant débutant, la version longue me convient puisqu'elle marche et simple a comprend. Après merci pour l'info, c'est toujours bon à savoir pour optimiser le code