Vba code not working anymore

[jamesdean1379]

Hey guys, i was using the below code to insert new column and combine two columns into the new column while adding some text between the inserts but went to run it today and all of the sudden its not working anymore, i tried playing around with it and using good ol' google to try and figure it out, but i cant. Any help will be much appreciated.

ORIGINAL CODE

Sub Combine()
    Dim lLastRow As Long
    lLastRow = Range("A" & Rows.Count).End(xlUp).Row
    Columns("B").Insert
    Range("B1") = "Combine"
    Range("B2:B" & lLastRow).FormulaR1C1 = "=RC[-1] & ""~NU"" & RC[1]"
End Sub

BEFORE

AFTER

 

[jamesdean1379]

PLEASE DISREGARD, GOT IT TO WORK. USER ERROR -_-