Function with Embedded String

[GlennL]

Hello,

I am passing data between Excel and SAP.

I have this:

OperationPrint = session.findById("wnd[1]/usr/tblSAPLCOIHTCTRL_5000/txtRIPRT1-VORNR[1,0]").Text​

which works fine. However I need to loop the row number (LineNumber). This is the code I created:

OPLineText = Chr(34) & "wnd[1]/usr/tblSAPLCOIHTCTRL_5000/txtRIPRT1-VORNR[1," & LineNumber & "]" & Chr(34) & ").Text"
PrintLine = session.findById(OpLineText).Text​

The challenge I have is VBA errors when it hits the PrintLine code (Run-time error '619': The control could not be found by id.)

How do I get this code to run?

 

[GlennL]

Hello,

I am passing data between Excel and SAP.

I have this:

OperationPrint = session.findById("wnd[1]/usr/tblSAPLCOIHTCTRL_5000/txtRIPRT1-VORNR[1,0]").Text​

which works fine. However I need to loop the row number (LineNumber). This is the code I created:

OPLineText = Chr(34) & "wnd[1]/usr/tblSAPLCOIHTCTRL_5000/txtRIPRT1-VORNR[1," & LineNumber & "]" & Chr(34) & ").Text"
PrintLine = session.findById(OpLineText).Text​

The challenge I have is VBA errors when it hits the PrintLine code (Run-time error '619': The control could not be found by id.)

How do I get this code to run?

There was a slight error in the code above. However the same error is still happening with this new code:

OpLineText = Chr(34) & "wnd[1]/usr/tblSAPLCOIHTCTRL_5000/txtRIPRT1-VORNR[1," & LineNumber & "]" & Chr(34)
PrintLine = session.findById(OpLineText).Text