VBA串聯不起作用

Question

你好傢伙我的VBA串聯不起作用。 所以我在這裏導入整個頁面，但我只需要導入的價格，因爲我現在無法做到這一點，現在我從頁面獲取數據到工作表，然後轉移到不同的工作表。

所以，如果你們有任何想法該怎麼做，請幫我解決這個問題。

Dim value As String 
value = 161631397677# 
For x = 1 To 2 
    Debug.Print value 
    With Sheet1.QueryTables.Add(Connection:= _ 
     "URL;http://www.ebay.in/itm/" & "value", _ 
     Destination:=Sheet1.Range("$A$9")) 

這是我如何使用串接，但它不工作。 它不會從瀏覽器中獲取結果。
我嘗試使用多個值來執行此操作，但無法從瀏覽器中獲取數據。我想產生這樣的：從

With Sheet1.QueryTables.Add(Connection:= _ 
     "URL;http://www.ebay.in/itm/" & "value", _ 
     Destination:=Sheet1.Range("$A$9")) 

http://www.ebay.in/itm/161631397677

所以，請幫我人解決這個問題。我是新來的VBA沒有關於多少知識它。

Answer 1

1）不要使用「value」作爲變量的名稱。這是一個保留字。用別的東西（如「myvalue的」）

2）它的更好（或「更恰當」）在QueryTables

3）您使用變量值爲字符串「值」之外創建您的變量串聯。

它應該是這樣的：

Dim MyValue As String 
MyValue = 161631397677# 
MyURL = "URL;http://www.ebay.in/itm/" & MyValue 
For x = 1 To 2 
    Debug.Print MyValue 
    With Sheet1.QueryTables.Add(Connection:= _ 
     MyURL, _ 
     Destination:=Sheet1.Range("$A$9")) 

編輯：該行的地方：MyURL = "URL;http://www.ebay.in/itm/" & MyValue取決於所使用的循環的當x = 1〜2 這將是內部或外部那個循環。

Answer 2

範圍是靜態的，您想要將數據透視表堆疊在一起。他們may not overlap。