I've got the code below, which works fine to produce the following value:
(it figures out how many rows of data, then picks up the column A value, adds some text and the row number)
I want to have the formula produce the following result including the quotation marks:
but I can't figure out how to get the other quotes to be put in. I've tried the """" and Char(34) method but can't get it right.
Const ResultColumn = "E" 'column for result pasting
Dim lRow As Long
lRow = Range("A" & Rows.Count).End(xlUp).Row
Range(Cells(1, ResultColumn), Cells(lRow, ResultColumn)).FormulaR1C1 = _
"=CONCATENATE(""(A"" & row() & "")="" & RC[-4] )"