2012-02-20 68 views
0

IM recieving从网页的表格在Excel中使用下面的代码如何找到从网上粘贴到Excel

With ActiveSheet.QueryTables.Add(Connection:= _ 
    "URL;some url") 
    .WebSelectionType = "xlSpecifiedTables" 
    .WebTables = "10" 
    .BackgroundQuery = True 
    .TablesOnlyFromHTML = True 
    .Refresh BackgroundQuery:=False 
    .SaveData = True 
End With 

而且我想从那个表我得到了行计数表的行数。 那我该如何存档?

With ActiveSheet.QueryTables.Add(Connection:= _ 
    "URL;some url") 
    .LineCount 'is it smt like this??????? 
End With 

回答

2

为什么不简单地使用像Range("B3").CurrentRegion.Rows.Count这样的东西?
请注意,你可以不知道#行实际下载之前可以下载,因为你正在使用.BackgroundQuery = True,你真的不知道该下载完成后...

+0

如果该区域,我希望有一些空单元格我的意思是整行有空单元格或整列有空单元格使用像分隔符的单元格值,可以停止计数范围功能的权利?比范围命令不工作,除非我使用smt如:i = i + 1,然后Range(“B”&i).CurrentRegion.Rows.Count每当它找到空单元格,如果空单元格出现多次会停止循环..是啊,可能会工作..除非你有一个更好的解决方案,我可以使用这个空细胞..反正它是一个很好的电话,所以也感谢+1简单。 – 2012-02-20 12:12:51