De VB dans Excel à VB dans Visual Studio Résolu/Fermé

Question

Bonjour,

J'ai composé quelques lignes VB sous macro Excel qui marchent parfaitement bien.
Pour avoir plus d'options, je suis passé sous Visual Studio qui râle lors de l'éxécution de ces lignes ....

Voici mon soucis:

afin d'activer un fichier Excel ouvert (nomé "arbre.xls"), j'ai frappé la fonction:

Windows("Arbre.xls").Activate (elle est incluse dans une sub)

Si celle-ci fonctionne sous Excel, Visual Studio bloque sur "Windows " et me dit "Procédure sub ou function non définie". 

Faut-il déclarer "Windows"? (set ... ) et si oui, comment ?
Est-ce autre chose?
 
Merci d'avance pour votre aide.

lermite222 · Answer

Bonjour,
Tu dois mettre la référence de ton excel.
et créer une instance d'excel (objet) dans VB
Il y a une multitude de tuto sur ce sujet.
A+

lermite222 · Answer

Et entre autre Ce tuto pour employer Excel dans VB6
A+

stettcher · Answer

Merci Lermite pour tes réponses qui m'ont bien éclairé.

Je pense qu'il faut aussi ajouter que sous VB 6 il faut cocher "Microsoft Excel" dans "Projet->Références" pour que le code pour Excel soit pris en compte.

Voici ce que ça donne:


Private Sub Command1_Click()

Dim appExcel As Excel.Application 
Dim wbExcel As Excel.Workbook 
Dim wsExcel, As Excel.Worksheet 

Set appExcel = CreateObject("Excel.Application")

Set wbExcel = appExcel.Workbooks.Open("c:\arbre.xls")

Set wsExcel = wbExcel.Worksheets(Famille) 'Pour l'onglet "famille

' Ici tout un tas d'opérations .... puis on quite

wbExcel.Save

wbExcel.Close 

appExcel.Quit 

End Sub


Cela fonctionne très bien si le chemin du fichier est correct.
 Je souhaiterais toutefois conserver l'idée du départ, c-à-d d'activer un fichier Excel déja ouvert (par exemple si le fichier est ammené à être déplacé sans être renommé).
Par quoi faut-il remplacer la ligne suivante [ Set wbExcel = appExcel.Workbooks.Open("c:\arbre.xls") ] vu que le [.Activate] ne fonctionne plus ?

Merci d'avance

lermite222 · Answer

Il n'est pas possible d'entrer dans un classeur qui est déja ouvert dans une autre instance d'excel.

stettcher · Answer

Pourtant en VB dans des macros Excel ça fonctionnait.
Il faut croire que Excel reconnait les siens ... dommage.

Merci encore une fois Lermite pour ton aide