从qtp中仅从1列填充Excel中的数据

时间:2013-03-11 23:30:38

标签: excel qtp

我想从excel文件中只捕获一列,并将所有数据放在一个测试框中,如

AAAAAA BBBBBB CCCCCC DDDDDD EEEEEE FFFFFF

并单击保存按钮,此数据AAA,BBB等在excel工作表列中我想将其导入网页的文本框并处理此文本,我尝试了for循环,但是数据来自excel的输入在同一行输入,并在新数据进入时被删除

以下是我想写的代码段,感谢任何帮助:

由于

Browser("Web Browser").Page("Some Web page").Link("Relavent Link").Click


Datatable.Import "C:\QTP\CLIMS\ABOT\Default.xls"
RowCount = Datatable.GetSheet("Global").GetRowCount
CurrentRow = DataTable.GetSheet("Global").GetCurrentRow




runcontrols()
Function runcontrols ()
For runctrl = 1 To RowCount 
Browser("Web Browser").Page("Some Web page").WebEdit("Running Link").SetDataTable("RunControlsA", dtGlobalSheet)
DataTable.SetNextRow
Next
End Function

我的excel文件有3列,我试图从一列导入

2 个答案:

答案 0 :(得分:1)

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("C:\Example.xls")
Set currentWorkSheet = objExcel.ActiveWorkbook.Worksheets(1)
intColCount = 5

For ctr = 1 To intColCount
  temp = temp + " " + currentWorkSheet.Cells(1,ctr).Value
Next

enter image description here

如果我正确地阅读您的情况,您有一个电子表格,如图所示,并且正在尝试阅读A列的内容。在这种情况下,上面的代码将派上用场。 如果您需要任何进一步的帮助,请告诉我们。

答案 1 :(得分:0)

Excel处理是QTP自动化的重要组成部分 实现相同的步骤有4个步骤。 有关更多信息,请参阅以下帖子。

http://softwaretestingperfection.blogspot.com/2013/09/excel-handling-in-qtp.html