Question

我目前在Mac上使用Excel 2011，我正在尝试使用QueryTable提取数据，但我不得不导入整个表。我目前正在将整个表格粘贴到隐藏的工作表上，然后使用公式从特定单元格中提取数据。为了向您展示我的意思，以下是一个示例：

 Sub Yield()

 Dim URL As String
 Dim qt as QueryTable
 Dim hs As Worksheet
 Set hs = Worksheets("Hidden Sheet")
 Set ws = Worksheets ("Managed Equity Portfolios")
 URL = "http://www.nasdaq.com/symbol/spy"
 Sheets("Hidden Sheet").Visible = True

 Set qt = hs.QueryTables.Add( _
      Connections:= "URL;" & URL, _
      Destination:= hs.Range("A1"))
      qt.RefreshStyle = xlOverwriteCells = True
      qt.BackgroundQuery = True
      qt.SaveData = True
      qt.Refresh Background Query:= False
      'I am using the same parameters here as my other code, honestly not
       'sure why a lot of it is on here, but I kept it because it works.


 Worksheets("Hidden Sheet").Visible = False

 End Sub

目前，我需要的信息被粘贴到单元格B42中的隐藏表格中。我做了这样的细胞，我想要的信息='隐藏的表！'B42，但这似乎不是很有效。有什么方法可以将单元格B42放入Excel中吗？

我会在这里澄清任何问题，非常感谢你！

VBA - 从QueryTables中提取特定数据

0 个答案: