试图通过循环读取Excel中的值并将其存储到环境变量

我试图读取Excel数据文件中的值并尝试将值存储到环境变量中。然后我想在我的测试中重用这些环境变量。但是，下面的代码给我意想不到的运行时错误。没有错误代码没有。当我用静态excel（Row，Col）修复代码时，我得到结果，但我需要通过循环来控制它。需要帮忙。试图通过循环读取Excel中的值并将其存储到环境变量

For x = 2 to Row_TD   
    TDID = TestData_Sheet.Cells (x , "A")  
    IF TestData_Sheet.Cells (x,"B") = "Y" Then  
     fnReadData 


Function fnReadData 
    Environment.Value("URL") = TestData_Sheet.Cells(x,"C") 
    msgbox environment.Value("URL") 
    Environment.Value("Browser") = TestData_Sheet.Cells(x,"D") 
    msgbox environment.Value("Browser") 
    Environment.Value("City") = TestData_Sheet.Cells(x,"E") 
    Environment.Value("Zip") = TestData_Sheet.Cells(x,"F") 
    Environment.Value("LoanAmount") = TestData_Sheet.Cells(x,"G") 
    Environment.Value("DownPayment") = TestData_Sheet.Cells(x,"H") 
    Environment.Value("Points") = TestData_Sheet.Cells(x,"I") 
    msgbox Environment.Value("Points") 
    Environment.Value("FICO") = TestData_Sheet.Cells(x,"J")

来源

2017-06-23 syed naqvi

请格式化代码'code' ........使用它像'+文字+'或4个空格+您的文字 – GTAVLover

你好，这里我是新来的，真的不知道格式化代码。 –

您能否更具体地说明您收到了哪些错误，哪些行号等等。 –

尝试以下

TestData_Sheet.Cells(x,"E").Value 'Invalid 
And 
TestData_Sheet.Range("E"&x).value 'valid 
TestData_Sheet.Cells(x,5).value 'valid

来源

2017-06-23 06:55:40

你好，感谢您的回复。但问题是一样的。 –

这行TestData_Sheet.Range（“E”＆x）.value给出了所需的无效参数。 Ladt行我不想硬编码行和列。相反，我希望UFT通过for循环使用迭代，并通过函数获取数据。 –

您是否将x的值传递给fnReadData函数。你能告诉我什么是当你得到错误时x的价值。 X是一个局部变量，必须传递给函数，否则你可能会得到变量未定义的错误。 –

试图通过循环读取Excel中的值并将其存储到环境变量

回答

相关问题