Sélectionner une plage contenant des variables

the jeremie · 17 Octobre 2012

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 · 17 Octobre 2012

Re : Sélectionner une plage contenant des variables

Bonjour,

modifie peut être ainsi :

Code:

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

bonne journée
@+

the jeremie · 17 Octobre 2012

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 · 17 Octobre 2012

Re : Sélectionner une plage contenant des variables

Re,

on peut faire un peu plus court :

Code:

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

the jeremie · 17 Octobre 2012

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

Sélectionner une plage contenant des variables

the jeremie

XLDnaute Nouveau

Pierrot93

XLDnaute Barbatruc

the jeremie

XLDnaute Nouveau

Pierrot93

XLDnaute Barbatruc

the jeremie

XLDnaute Nouveau

Discussions similaires