bonjour,
J'ai à nouveau un probleme.. Je souhaite faire une somme horizontale de valeurs dans un tableau excel. La ligne est la numéro 13. J'ai fait une macro, voici ce que ca donne :
Range("N24").Select
' ActiveCell.FormulaR1C1 = "=SUM(R[-2]C[-12]:R[-2]C)"
Alors j'ai essayé de faire un programme d'aprés cette macro et c'est je pense le "FormulaR1C1" que je n'arrive pas bien à saisir..
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
17
18
19
20
21
22 For i = 2 To 10000 cellule$ = "L" & Format(i) Contenu$ = ActiveCell.FormulaR1C1.Range If Contenu$ = client$ Then cellule$ = "13" & Format(i) somme = somme + ActiveCell.FormulaR1C1.Range End If Next i If Num_sem < 26 Then cellule$ = Chr$(65 + Num_sem) ElseIf Num_sem < 52 Then cellule$ = "A" & Chr$(64 + Num_sem - 25) Else cellule$ = "BA" End If cellule$ = cellule$ & "10" Range(cellule$).Select ActiveCell.FormulaR1C1 = somme
Quand je lance le programme pas à pas une erreur arrive à la ligne que j'ai mis en rouge , "erreur 424 : objet requis"
Quelqu'un a une idée de l'erreur?
Merci
Partager