Bonjour j'ai une maccro qui marche pas sous MAC alors que sur Windows tout marche.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub btn_file_Click()

With Application.FileDialog(msoFileDialogFilePicker)
        .InitialFileName = ThisWorkbook.Path & "\"
        .Title = "Sélectionner un Fichier"
        .AllowMultiSelect = False
        .InitialView = msoFileDialogViewDetails
        .Filters.Clear
        .Filters.Add "Fichiers Excel", "*.csv"
        .Show
        If .SelectedItems.Count > 0 Then
            txt_file = .SelectedItems(1)
        End If
End With
erreur:
    MsgBox ("Erreur.")
    Resume Next
End Sub
merci.