For i=3 to nRow
For j=1 to nColumn
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i,j)
DataTable.Value(chr(j+64),"Global")=text
datatable.SetNextRow
Next
Next
For i=3 to nRow
For j=1 to nColumn
datatable.SetCurrentRow(i)
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i,j)
DataTable.Value(chr(j+64),"Global")=text
datatable.SetNextRow
Next
Next
For i=3 to nRow
For j=1 to nColumn
DataTable.GetSheet("Global").SetCurrentRow(i-2)
text=Browser("登录服务器").Page( "BI@Report在线演示系统").Frame("Frame").WebTable("妇保院等级亏损次数").GetCellData(i,j)
DataTable.Value(chr(j+64),"Global")=text
datatable.GetSheet("Global").SetNextRow
Next
Next