[發問] 請問如何利用瀏覽之資料夾方式，於儲存格生成此路徑??

棋語鳥鳴

請問如何利用瀏覽資料夾方式，將指定的資料夾路徑打在指定儲存格裡??
例如:我點擊按鈕後選擇D:\TEST\TEST001此路徑的TEST001資料夾，
如何讓儲存格A1自動打上剛剛選擇資料夾的路徑"D:\TEST\TEST001"
請問各位大大此巨集要如何寫???

homeman

剛剛查了 application.FileDialog 的用法, 原來是這個意思, 我順便把它 pass 出來

自Excel XP(2002)起，Application多了一個FileDialog屬性。FileDialog 屬性傳回 FileDialog 物件，此物件代表檔案對話方塊的執行個體。

用法：
Application.FileDialog(fileDialogType)
fileDialogType 必選的 MsoFileDialogType。檔案對話方塊的類型。
MsoFileDialogType 可以是這些 MsoFileDialogType 常數之一。

   1. msoFileDialogFilePicker 允許使用者選取檔案。
   2. msoFileDialogFolderPicker 允許使用者選取資料夾。
   3. msoFileDialogOpen 允許使用者開啟檔案。
   4. msoFileDialogSaveAs 允許使用者儲存檔案。

FileDialog 物件提供檔案對話方塊功能，類似 Microsoft Office 應用程式中的標準 [開啟舊檔] 及 [儲存檔案] 對話方塊功能。運用這些對話方塊，整合方案的使用者可以很容易地指定該方案應使用的檔案及資料夾。

使用 FileDialog 物件
以 FileDialog 屬性傳回 FileDialog 物件。FileDialog 屬性位在每個單獨的 Office 應用程式 Application 物件中。屬性使用一個引數 DialogType，以確定屬性所傳回的 FileDialog 物件類型。下列是 FileDialog 物件的 4 種類型：

   1. [開啟舊檔] 對話方塊：讓使用者選取一或多個檔案，可使用 Execute 方法在主應用程式中開啟。
   2. [另存新檔] 對話方塊：讓使用者選取一個檔案，可使用 Execute 方法儲存目前的檔案。
   3. [檔案選擇器] 對話方塊：讓使用者選取一或多個檔案。在 FileDialogSelectedItems 集合中擷取使用者所選取的檔案路徑。
   4. [資料夾選擇器] 對話方塊：讓使用者選取路徑。在 FileDialogSelectedItems 集合中擷取使用者所選取的路徑。

每個主應用程式只能例示 FileDialog 物件的單個實例。因此，即使當建立多個 FileDialog 物件時，亦保留 FileDialog 物件的許多屬性。因此，請確認在顯示該對話方塊前，已設定適合您目的之所有屬性。

為了使用 FileDialog 物件顯示對話方塊，您必須使用 Show 方法。一旦顯示對話方塊，就會在使用者結束該對話方塊之後才執行程式碼。

棋語鳥鳴

回復 2# Hsieh


  
果然我還是緊底之蛙~不知哪時才能達到大師的境界!感謝H大...熱心的回覆...幫了我很大的忙!!

Hsieh

1. Sub nn()
   
2. With Application.FileDialog(msoFileDialogFolderPicker)
   
3. .Show
   
4. [A1] = .SelectedItems(1)
   
5. End With
   
6. End Sub

複製代碼

回復 1# 棋語鳥鳴