Question

vba Application.FileDialog(msoFileDialogOpen)打开文件的顺序

在打开文件对话框中选中：文件1、文件2、文件3。
可是以下代码输出的却是：文件3的文件名、文件1的文件名、文件2的文件名
怎么才能按照选中文件的顺序输出：文件1的文件名、文件2的文件名、文件3的文件名呢
Sub test()
Dim i As Integer
With Application.FileDialog(msoFileDialogOpen)
.AllowMultiSelect = True
.Show
For i = 1 To .SelectedItems.Count
Debug.Print .SelectedItems(i)
Next i
End With
End Sub

Answer 1

引用windows的对话框都不行。。。
它们都是最先输出最后一个选择的文件名，最后一个选择之前选择的文件名按名字排序，即：
数字<字母<中文字符

要想显示123，就先选中23，再选择1。。

如果你非要按照你鼠标点击的顺序输出，请自己仿照对话框编写一个弹出窗体对话框，使用一个数组来记录鼠标点击的顺序记录。。。

Answer 2

我花了点时间给你找到问题了，
这个集合不会自动排列的，也就是说你先选择A3 ，第一个打印出来的就是A3,
这主要取决于你选择的时候先选择那个文件的。

解决：如果你文件很多，建议你用a001 a002前面多加0，顺序排列这样，你选择进集合后就是从1开始的。你试试，不明白再问我，我在线时间比较少。

dean.wang2008@163..com