De VB dans Excel à VB dans Visual Studio
Résolu
stettcher
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
stettcher Messages postés 8 Date d'inscription Statut Membre Dernière intervention -
stettcher Messages postés 8 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- De VB dans Excel à VB dans Visual Studio
- Vb - Télécharger - Langages
- Liste déroulante excel - Guide
- Telecharger fl studio 20 pour pc gratuit complet - Télécharger - Édition & Montage
- Word et excel gratuit - Guide
- Aller à la ligne dans une cellule excel - Guide
5 réponses
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+
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+
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
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
Il n'est pas possible d'entrer dans un classeur qui est déja ouvert dans une autre instance d'excel.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question