How to add custom text to the end of each row - Microsoft Community

have spreadsheet prompt user defined text add end of each row. example, have 75 records need have "12345" @ end of them. how do this?

range("o2:o" & lr).value = format(myrange, "2")

be
range("o2:o" & lr).value = format(myrange,"#,##0")
or be
range("o2:o" & lr).value = myrange

Office / Excel / Windows 10 / Office 2016