Ouvrir un fichier excel depuis vb

Résolu
Signaler
Messages postés
27
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
21 septembre 2008
-
Messages postés
27
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
21 septembre 2008
-
Bonjour à tous je suis tout nouveau dans vb, alors beaucoup de mal.
Est ce que qqn peut m'aider.
alors voila j'ai sur ma form une textbox et un bouton de commande et jaimerais lorsque jai renseigné la textbox et cliquer sur le bouton que ca ouvre excel et que ca me marque ce quil y a d'ecrit dans ma textbox.
Est ce que qqn peut me donner les codes a tapper. Merci davance

3 réponses

Messages postés
220
Date d'inscription
jeudi 30 mars 2006
Statut
Membre
Dernière intervention
26 octobre 2007
1
'Demarrer Excel
Set DocExcel = CreateObject("Excel.Application")

'Supprime l'affichage des messages d'erreurs ou de confirmation de suppression, ...
DocExcel.DisplayAlerts = False

'Ajout un nouveau classeur
DocExcel.Workbooks.add

'ajout du texte
DocExcel.ActiveCell.FormulaR1C1 = textbox.text

Je ne l'est pas essayé, donc il et possible qu'il y ait des erreures
Messages postés
39
Date d'inscription
dimanche 28 novembre 2004
Statut
Membre
Dernière intervention
4 juin 2007

Bonjour,

Voici un exemple d'utilisation de excel en vb avec les quelles fonctions pour la mise en forme.
Cordialement

Set appxl = New Excel.Application
'ouverture du fichier excel
appxl.Visible = True
'nouveau classeur
appxl.Workbooks.Add

'réglage automatique des colonnes
appxl.ActiveSheet.UsedRange.Select
appxl.Selection.Columns.AutoFit

'Mettre une bordure
appxl.Range("a1" ).BorderAround Weight:=xlThin



'Mettre en gras

appxl.Range("a1" ).Font.Bold = True
Next



'Mettre une bordure


appxl.Range("a1").BorderAround Weight:=xlThin
appxl.Range("b1").BorderAround Weight:=xlThin

'réglage automatique des colonnes
appxl.ActiveSheet.UsedRange.Select
appxl.Selection.Columns.AutoFit

'Envoi des données vers excel


appxl.Range("a1" ).Value = Text1.Text
appxl.Range("c1" ).Value = Text2.Text
Messages postés
27
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
21 septembre 2008

Je vous remercie de m'avoir répondu


J'ai encore 1 autre petite question.
Si je veux ouvrir un fichier excel deja existant car il est deja renseigné avec des Titres, je mets koi comme code?
le nom de mon fichier excel est le suivant : "Bd1voiture.xls"
Merci d'avance