Bonjour,
je voudrais calculer le total des valeurs de plusieurs cellules Excel à partir d'access grâce à VBA j'ai fais un code mais le débogueur s'arrete toujours au même endroit avec une erreur d'exécution 438. Je suis bloqué et un peu perud je l'avoue.

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
For indLine = 2 To rstListeOrganisme.RecordCount + 1
        For indColumn = 2 To (2 + 4 * (rstlisteModPaiement.RecordCount - 1)) Step 4
            cptOutil = .Cell(indLine, indColumn).Select + cptOutil
        Next indColumn
        .Cells(indLine, indColumn) = cptOutil
        cptOutil = 0
        For indColumn = 4 To (4 + 4 * (rstlisteModPaiement.RecordCount - 1)) Step 4
            cptOutil = cptOutil + .Cell(indLine, indColumn).Select
        Next indColumn
        .Cells(indLine, indColumn) = cptOutil
        cptOutil = 0
    Next indLine
ne peux t'on pas utiliser .cell pour récupérer la valeur d'une cellule? Car même avec cell(i,j).value ça ne marche pas!!!!


Merci.