(Solved) – .ButtonName property not working in Excel VBA msoFileDialogFilePicer


I want to change the “Open” button text in msoFileDialogFilePicker to “Select”. The .ButtonName property should do this but the result is still “Open”. I appreciate anyone’s advice.

  Dim str1, str2 as String

  With Application.FileDialog(msoFileDialogFilePicker)
    .Title = "Select PO Report"
    .ButtonName = "Select"
    .InitialFileName = "C:"
    .Filters.Add "Order File", "*.xls?", 1
    .AllowMultiSelect = False
    If .Show <> -1 Then
      Exit Sub
      End If
    str1 = Dir(.SelectedItems(1))
    str2 = .SelectedItems(1)
    End With

Leave a Reply

Your email address will not be published. Required fields are marked *