Discussion :

[2l_fr]

Bonjour à tous,

Mon problème est simple mais impossible de trouver la solution ...
J'ai défini une variable dans laquelle je renseigne l'adresse d'une cellule. L'objectif étant de réutiliser l'adresse de cette cellule dans une formule somme.

Cela donne actuellement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim A As String
Dim cell2 As String
 
 A = [A65536].End(3).Row
 Range("K" & A).Select
 cell2 = ActiveCell.Address(0, 0)
 ActiveCell.FormulaR1C1 = "=SUM(K2:" & cell2 & ")"

Lorsque j’exécute le code en Pas à Pas cela me donne dans ma cellule la formule suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SOMME('K2':'K802')

Or, comment me débarrasser de ces maudits " ' " qui empêche le calcul de ma formule ??

Je vous remercie pour votre aide !

Lucas

[Daniel.C]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.Formula = "=SUM(K2:" & cell2 & ")"

[Invité]

je ne comprends pas pourquoi sauvegarder la fonction somme dans une cellule.
supposons que K1=titre et K5=somme.

Code Formule EXCEL :

Sélectionner tout - Visualiser dans une fenêtre à part

=SOMME(DECALER(K1;1;0):DECALER(K5;-1;0))

il me suffis d’encadrer la plage de calcul par une fonction qui prend en compte le titre et la cellule de destination, ainsi je peux insérer ou supprimer une linge sans modifier ma formule.

[2l_fr]

Merci Daniel,

Je n'étais pas loin mais pour trouver ce détail qui fait la différence je n'aurai pas su où chercher !!

Au top !