Ecrire dans un fichier excel avec VB6????? [Résolu]

Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
- - Dernière réponse : Ackby
Messages postés
44
Date d'inscription
mardi 16 février 2010
Dernière intervention
28 juillet 2010
- 13 mars 2010 à 10:57
Comment faire pour ecrire dans un fichier excel avec VB6?

Merci...
Afficher la suite 

16 réponses

Meilleure réponse
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
3
Merci
Tu Coches Projet...Références...Micrososoft Excel XX Object Library

Dans ton Code :

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlRang As Excel.Range
Dim xlSheet As Excel.Worksheet

Set xlApp = New Excel.Application
With xlApp
'Ouverture du document XLS
Set xlBook = .Workbooks.Open(FileName:="C:\MonFichier.xls", ReadOnly:=False, Editable:=True) ' Français
'Séléction de la feuille 1
Set xlSheet = xlBook.Worksheets(1)
End With

With xlSheet
.Cells(2, 1) = "Italia"
End With

xlApp.Visible = True


'Détruit les objets
Set xlRang = Nothing
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing

It@li@

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources a aidé 106 internautes ce mois-ci

Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Le Fichier EXCEL existe t-il déja ?

It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Oui je peux creer ce fichier.
Je voudrais que mon prog envoie la date et un commentaire des qu'une action se produit.
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Tu veux que soit VB qui cré le fichier ou est-ce que tu souhaite remplir un fichier XLS déja existant ????

It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Je veux que VB remplisse une ligne avec plusieurs colonnes, puis apres ca rempli l'autre ligne avec les plusieurs colonnes.
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
En fait,je veux faire comme un historique, des qu'une alarme se declenche, je met l'heure et un commentaire pour dire quel detecteur a sonne.
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Je repete ma Question :

Tu veux que soit VB qui cré le fichier ou est-ce que tu souhaite remplir un fichier XLS déja existant ????


It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Je veux remplir un fichier deja existant.Desole.
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Merci ca fonctionne....

Si je me galere encore sur excel je te refais signe.
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Ok...Coches Reponse Acceptée

@+

It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Me revoila,

Je voudrais que excel ne se lance pas et que les renseignements (date, commentaire, ca c'est bon...), se marque dans excel et que ca s'enregistre directement.

C possible je suppose.....

G essaye avec la commande:
ActiveWorkbook.Save mais il me met Run Time error "1004" le fichier est en read only.
Et avec ca:
Xls.ActiveWorkbook.SaveAs ("C:\Temp\Tests.csv")
Xls.ActiveWorkbook.Close False
Xls.Quit
Il me dit "Objet required".
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Regardes avec :

xlApp.Close SaveChanges:=0

It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
Run-Time error '438'
Object doesn't support this property or method

C'est ce qui s'affiche.

A mon avis y'a un objet ou un truc dans le genre que g pas mis...
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Dernière intervention
30 juin 2009
0
Merci
Alors essayes avec :

xlBook.Close SaveChanges:=0

It@li@
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Dernière intervention
9 juin 2005
0
Merci
En fait quand je veux regarder dans ma feuille excel quand je quitte l'application, il me dit que ma feuille est deja ouverte donc il ne ferme pas excel quand il quitte.

Y'a pas une facon de pas ouvrir excel et d'ecrire dans le fichier?

Je regarde partout sur le forum mais j'y arrive pas.

Merci.
Messages postés
44
Date d'inscription
mardi 16 février 2010
Dernière intervention
28 juillet 2010
0
Merci
j'ai essayé cela mais la première fois, le fichier excel ne s'affiche pas, il faut cliquer une deuxième fois (sous VB6). Est-ce normal ?

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.