麻辣家族討論版版 - Powered by Discuz! Board

標題: [發問] 請教如何用vba自動選取顯示想看的文件 [打印本頁]

作者: donod 時間: 2012-12-19 22:55 標題: 請教如何用vba自動選取顯示想看的文件

在桌面開了多個.xls文件，請教如何用vba自動顯示想看的文件，謝謝!
[attach]13615[/attach]

作者: mark15jill 時間: 2012-12-20 08:26

本帖最後由 mark15jill 於 2012-12-20 08:27 編輯

回復 1# donod

裡面空白一片..
沒說明要用哪種方式自動選取
選取方法? listbox(表單式) 還是 combobox(下拉式) ?
顯示方法? 開啟檔案顯示? 或者是 label 對應顯示?

作者: GBKEE 時間: 2012-12-20 09:58

本帖最後由 GBKEE 於 2012-12-20 09:59 編輯

回復 1# donod
FileDialog 屬性傳回 FileDialog 物件，此物件代表檔案對話方塊的執行個體。
expression.FileDialog (fileDialogType)
expression          必選。該運算式會傳回 [套用於] 清單中的其中一個物件。
fileDialogType    必選的 MsoFileDialogType。檔案對話方塊的類型。
MsoFileDialogType 可以是這些 MsoFileDialogType 常數之一。
msoFileDialogFilePicker       允許使用者選取檔案。
msoFileDialogFolderPicker  允許使用者選取資料夾。
msoFileDialogOpen             允許使用者開啟檔案。
msoFileDialogSaveAs          允許使用者儲存檔案。

Sub Ex()
With Application.FileDialog(msoFileDialogFilePicker)
.InitialFileName = "d:\*.xls" '改成你桌面的路徑
If .Show = True Then Workbooks.Open .SelectedItems(1)
'.SelectedItems(1) 所選擇的檔案
End With
End Sub

複製代碼

作者: donod 時間: 2012-12-20 18:05

回復 donod

裡面空白一片..
沒說明要用哪種方式自動選取
選取方法? listbox(表單式) 還是 combo ...
mark15jill 發表於 2012-12-20 08:26

下次會說清楚，謝謝大大提醒!

作者: donod 時間: 2012-12-20 18:08

回復 donod
FileDialog 屬性傳回 FileDialog 物件，此物件代表檔案對話方塊的執行個體。
expression.F ...
GBKEE 發表於 2012-12-20 09:58

謝謝版大!正是這樣。

歡迎光臨麻辣家族討論版版 (http://forum.twbts.com/)