msgbox

[katial]

Bonjour j'aimerai creer un fichier excel qui me permettrait d'afficher une fenetre:
en effet je voudrai que cette fenetre me demande d'aller cherche un fichier excel. et que je puisse parcourir mes documents
comment faire?

 

[RENAUDER]

Re : msgbox

Bonjour

Peut-être ce code t'aidera

Sub Traite()
    ChDrive "C:\"
    ChDir "C:\Excel\"
    monfichier = Application.GetOpenFilename("Fichiers Excel (*.xls), *.xls", , "Ouvrir le fichier d'alertes souhaité !")
    If VarType(monfichier) = vbBoolean Then
        Exit Sub
    Else
        Workbooks.Open Filename:=monfichier
    End If
End Sub

 

[katial]

Re : msgbox

Je ne sais pas pourquoi mais ce ne fonctionne pas.

 

[CB60]

Re : msgbox

Bonsoir
peut être la directory?
ChDir "C:\Excel\"
tu peux mettre:
ChDir "C:\"

comme cela tu sera à la racine

 

[katial]

Re : msgbox

merci beaucoup