concatenate link in vba

[Jack sparrow]

hello everyone i am creating a crawler using excel VBA and here is extract of my code

Source = Web.Page(Web.Contents(""https://www.abc.com/xyz/tutorial.jsp?symbolCode=1252&symbol=TOMATINO""))

now i want to edit that code in such a way that instead of 1252 i want content of active cell and instead of TOMATINO i want content of cell right to active cell


Post Moved by Mod


.

 

[shrivallabha]

Try to replace 1252 by " & ActiveCell.Value & "
TOMATINO by " & ActiveCell.offset(0,1).Value & "
Important: You will have to adjust the quotes.

 

[Jack sparrow]

thank you for replying Sir,
can u please be more specific about adjusting quotes

 

[shrivallabha]

thank you for replying Sir,
can u please be more specific about adjusting quotes

You have posted a single line of code and question is general. How do you expect a specific answer? You need to test those things yourself by changing number of quotes using suggestions or post whole code.

Source = Web.Page(Web.Contents("https://www.abc.com/xyz/tutorial.jsp?symbolCode=" & ActiveCell.Value & "symbol=" & ActiveCell.Offset(0, 1).Value))

 

[Jack sparrow]

Thank you mate
With your help it worked