Ouvrir classeur xlsm avec VB6

Question

Bonjours,
S&#8217;il vous plait cela fait longtemps que je cherche une solution à mon problème mais en vain.
En fait, j&#8217;ai un classeur Excel .xlsm (avec des macros) et je veux l&#8217;ouvrir avec VB6.
Prière de m&#8217;aider.
Cordialement
Imy55

lolokun · Answer

Bonjour,

Il y a une différence entre ouvrir un fichier xls et xlsm? 
Qu'as tu déjà essayé comme code??

L'expérience, c'est une connerie par jour, mais jamais la même..

cs_Jack · Answer

Salut

Il te suffit d'ajouter à ton projet une référence à "Microsoft Excel XX.0 Object Library" où tu remplaces le XX par le n° de version de ton office (11=2003, 12=2007 et 14 pour 2010)

Ensuite, tu pourras dimensionner des objets propres à Excel, par exemple :
    Dim ExcelApp As Excel.Application
    Dim ExcelWbk As Excel.Workbook

    Set ExcelWbk = ExcelApp.Workbooks.Open("C:\mon fichier.xlsm")
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)

Imy55 · Answer

Voici le code que j'utilise (il ouvre des fichier .xls que .xlsm).Mais toujours à l'extérieur de la form ce que je veux c'est ne pas sortir de l'application et afficher le classeur à l'intérieur de la form.
merci pour votre réponse et j'espère que mon problème est plus claire mnt.


Private Sub Command1_Click()

Dim XlApp As Excel.Application

'Créer l'appli excel
Set XlApp = New Excel.Application

'Afficher l'appli excel
XlApp.Visible = True

'Ouvrir le fichier excel
XlApp.WorkBooks.Open "C:\Documents and Settings\Administrator\Desktop\PE.xlsm"

End Sub

cs_Jack · Answer

Ah, ouvrir le classeur et l'afficher !
Détail qui m'échappait, puisque tu ne parlais de macros.

Mais que veux-tu faire ?
Si ce n'est que pour lancer Excel et que tu n'as pas besoin de liaison entre ton programme et les données, pas la peine de se compliquer la vie, l'API ShellExecute le fait très bien.

Si tu veux faire ça et limiter la zone de travail à une des formes de ton application, se sera plus délicat : Il faut utiliser l'API SetParent pour dire à Excel (du moins l'interface client de Excel) que son parent est la forme.
Il te faut donc retrouver le Handle de Excel après l'avoir lancé, puis appliquer le SetParent (le Handle de la forme VB est dans maForme.hWnd).

 Méfie-toi, SetParent peut provoquer des crash de l'application VB : Prends bien soin de sauvegarder ton appli avant chaque essai.

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)

Imy55 · Answer

[i]Bonsoir,
Je suis débutante en VB, ça fait pas longtemps que je travail avec et je cherche un code simple pour afficher Excel dans objet VB .
Comment puis je travailler avec l&#8217;API ShellExecute. Si vous avez un tuto ou bien si vous vous rappeler d&#8217;un code source déjà déposé sur le site filez le moi.
Désolé pour le dérangement
Cordialement
Imy55
/i

cs_Jack · Answer

ShellExecute : Une simple recherche de "ShellExecute" parmi les sources sauf .Net te répondra.

On ne sait toujours pas ce que tu veux faire avec ton fichier Excel.
Si tu n'as besoin que d'afficher des données, tu peux aussi ajouter un objet Excel directement sur ta forme :
Ctrl-T pour faire apparaitre l'ajout de composant + onglet "Objet à insérer" et tu recherches "Feuille de calcul Microsoft Excel".
Ne me demande pas comment ça marche, ça doit être décrit dans l'aide.

Ouvrir classeur xlsm avec VB6

6 réponses

Votre réponse

Discussions similaires