VBA for automatic email upon cell change via other formula

Please see attached example. all details there and noted clearly.

current code:

Sub emailinstant()

Dim OutApp As Object
Dim OutMail As Object
On Error Resume Next
Err.Clear
Set OutApp = GetObject(Class:="Outlook.Application")
If Err <> 0 Then Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)

On Error Resume Next
With OutMail
.To = ""
.CC = ""
.BCC = ""
.Subject = "TEST"
.Body = "TEST"
.Send
End With

Set OutMail = Nothing
Set OutApp = Nothing

end sub



thanks

Thank you for your input. I actually don't have a column of email addresses, but I may consider adding out to use this.

one question, I understand all of that (I think) but what is the (range("F:F") all about

Sorry I forgot I sent a little practise sheet for you to look at. I understand what you meant. I will add the emails to column C and add your script etc and let you know if it solves my problem. thanks

Sorry. your going to have to really dumb down your formula and explain it in lamens terms if you want to help. because I get feeling some of that code im not meant to copy but im being too stupid to realise. lol

error pic below