Créer fichier excel sous VB

Signaler
Messages postés
8
Date d'inscription
lundi 14 mai 2012
Statut
Membre
Dernière intervention
10 mai 2013
-
lalouss34
Messages postés
8
Date d'inscription
lundi 14 mai 2012
Statut
Membre
Dernière intervention
10 mai 2013
-
Bonjour,
je viens de créer un soft de gestionnaire de planning. J'ai une fenêtre où l'utilisateur doit rentré des informations pour la création d'un planning et j'aimerai généré ces données dans un fichier excel de façon à afficher le planning fini.
Il faudrait donc que je récupère les données saisi par l'utilisateur sur VB pour les importé dans un fichier excel. J'ai crée un bouton "Générer au format excel" et la référence microsoft library est activé dans visual studio. Help please !!!

3 réponses

Messages postés
14655
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
23 février 2020
139
Bonjour,

Pour exporter vers Excel, il te faut déjà savoir faire du VBA.
Car lors de l'"automatisation d'Excel", c'est surtout des commandes VBA, même si tu développe en VB.NET.

---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualVasic (onglet Références dans les propriétés du projet).
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list
---
Messages postés
8
Date d'inscription
lundi 14 mai 2012
Statut
Membre
Dernière intervention
10 mai 2013

Je viens d'aller voir.

Dim/color ApExcel As Object


ApExcel = CreateObject("Excel.application") 'creer un objet
ApExcel.Visible = True ' vous pouvez voir Excel
ApExcel.Workbooks.Open(Filename:="chemin du classeur.xls") 'on ouvre le classeur
ApExcel.Sheets(1).Cells(1, 1).Value = "Saimyas" 'on écrit dans le classeur et la à place de 'Saimyas' je met le nom de mes TextBox ?
ApExcel.ActiveWorkbook.SaveAs(Filename:=
"Chemin du classeur.xls", _
Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False) 'on enregistre le classeur
ApExcel.ActiveWorkbook.Close() 'on ferme le classeur
ApExcel.Visible = False 'on ferme Excel
Messages postés
6566
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
24 février 2020
95
Bonjour,
J'ai répondu à cette question dans un précédent post:

http://www.vbfrance.com/forum/sujet-CREER-FONCTION-SOUS-VB2008-PERMET-CREER-OUVRIR-ECRIR_1510865.aspx


@+Le Pivert