Bonjour à tous,
Je dois rendre compatible une appli développée sous access 2003 vers Access2000. Cette dernière utilise un filedialog.
Comment modifier le code suivant pour le rendre compatible (ou au moins quel objet utiliser)?
merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Dim fd As FileDialog ... Set fd = Application.FileDialog(msoFileDialogFilePicker) fd.AllowMultiSelect = False fd.Filters.Clear fd.Filters.Add "fichiers excel", "*.xls" If fd.Show = -1 Then fichiersource = fd.SelectedItems(1) ... end if
Partager