Rapport de message :*
 

Import de fichier

Titre du sujet : Import de fichier
par Alragorn le 25/08/2009 20:30:38

Pour des besoins professionnels, je souhaite importer dans Excel des fichiers.

J'utilise la macro commande suivante  :

Sub ImporterFichier()
On Error GoTo ImporterFichierErr
Dim dTemp As Dialog
    'instancie la boite de dialogue import fichier texte
    Set dTemp = Application.Dialogs(xlDialogImportTextFile)
    'affiche la boite de dialogue
    dTemp.Show
Exit Sub
ImporterFichierErr:
    MsgBox Err.Number & vbCrLf & Err.Description & vbCrLf & "ImporterFichier()"
End Sub

Cette dernière fonctionne très bien, cependant je voudrais pouvoir spécifié l'extension attendue (.tsv) et non (.txt)

Je voudrais également masquer toute la phase d'import pour seulement avoir une boîte de dialogue d'import.
Est-ce possible ?

Par avance Merci