Tag: ebay

我需要通过Excel 2010 VBA下载易趣运费？

我一直在尝试几天，从ebay下载非免费送货费用。 我有页面的项目编号。 链接应该在ebay上正确的页面。 在尝试访问该页面并下载数据时，Excel挂起并且不能恢复。 我真的需要这些运费，基本上是时间。 如果这个代码不能修复，不能挂起，有人可以告诉我如何获得我需要的信息到Excel？ 我有其他的代码，从ebay很多页面上得到的ebay项目号码是非常相似的，它很好。 itemNumberAlone = Range("a" & eachItem).Value With ActiveSheet.QueryTables.Add(Connection:= _ "URL;http://www.ebay.com/itm/" & itemNumberAlone & "?ru=http%3A%2F%2Fwww.ebay.com%2Fsch%2Fi.html%3F_from%3DR40%26_sacat%3D0%26_nkw%3D" & itemNumberAlone & "%26_rdc%3D1" _ , Destination:=Range("$bZ$1")) .Name = "second ebay links" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = True .BackgroundQuery = True .RefreshStyle = xlOverwriteCells .SavePassword = […]