Problème en execution d'un bouton pour modifier un fichier Excel

**chebmo90** · 06/08/2009, 09h40

bonjour, En fait j'ai une applivation en VB.net et dans un module je veux ecécuter une macro dans un fichier Excel mais le problème c'est cette macro execute d'autre macro donc du coup il me remet un message derreur et me stope l'exécution .comment je peux faire?
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
23
24
25
26
27
28
29
30
31
32
 
 
Sub ModifierFeuilleExcel()
 
        'Déclaration des variables 
        Dim xlApplication As Object
 
        xlApplication = CreateObject("excel.application")
 
        With xlApplication
 
            .Workbooks.Open("C:\Documents and Settings\A2H16152\Bureau\FichierTestTesVis.dis-SBC.xls")
            .sheets("Importation").Range("J5") = NbreEchanti.Text
            .sheets("Importation").Range("I8") = DispMoteur.Text
 
            Dim i As Integer
 
            .sheets("Importation").Range("P17") = TextBoxKX.Text
            .sheets("Importation").Range("Q17") = TextBoxKY.Text
            .sheets("Importation").Range("R17") = TextBoxKZ.Text
 
            'lancement de la macro dans le fichier excel ouvert
            .Application.run("Macrok")
 
            'lancement de calcul de dispertion
            .Application.run("MacroCalDis")
 
            .Save()
            .Quit()
        End With
 
    End Sub

voilà l'exception :

Exception de HRESULT : 0x800A9C68

Merci pour votre aide .

**Chris@Xerox** · 06/08/2009, 10h55

Bonjour,

Ton problème ne viendrait-il pas du fait que MacroCalDis commence alors que Macrok n'a pas encore fini?

**chebmo90** · 06/08/2009, 11h35

Merci pour ta réponse , Je ne pense pas car quand je débogue il passe trés bien l'éxecution de la première macro "MacroK" et puis quand il lance la deuxieme il palnte ? "on me disant qu'un classeur n'existe pas ou il été modifié ou ..."