VBA動態打開同一文件夾中的文件

Question

是否可能在名為Tom Dick和Harry的文件夾中有許多工作表，而名為admin的文件夾中有許多工作表。 管理員有一些數據輸入單元格，其中一個具有下拉菜單以選擇Tom Dick或Harry。 然后，當宏被觸發時，它會在相關工作表上進行填充嗎？ 我正在從其他所有出色的質量檢查人員那里快速學習如何做這些事情，但是我找不到足夠具體的東西。 我讀過，這可能工作：

Workbooks.Open文件名：= ThisWorkbook.Path和“ Tom.xls”

但是如何使它更具動態性，使其可以根據下拉選擇打開Dick或Harry？

期待中的歡呼聲:-)

Answer 1

讓我在這里稍微補充一下我的評論。 首先，我們假設您在一個文件夾中有4個工作簿：“ Tom”，“ Dick”，“ Harry”和“ admin”。還假設您在工作表“ admin”中輸入數據的工作表也稱為“ admin” “。在工作表“ admin”中，您在單元格A1中進行了數據驗證，該數據驗證使用戶可以選擇三個字符串之一：“ Tom”，“ Dick”和“ Harry”。我將執行以下操作：

Dim admin as Workbook, wb as Workbook
Dim str as String

Set admin = Thisworkbook 'assuming you are writing this code in the workbook admin, which seems to be the case
str = admin.Sheets("admin").Range("A1").Value2
Set wb = Workbooks.Open(admin.Path & "\" & str & ".xls") 'assuming the files are .xls, just change the extension if they are otherwise

有了這個，您就有了一個工作簿變量wb ，它允許您在工作簿打開后對其執行操作。