Comment ouvrir un fichier dans un classeur actif? VB.NET 2008

Question

J'ai un programme qui filtre les données et les affiche ensuite dans un fichier délimité tabg. J'utilise ensuite Excel Interop pour ouvrir ce fichier dans Excel car la sortie directe vers une feuille de calcul prend trop de temps. Donc, je suis actuellement en utilisant ce code:

AD.DF.WriteToFile(vbTab) 
    Dim WB As Workbook = ExcelApp.Workbooks.Open(AD.DF.DatafileInfo.WriteToFileLocation) 
    ExcelApp.Visible = True 

La première ligne prend les données filtrées et les sorties vers un fichier délimité par des tabulations. La deuxième ouvre ce même fichier dans un nouveau classeur dans Excel. Et évidemment le troisième rend Excel visible. Voici mon problème cependant: maintenant, lorsque ce code est exécuté, il y a deux classeurs ouverts. J'ai déjà un classeur actif et je voudrais juste ouvrir ce fichier dans ce classeur.

Si c'est possible, comment puis-je le faire? Merci.

Answer 1

Dans le code, j'ai créé un objet qui est un classeur Excel. J'ai ensuite défini le classeur créé comme ExcelApp.ActiveWorkbook. Ensuite, j'ai été en mesure d'ouvrir le fichier sans qu'un autre classeur soit créé.

Answer 2

Regardez la fonction GetObject.

Dim MyXL As Object 
MyXL = GetObject(, "Excel.Application") 

devrait vous fournir une référence à l'instance en cours d'exécution d'Excel.