BAUHAUS44
Messages postés50Date d'inscriptionsamedi 19 août 2006StatutMembreDernière intervention17 juillet 2010
-
26 sept. 2008 à 13:44
bigfish_le vrai
Messages postés1835Date d'inscriptionvendredi 13 mai 2005StatutMembreDernière intervention20 novembre 2013
-
26 sept. 2008 à 20:13
Bonjour,
je travaille actuellement sur une macro en VBA et celle-ci commence par l'import d'un fichier dans excel. Ce fichier est toujours localisé au même endroit par contre il a un nom différent à chaque fois. J'aimerais donc faire apparaître une messagebox demandant au manipulateur d'indiquer où se trouve le fichier à importer et lequel est-ce (créer une sorte de lien). De cette manière, après avoir indiqué la localisation de ce fichier, l'import peut se faire sans problème et ce quelque soit le fichier à importer.
Si quelqu'un peut m'aider, je l'en remercie d'avance.
' Open the file dialog
With Application.FileDialog(msoFileDialogOpen)
.Filters.Add "Fichier Excel", "*.xls", 1
.Title = "Selection Fichier..."
.AllowMultiSelect = False
' si l'utilisateur a cliqué sur [open]
If .Show = -1 Then
MonFichier = .SelectedItems(1)
Workbooks.Open (MonFichier)
End If
End With