UFT - 将数据表内容导出到特定 excel 行

Question

我需要一些帮助来将数据导入到 excel

中的正确行

我在 excel 中有一个 table，它在前 3 行的前 5 列中有内容，如下所示：

我需要从 UFT 数据table 获取数据到第 2、3 行但在 F、G 列中的 excel 但是当我运行脚本按原样，数据被放入第 4 行和第 5 行（如图所示），而不是我需要的第 2 行和第 3 行

我有这个功能，但不知道如何修复它：

Public Function SetExcelCellData()
   Set objExcel = CreateObject("Excel.Application")
   objExcel.DisplayAlerts = False
   Set objWorkbook = objExcel.Workbooks.Open("C:\Users\WrightJ\Desktop\Excel\CompFormTest.xlsx")
   Set objSheet  = objWorkbook.Worksheets("Sheet1")
   Thank_you = Datatable("Thank you text",dtGlobalSheet)
   Prize = Datatable("Prize draw",dtGlobalSheet)
   rows = objSheet.UsedRange.Rows.count
   objSheet.Cells(rows+1,6).Value = Thank_you
   objSheet.Cells(rows+1,7).Value = Prize
   objWorkbook.SaveAs "C:\Users\WrightJ\Desktop\Excel\CompFormTest.xlsx"
   objWorkbook.Close
   Set objSheet  = Nothing
   Set objWorkbook = Nothing
   Set objExcel = Nothing
End Function

任何帮助都会很棒！！！

Answer 1

UsedRange returns 已用单元格的平方范围，因此在您的情况下返回 A1:G3。

因此，当您调用此行 rows = objSheet.UsedRange.Rows.count 时，变量 rows 的值为 3。

要修复您的代码，请删除以上行并将以下行替换为：

objSheet.Cells(2,6).Value = Thank_you
objSheet.Cells(2,7).Value = Prize

UFT - 将数据表内容导出到特定 excel 行

UFT - Exporting datatable content to specific excel rows

excel

vbscript

hp-uft