Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2510 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [résolu]ouverture fichier excel plus possible

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[résolu]ouverture fichier excel plus possible

n°677363
lhonolulu
Posté le 18-03-2004 à 17:25:33  profilanswer
 

bonjour,
Je travaillais via Excel et maintenant je travaille via vb6.  
Avant pour faire une sélection sur une feuille excel je faisais :

Code :
  1. For i = 2 To Ligne
  2. If Sheets("mois" ).Cells(i, j + 1) = "M" Then
  3. cel = Cells(i, 1)
  4. 'recopie dans la listbox le contenu de la cellule (i,j)
  5. lb_Liste_Client.AddItem cel
  6. End If
  7. Next i

 
 
Mais maintenant ca ne marche plus...snif !
Comment dire à vb6 d'aller voir dans le fichier ou je vais réaliser une sélection. (Il faut utiliser file system object me semble-t- il mais je n'arrive pas à faire marcher ca) Ensuite je suppose qu'il suffise que je remette mon ancien code pour continuer mon prog. Et ensuite de refermer le fichier.
Merci de votre aide.


Message édité par lhonolulu le 19-03-2004 à 16:57:22
mood
Publicité
Posté le 18-03-2004 à 17:25:33  profilanswer
 

n°677758
MagicBuzz
Posté le 19-03-2004 à 09:40:07  profilanswer
 

Faut créer un objet de type Excel dans ton programme (Va voir dans les références). Il faut qu'Excel soit installé sur le PC qui fera tourner le soft, ainsi que sur le poste de développement.

n°677932
lhonolulu
Posté le 19-03-2004 à 11:43:09  profilanswer
 

merci,  
j'ai fait le code suivant et ca marche. dc pour ceux ke ca intéresse
 

Code :
  1. Dim xlApp As Excel.Application
  2. Dim xlWrk As Excel.Workbook
  3. Dim xlWks As Excel.Worksheet
  4. Set xlApp = New Excel.Application
  5. Set xlWrk = xlApp.Workbooks.Open(txtPathXls.Text)
  6. If OptPeriode(0) Then
  7.     Set xlWks = xlWrk.Worksheets(2)
  8.     sLettre = "M"
  9. End If
  10. 'si je clique sur le bouton option optperiode(1) alor ouvrir  feuille1 et je di que la variable slettre = t (permet de fair une sélection (idem pour optperiode(0)
  11. If OptPeriode(1) Then
  12.     Set xlWks = xlWrk.Worksheets(1)
  13.     sLettre = "T"
  14. End If

n°677935
lhonolulu
Posté le 19-03-2004 à 11:44:40  profilanswer
 

je sais c'est con mais gpa trouvé le moyen de dir que mon problème est résolu...merci de me dire comment je peux fair ca...

n°678166
MagicBuzz
Posté le 19-03-2004 à 15:23:50  profilanswer
 

lol
 
édite le premier post du topic, tu pourras changer le titre normalement


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [résolu]ouverture fichier excel plus possible

 

Sujets relatifs
pb vidage contenu fichier en javapb ouverture base de donnee
Macro ExcelObliger à l'ouverture d'un fichier excel d'enregistrer-sous un nom dif
Le fichier XML peut contenir des fichier ?Problème de lecture de fichier avec java
[batch] Récupérer le dernier fichier créé d'un répertoirePetit problème étrange sur lecture de fichier
Plus de sujets relatifs à : [résolu]ouverture fichier excel plus possible


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR