Lien excel VBA

Résolu
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006 - 27 mars 2005 à 14:33
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006 - 27 mars 2005 à 20:09
Bonjour, je viens tout juste de commencer à apprendre le VB et donc je me heurte à quelques problèmes qui sont simples à résoudre je pense mais pour un débutant c loin d'être évident ;-).
Donc imaginez un form sous VB6 dans ce form il y a un label pour rentrer le nom d'une personne et un deuxième label pour entrer son prénom.
Ce que je voudrais c'est que quand je clique sur le bouton ok, j'aille inscrire dans une feuille Excel le nom de la personne rentrer prédemment dans la case A1 de la feuille Excel et le prénom dans la case B1.
Merci beaucoup de me filer un ptit coup de main :)

2 réponses

pjcleder Messages postés 183 Date d'inscription jeudi 4 février 2010 Statut Membre Dernière intervention 16 septembre 2011 11
27 mars 2005 à 19:54
PAT

Ajoute dans les references de ton projet : Microsoft Excel Oject Library

Colle ce code derrière ton bouton :

Dim app As New Excel.Application
Dim xb As New Workbook
Dim xl As New Worksheet

Set xb = app.Workbooks.Add

Set xl = xb.Worksheets.Add

xl.Range("A1").Value = Text1.Text ' Ou toute autre valeur de ton choix


xb.SaveAs "C:\Exemple.xls"


app.Application.Quit

Set app = Nothing
Set xb = Nothing
Set xl = Nothing

A plus pour d'autres conseils.
3
LittleTab Messages postés 25 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 14 mars 2006
27 mars 2005 à 20:09
Merci bcp :D
0