VBA - ActiveSheet name as Email Subject

[BenGee]

With OutMail
            .to = "name@name.co.uk"
            .CC = ""
            .BCC = ""
            .Subject = [COLOR=#ff0000]"Callback For" & Range("F1").Value[/COLOR]
            .Body = "Hi there"
            .Attachments.Add Destwb.FullName

However, the email comes up with no subject. I've also tried;

[COLOR=#ff0000]"Callback For" & Range("F1").Select[/COLOR]

[COLOR=#ff0000]"Callback For" & Range("F1")[/COLOR]

I can't see what I'm missing. Any help would be greatly appreciated

 

[Leith Ross]

Hello BenGee,

What error message comes up?

 

[tygrrboi]

Your post title says you are looking to send the active sheet name as the subject... Is there anything written in F1?


You could try to make a string before hand

Dim subjectString as String

subjectString = "Callback For " & Range("F1").Value

With OutMail
            .to = "name@name.co.uk"
            .CC = ""
            .BCC = ""
            .Subject = [COLOR=#ff0000]subjectString[/COLOR]
            .Body = "Hi there"
            .Attachments.Add Destwb.FullName

End With

 

[BenGee]

Thank you tygrrboi & Leith Ross for replying.

I've managed to sort now. The original code did work, it was just the cell the code was referencing contained formula not text. So have now converted this to text.