I have a string of cells that are populated by my macro. what i need to do is: each time the value populates, i need to copy just the value to another cell so i can record the results of the macro for a long string of numbers. heres what i have, this is not working for the last step - Sub Count() For x = 0 To 1000 On Error Resume Next mycount = Range("a1") + 1 Range("a1") = mycount Dim myRange As Range Set myRange = Worksheets("WMD Progression").Range("D7:D127") rownum = "=VLookup(a3, k6:z1000, 9, False)" Cells(13, rownum).Value = "NPV((0.04 / 12), Values(myRange))" Cells(21, rownum).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Cells(15, rownum).Value = "NPV((0.15 / 12), Values(myRange))" Cells(23, rownum).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Cells(17, rownum).Value = "NPV((0.30 / 12), Values(myRange))" Cells(25, rownum).Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False Next x End Sub

Software/Hardware used: