尝试从下拉列表中打开另一个工作簿表

问题描述

我已经坚持了好几天了，想知道是否有人知道如何让它工作。

我们对我的工作进行了检查，其中包含 4 种表格，并且在大多数情况下，大约 50% 的表格可以通过在一种表格中输入信息并将数据自动填充到其他表格中来完成，或者至少我就是这样正在尝试做。 我想要这样做的方式是，我希望能够从主窗体有一个键盘命令来打开所有文件，并填写我所拥有的信息。

现在一种形式是特定于模型的，因此在打开工作簿时需要识别型号单元格 (A8) 并将工作簿打开到该特定工作表。

以下是我为实现这一目标所做的尝试，无论我似乎无法让它发挥作用。

Sub Form()

    Dim TCR As Workbook
    Set TCR = ActiveWorkbook
    TCR.Activate
    Windows("ContourForm.xlsx").Activate
    
        Workbooks.Open Filename:="\\Server\Users\DeptQA\Quality Tracking Work Sheets.xlsx"
       
      ' ***Attempt 1 ***
        ' Worksheets("TCR.Sheets(NCR).Range(A8)").Activate
       
       
       
    ' ***Attempt 2 ***
        'Worksheets("TCR.Sheets(NCR).Range(A8)").Activate
    
    
    
     ' ***Attempt 3 ***
      '  Worksheets("ModelNumber").Activate ****<- This was a test to see if entering the model # manually works and it does indeed.****

    
    
    
         ' ***Attempt 4 ***
        Worksheets("[TCR]NCR!$A$8").Activate
    
    
End Sub

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）