Enrengistrer un résultat sous excel ou access

cs_ab44 Messages postés 79 Date d'inscription lundi 28 mars 2005 Statut Membre Dernière intervention 4 juin 2012 - 7 mai 2005 à 18:49
cs_ab44 Messages postés 79 Date d'inscription lundi 28 mars 2005 Statut Membre Dernière intervention 4 juin 2012 - 9 mai 2005 à 18:22
Bonjour a tous,

voila je suis débutant je programme avec vb6
je voidrais faire un soft tel que :
il faut qu'on entre par ex un prénom dans un textbox et que par le click d'un bouton il y ait dans un tableau excel ou acess
-dans la premiere colone le prénom écrit dans le text box
- dans la deuxième colone la date quand a été cliquer le bouton
- dans la troisième colone l'heure quand a été cliquer le bouton
je voudrais que après le document excel ou acess peut etre lu .

3 réponses

jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
8 mai 2005 à 22:25
Bonsoir,
Dans Projet/Références tu coches la case Microsoft Excel x.0 Object Library
Dans l'exemple suivant, il suffit de tapper le Prénom dans Text1

Private Sub Command1_Click()
Dim objXL As New Excel.Application
Dim wbXL As New Excel.Workbook
Dim wsXL As New Excel.Worksheet


If Not IsObject(objXL) Then
MsgBox "Vous Avez Besoin de Microsoft Excel pour cette Fonction", vbExclamation, "Excel"
Exit Sub
End If
' Ouvre Excel
objXL.Visible = True
Set wbXL = objXL.Workbooks.Add
Set wsXL = objXL.ActiveSheet


wsXL.Cells(1, 1).Value = Text1.Text
wsXL.Cells(1, 2).Value = Date
wsXL.Cells(1, 3).Value = Format(Time, "h:mm:ss")


End Sub


Private Sub Form_Load()
Text2.Text = Date
Text3.Text = Time
End Sub

jpleroisse
0
jpleroisse Messages postés 1788 Date d'inscription mardi 7 novembre 2000 Statut Membre Dernière intervention 11 mars 2006 27
8 mai 2005 à 22:28
PS Pour essayer mon code j'avais placé 3 TextBox, tu peux supprimer Form_Load

jpleroisse
0
cs_ab44 Messages postés 79 Date d'inscription lundi 28 mars 2005 Statut Membre Dernière intervention 4 juin 2012
9 mai 2005 à 18:22
merci beaucoup mais je ne voudrais pas que excel s'ouvre mais l'enrengistre dans un fichier excel dans le dossier que je veux .

Mais sinon merci a toi
0
Rejoignez-nous