Ejecutar macro al cambiar un valor de la celda y avisar por email.

Buenas tardes. Agradecería enormemente si me ayudasen a resolver un problema que les planteo a continuación.Dispongo de una hoja de excel que se actualiza con una serie de valores por internet con una frecuencia determinada. Necesitaría crear una macro que me avisase via email cuando se cambia el valor de unas celdas en cuestión.He encontrado varios casos de macros en internet que hacen por separado lo que necesito, por ejemplo:

Private Sub Worksheet_Change(ByVal Target As Range)If Intersect([G5:G15], Target) Is Nothing Then Exit SubEnd Sub

Esta macro controlaría el cambio de valor de un rango especificado.

Sub correo()Range("b2:e11").CopySet parte1 = CreateObject("outlook.application")Set parte2 = parte1.createitem(olmailitem)parte2.to = "[email protected]"parte2.Subject = "asunto de mensaje"parte2.displayApplication.SendKeys "^v"Set parte1 = NothingSet parte2 = NothingEnd Sub

Esta macro copiaría el rango especificado y lo enviaría via email al correo del destinatario.Ahora. ¿Que necesitaría yo?, unir las dos macros en una y que tome los valores, no de un rango, sino de dos celdas específicas y las envíe al correo indicado para que cuando al actualizarse la página encuentre variación en alguna de las dos celdas, envíe un correo de aviso sobre su modificación.Les agradezco de antemano su colaboración.Un saludo.