lecteur cd et chemin

bonsoir à toutes et à tous

J'ai cherche comment trouver la lettre du lecteur cd , jai importe dans vba les programmes mais ceux trouvés ne fonctionne pas.

Aussi je souhaite puisque l'ouverture de mon fichier se fait du CD touver le chemin du fichier ouvert

je nai pas trouvé dans l'aide vba la solution.

Merci d'avance à ceux qui pourraient me donner la solution.

à++++++++[8D]

Salut si c'est le chemin de ton appli VB que tu veux : Application.Path

 Drikce 06

Salut,  Drikce 06 alors Application.StartupPath pour VB.Net  (Dot.Net 1.1 et 2.0) et App.Path pour vb6.0

A.C.I.V.E SARL Automatismes Conception Informatique Vidéo Electronique

 Bonsoir à tous....

Un exemple avec fso

Dim fso, d, dc, s, n
Set fso = CreateObject("Scripting.FileSystemObject")
Set dc = fso.Drives
For Each d in dc
    n = ""
    If d.DriveType = 4 And d.IsReady Then
    s = s & "DriveLetter:  " & d.DriveLetter &vbCrLf& "VolumeName:  " &_
        d.VolumeName &vbCrLf&"Taille totale: " & FormatNumber(d.TotalSize/1024, 0) & " KOctets" &vbCrLf&_
       "Espace disponible: " & d.AvailableSpace/1024 & " Koctets"
    s = s & n & vbCrLf
    End If
Next
MsgBox vbCrLf& s,,"Inventaire des disques amovibles"
Set fso = Nothing
Set dc  = Nothing

jean-marc

Salut acive  et Application.Path pour VBA! lol! Tous ces code ce ressemblent!
Et s'il avait cherché un tout petit peu:
http://www.codyx.org/snippet_repertoire-courant-application_81.aspx

 Drikce 06