Hi, I am trying to generate an email from an excel where part of the body is taken from a list on the sheet and has words added next to it. i.e the list contanins apples,oranges,pears and i want the email body to say option1 apples option2 oranges etc. this is my code for that but it doesnt seem to work Dim leg() As Variant leg() = Range(FirstRange, LastRange).Value Dim a As Variant For a = FirstRange To LastRange leg(a) = "Leg" & "[" & a & "]" Next a
Solved by K. H. in 14 mins