Importer des données d'un fichier excel

-
Bonjour,
svp quelqu'un m'aider a trouver la solution d'importer des données d'un fichier excel a condition que je veux choisir cette fichier a partir d'un explorateur windows

désolé j'oublie que j'ai travaillé avec Visual basic 6
merci d'avance :)
Afficher la suite 

Votre réponse

5 réponses

Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Bonjour,
cela s'appelle piloter Excel depuis VB6.
Commence s'il te plait par te servir du moteur de recherche de ce forum. Il est là pour cela.
Tu y trouveras de nombreuses sources déposées et discussions ouvertes à ce sujet.
Reviens ensuite, s'il te plait, avec le code au moins tenté sur les bases que tu auras ainsi découvertes.

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Commenter la réponse de ucfoutu
0
Merci
j'ai fait une recherche mais pas de réponse exacte a cette probleme
NHenry
Messages postés
14324
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
18 décembre 2018
-
Tu ne trouvera pas toujours de réponse exacte à ton problème, mais des réponses approchantes qui t'aiguilleront vers une solution.
Commenter la réponse de amCIPI
0
Merci
le probleme que je peux choisir le fichier mais je peux pas recuperer des valeurs a partir de cette fichier
Commenter la réponse de amCIPI
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
0
Merci
Si tu ne sais pas comment récupérer des valeurs de cellules Excel, c'est que tu ne sais pas le faire non plus depuis VBA/Excel.
Or, le pilotage d'une application implique la connaissance de l'appli pilotée.
Questions, donc :
- 1) qu'as-tu tenté ? (montre ton code)
- 2) connais-tu VBA/Excel ?
Si réponse négative à la seconde question ===>> Apprends à le faire depuis VBA avant de tenter de le faire en pilotage de Excel.

________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Commenter la réponse de ucfoutu
0
Merci
le code :

Dim retour As String, i As Integer
Dim TB
Dim objXLApp As Excel.Application


Set objXLApp = New Excel.Application
    retour = ListeFichier()
    If retour = "" Then Exit Sub
    
    TB = Split(retour, vbNullChar)
    If UBound(TB) = 0 Then
        For i = Len(TB(0)) To 1 Step -1
   
            If Mid(TB(0), i, 1) = "\" Then Exit For
            

        Next
       
    End If
Dim j As Integer

With objXLApp
.Workbooks.Open (TB(0))
.Workbooks(1).Worksheets(1).Select




le pb au niveau d'ouverture de fichier ".Workbooks.Open (TB(0))"
NB:lt TB(0) est le chemin de fichier
Commenter la réponse de amCIPI

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.