1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
Sujet Précédent Sujet Suivant

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

Signaler
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 -
Messages postés
44
Date d'inscription
mardi 16 février 2010
Statut
Membre
Dernière intervention
28 juillet 2010
 -
Comment faire pour ecrire dans un fichier excel avec VB6?

Merci...
A voir également:

16 réponses

Réponse 1 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
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@
3
Merci
Merci

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

Codes Sources 179 internautes nous ont dit merci ce mois-ci

Réponse 2 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
Je veux remplir un fichier deja existant.Desole.
Réponse 3 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
Le Fichier EXCEL existe t-il déja ?

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

It@li@
Réponse 6 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
Je veux que VB remplisse une ligne avec plusieurs colonnes, puis apres ca rempli l'autre ligne avec les plusieurs colonnes.
Réponse 7 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
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.
Réponse 8 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
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@
Réponse 9 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
Merci ca fonctionne....

Si je me galere encore sur excel je te refais signe.
Réponse 10 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
Ok...Coches Reponse Acceptée

@+

It@li@
Réponse 11 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
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".
Réponse 12 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
Regardes avec :

xlApp.Close SaveChanges:=0

It@li@
Réponse 13 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
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...
Réponse 14 / 16
Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
 8
Alors essayes avec :

xlBook.Close SaveChanges:=0

It@li@
Réponse 15 / 16
Messages postés
10
Date d'inscription
mardi 10 mai 2005
Statut
Membre
Dernière intervention
9 juin 2005
 1
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.
Réponse 16 / 16
Messages postés
44
Date d'inscription
mardi 16 février 2010
Statut
Membre
Dernière intervention
28 juillet 2010
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 ?
Posez votre question