recupérer a valeur d'une cellule d'un fichier Excel dans une variable
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:
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.
