Excel msoFileDialogFilePicker显示的Update.ButtonName

我想将msoFileDialogFilePicker中“打开”按钮的文本更改为“选择”

.ButtonName

属性应该执行此操作，但结果仍然是“打开的”

Dim str1，str2作为字符串
使用Application.FileDialog（msoFileDialogFilePicker）
.Title=“选择采购订单报告”
.ButtonName=“选择”
.InitialFileName=“C:\”
.Filters.Add“订单文件”，“*.xls？”，1
.AllowMultiSelect=False
如果.Show-1那么
出口接头
如果结束
str1=Dir（.SelectedItems（1））
str2=.SelectedItems（1）
以

我认为在你点击一个文件之前，它不会改变。谢谢，就是这样。我希望我能在选择文件之前更改它。

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