CoVBA looks at first line of code and then last - nothing in between

[BRISBANEBOB]

Hi (again)

Absolute newbie at code (any code, not just VBA). I have a sheet called MustDo, I have a sheet called Single, I have a named range called TemplateSelect which has a value of 1. When I run the code in step mode it just goes from the first line to the last without executing the middle. I realise this must be an absolutely basic mistake but I can't figure it.

Any help appreciated

Sub FieldTransfer()
    
If TemplateSelect = 1 Then
    Sheets("MustDo").Select
    Range("AA13:AG15").Select
    Selection.Copy
    Sheets("Single").Select
    Range("D12").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("D16").Select
    
End If

End Sub