Possible de copier une formule dans la cellule voisine avec formulaR1C1???
Bonjour
j'ai ce tableau ci-dessous et je voudrais copier la formule en B2 dans les cases C2 D2 F2 etc...
je voudrais donc avoir ca
En vba j'ai tenté ca:
Sub sous_tot()
For col = 3 To 5
Cells(2, col).FormulaR1C1 = "=RC[-1]"
Next
End Sub
mais ca me copie la valeur en A2. En gros j'ai ca:
Je dois corriger quoi pour avoir la 2e image?
merci
Bonjour,
essai avec ceci :
.FormulaR1C1 = "=SUBTOTAL(9,R[1]C:R[12]C)" au lieu du "=RC[-1]"
je ne peux pas utiliser cette méthode car la somme ne sera pas forcément sur toutes les lignes du de dessous.
ca peut par exemple être un sous-total entre les lignes 5 à 12 uniquement.
ce sera la formule en A2 qui détermines les lignes du haut et du dessous.
c'est pourquoi je veux juste recopier la formule en A2 et l'appliquer sur les autres cellules.
Est-ce possible?
Bon matin,
En toute simplicité
Sub cop_2()
'
' cop_2 Macro
'
'
Range("B2").Select
Selection.Copy
Range("C2:F2").Select
ActiveSheet.Paste
End Sub