resultat.Value = calcul.Sum(debut, fin) /i mais à la derniere ligne, j'ai une erreur:
"La référence d'objet n'est pas définie à une instance d'un objet."
Et il n'est pas possible d'instancier "Calcul" ....
cs_Jack
Messages postés14006Date d'inscriptionsamedi 29 décembre 2001StatutModérateurDernière intervention28 août 201579 15 févr. 2010 à 11:14
Salut
As-tu bien déclarer une référence à Office.Excel dans ton projet ?
Comme le dit le message d'erreur, il manque la déclaration de l'application Excel sur laquelle repose les fonctions :
Dim appExcel As Microsoft.Office.Interop.Excel.Application
appExcel = New Microsoft.Office.Interop.Excel.Application
MsgBox(appExcel.WorksheetFunction.Sum(1, 22))
Vala
Jack, MVP VB NB : Je ne répondrai pas aux messages privés
Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
cs_yaya60
Messages postés16Date d'inscriptionjeudi 18 mars 2004StatutMembreDernière intervention27 janvier 2012 15 févr. 2010 à 15:58
Oui, excel.application était bien instanciée.
Grace à ta réponse et à quelques autres du forum, voici ce qui fonctionne pour moi.
(NB: il semble que l'utilisation des références de cellules pose des problemes de syntaxe avec les fonctions ...)
[i]Dim MyExcel As Excel.Application
Dim MyWorkBook As Excel.Workbook
Dim MyWorkSheet As Excel.Worksheet
MyExcel = New Excel.Application
Dim plage3 As Excel.Range = MyWorkSheet.Range(MyWorkSheet.Cells(1, 1), MyWorkSheet.Cells(1, 4))