Copy and paste range as values to specific sheet/range

Sub u4b1copy()
    Range("J4:L34").Copy
    Sheets("U4 Tracker").Range("B4").PasteSpecial xlValues
    Sheets("Sheet3").Range("B4").Copy
    Sheets("U4 Tracker").Range("B4").PasteSpecial xlValues
    Application.CutCopyMode = 0
End Sub

These two lines will show errors

Sheets("Sheet3").Select
    Range("B4").Select

Meant to be copy
I have assumed that the first line
Range("J4:L34").Select
refers to active sheet.