Macro: Place Result Value Instead Of Formula

I am testing the code below...

Sub applyCombination()

Dim shtP As Worksheet
Dim j, k As Integer 'j = row; k = col

On Error GoTo errorhandler


Set shtP = Sheets("Sys-Year")........

k = k + 1
Next k
j = j + 2
Next j

Exit Sub


errorhandler:
Exit Sub

End Sub

and, as it is a bit slow to paste a formula in each cell, I was wandering:

Is there any way I can place the resulting value ONLY?

(I don't want to do copy and paste special just values as it takes even more time)