Discussion :

[calimero91]

Bonjour,
j'ai le code suivant avec VB5:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Private Sub File1_Click()
'ouverture de l'application
Set appexcel = CreateObject("excel.application")
'ouverture du fichier "LUP CD CLIP"
Set wbexcel = appexcel.Workbooks.Open(File1.Path & "\" & File1.filename)
'ouverture de la feuille "LUP VALID CLIP"
Set wsexcel = wbexcel.Worksheets(1)
appexcel.Visible = True
End Sub

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub form_load()
File1.Path = "P:\DDIV-DIESE\DEPARTEMENT_DIAG\_TOUS\Indicateurs 65678\CR VALIDATION CLIP\"
End Sub

avec une form contenant simplement la filelistbox


et j'aimerai pouvoir faire la meme chose sous Access, comment puis je faire svp???

[Invité]

Salut,

Il n'existe pas ce composant sous Access, par contre tu peux utiliser l'ActiveX Microsoft CommonDialog et récupérer le nom du fichier avec son chemin.

Starec

[calimero91]

excuse moi mais comment je fait?

[Dolphy35]

Salut,

Ton code VB te sert à quoi au juste ?

[calimero91]

mon code VB me sert juste a afficher dans une filelistbox le nom des fichier .xls contenu dans un repertoire, et à ouvrir le fichier sur lequel on clique.

[Dolphy35]

Salut,

tu as la réponse dans la

Common Dialog