Macro copy paste value between worksheets

No No No....Here you go:

Option Explicit
Sub CopyX()
Dim Sheet2 As Worksheet, Sheet4 As Worksheet

Set Sheet2 = "2. Client precursor questions"
Set Sheet4 = "4. Checklist"

With Sheet2
    If Range("F7") = "x" Then
         Range("F7").Copy Sheet4.Range("G324:G325, G327:G329")
        Range("I7").Copy Sheet4.Range("H324:H330, H332:H334")
    End If
End With
End Sub