返回列表 上一主題 發帖

[發問] 請教如何用vba自動選取顯示想看的文件

[發問] 請教如何用vba自動選取顯示想看的文件

在桌面開了多個.xls文件,請教如何vba自動顯示想看的文件,謝謝!
test1.rar (10.18 KB)

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

回復 1# donod


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

  多做多想多學習,少看少錯少迷途

  多做=多多練習,多多編寫。
  多想=想想為什麼人家程式要那樣寫,如果換成自己,又會怎寫。
  多學習=學習人家的發問並解答,學習人家的寫法

  少看=只看不做也枉然

TOP

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

回復 1# donod
FileDialog 屬性 傳回 FileDialog 物件,此物件代表檔案對話方塊的執行個體。
expression.FileDialog (fileDialogType)
expression            必選。該運算式會傳回 [套用於] 清單中的其中一個物件。
fileDialogType     必選的 MsoFileDialogType。檔案對話方塊的類型。
MsoFileDialogType 可以是這些 MsoFileDialogType 常數之一。
msoFileDialogFilePicker        允許使用者選取檔案。
msoFileDialogFolderPicker  允許使用者選取資料夾。
msoFileDialogOpen               允許使用者開啟檔案。
msoFileDialogSaveAs            允許使用者儲存檔案。
  1. Sub Ex()
  2.     With Application.FileDialog(msoFileDialogFilePicker)
  3.         .InitialFileName = "d:\*.xls"   '改成你桌面的路徑
  4.         If .Show = True Then Workbooks.Open .SelectedItems(1)
  5.         '.SelectedItems(1) 所選擇的檔案
  6.     End With
  7. End Sub
複製代碼

TOP

回復  donod


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



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

TOP

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



    謝謝版大!正是這樣。

TOP

        靜思自在 : 布施如播種,以歡喜心滋潤種子,才會發芽。
返回列表 上一主題