Excel - 如何向單元格添加文件選擇按鈕？

Question

我正在創建一個模型，要求用戶在某些單元格中輸入模型使用的所需電子表格，文件夾等的地址。

我沒有讓用戶剪切和粘貼地址，而是希望在單元格中包含某種表單控件，提示用戶瀏覽文件，然后在用戶選擇后將文件路徑返回到單元格。好'。

是否有一個標准的Windows窗體控件可以實現這一點？ 感覺應該有，但我能找到的只是切換按鈕，下拉菜單等？

我知道我可以編寫一個自定義腳本來捕獲double_click事件，任何以更“原生”方式執行此操作的指針都將非常感激！

謝謝，

亞當

Answer 1

您可以將表單按鈕連接到文件打開對話框。

這允許用戶選擇文件，但您不必打開它。

Sub GetFile()

Dim varFile As Variant

varFile = Application.GetOpenFilename("Excel files (*.xls), *.xls", , "Select a file", , False)
If varFile = False Then
    Exit Sub
Else
    ActiveCell.Value2 = varFile
End If

End Sub