Private Sub ComboBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
ActiveWorkbook.SendMail ComboBox1.Value
End Sub
with a combobox from the control toolbox you can use this.
When you double click on the combobox after you choose the address it
will send the mail
--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl
"Joe 90" wrote in message ...
Have been working up an app and need to send emails from it.
Using Sendmail I can happily email colleagues if I use the prescribed
syntax:
Activeworkbook.Sendmail "Joe 90" (with Joe 90 being a valid name)
However I want to chose a name from a list in a combobox, place that name in
a variable and use that variable to send the email with:
dim name
name = Combobox1.Value (have left out the rest of the defining info, e.g.
workbook,worksheet etc)
Activeworkbook.Sendmail name
This doesn't work (even though I make sure all the inverted commas are there
in the name variable)
Is there a way to do this?
Cheers
Joe 90