I use the following VBA code to copy and paste cells based on a criteria. I need to change the code to only paste cell values and not cell format.
What do I need to change in the code?
Thank you
What do I need to change in the code?
Thank you
Code:
Sub UpdateScores()
Dim c As Range, lastrow As Long
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
Application.ScreenUpdating = False
For Each c In Range("p4:p" & lastrow)
If c.Value <> "" Then Range("k" & c.Row & ":p" & c.Row).Copy Range("j" & c.Row)
Next c
Application.ScreenUpdating = True
End Sub