Add additional attachments to email if Check box checked

I have solved this myself with the code below thanks for all those who tried.
Putting this up in case anyone else needs it.

 If Sheets("Template").Range("CA29").Value <> False Then
     wbAttachment = Application.GetOpenFilename("All Files (*.*), *.*")
     .Attachments.Add (wbAttachment)
      .send
Else
         .send
           
        End If