gpt4 book ai didi

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

转载 作者:行者123 更新时间:2023-12-04 22:17:11 25 4
gpt4 key购买 nike

我需要一些帮助才能将数据导入到 excel 中的正确行
我在 excel 中有一个表,其中前 3 行的前 5 列中包含内容,如下所示:
enter image description here
我需要将 UFT 数据表中的数据获取到 Excel 的第 2、3 行但在 F、G 列中,但是当我按原样运行脚本时,数据被放入第 4 和第 5 行(如图所示),而不是像我需要的那样的第二和第三
我有这个功能,但不知道如何修复它:

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
任何帮助都会很棒!!!

最佳答案

UsedRange返回已用单元格的平方范围,因此返回 A1:G3在你的情况下。
因此,当您调用此行 rows = objSheet.UsedRange.Rows.count , 变量 rows取 3 作为值。
要修复您的代码,请删除以上行并将以下行替换为:

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

关于excel - UFT - 将数据表内容导出到特定的 excel 行,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/67887125/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com