Macro Email Subject

[howard]

I have a macro for emailing which works perfectly, except I cannot get the subject to pull through from a named range called SubjectText

B2 is named as SubjectText

Book1
	A	B
1	Email
2	Subject	Sales for Aug 2017
3	Body	Attached please Sales data for Sep 2017 Regards
Sheet1

Zsubject = [subjectText]

 With OutMail
             .To = Join(Application.Transpose(Range("y1:y5").Value), ";")
            .CC = ""
            .BCC = ""
            .Subject = "&[Zsubject]&"

In outlook the subject appears as &[Zsubject]&


It would be appreciated if someone could assist me

 

[JackDanIce]

Try

.Subject = Zsubject

 

[howard]

Thanks for the amended coded

 

[JackDanIce]

You're welcome