Bonjour a tous je suis sous VB 6.3 et j'ai un petit soucis avec la fonction SUM()
voici mon code:

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
Sub Somme_gdtotal()
'
' Somme_gdtotal Macro
' Macro enregistrée le 23/08/2007 par  Paul
'
 
'
 
    Range("A1").Select
    Cells.Find(What:="gdtotal", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    debut = ActiveCell.Row
    colonne = ActiveCell.Column
    ActiveCell.Offset(1, 0).Select
    Selection.End(xlDown).Select
    fin = ActiveCell.Row
    ActiveCell.Offset(1, 0).Select
    ActiveCell.FormulaR1C1 = "=SUM(R[debut]C:R[fin]C)"
    ActiveCell.Offset(1, 0).Select
 
End Sub
Et j'ai un message d'erreur, alors que mes variables prennent bien les bonnes valeurs. Si je remplace les variables "debut" et "fin" par des chiffres ça fonctionne ???

Merci de votre aide
Polo