Paste Special Vlaue
Sub PasteSpecial_values()
Dim rng As Range
Set rng = Cells(3, "L")
rng = "=COUNTIF(D2:D1842,D2)"
rng.Copy
rng.PasteSpecial Paste:=xlValues
End Sub
Dim rng As Range
Set rng = Cells(3, "L")
rng = "=COUNTIF(D2:D1842,D2)"
rng.Copy
rng.PasteSpecial Paste:=xlValues
End Sub
Comments
Post a Comment
jeetexceltips@gmail.com