Goal: Copy the value only (not formulas) of a range of cells (B2:Y34) from Worksheet 6 to Worksheet7

Existing VBA code:

Sub Copy_Data()
Application.ScreenUpdating = False
Worksheets("Sheet6").Range("B2:Y34").Value = ActiveSheet("Sheet7").Range("B2:Y34").Value
Application.ScreenUpdating = True
End Sub

If anyone would be able to point me in the right direction I would greatly appreciate it. I am having trouble pinpointing and resolving the gliche.