Como mandar mensaje con excel?????

[K_Qseo]

Hola

Mi problema es el siguiente quiero que cuando me baje una casilla de un valor me salga y mensaje en el pc que esta con la hoja excel y que me mande un mensaje a otro pc para que sepa que el stock esta por debajo del limite.

Gracias de antemano.

[David]

Para mandar el mensaje en el mismo PC puedes usar un MsgBox (en el evento Change de la Hoja). Para el mensaje a otro PC ya es un poco más complicado, te sugiero que utilices el servicio de mensajería de Windows (deberás activarlo en el Panel de Control) así con net send podrás enviar el mensaje.

[K_Qseo]

Gracias por la pronta respuesta

Pero me quedan unas cuantas dudas, porque se me ha olvidado decir que mi nivel es muy basico de excel pero tengo algo de idea de visual basic.

Como puedo decirle que me compruebe una celda cada vez que halla un cambio porque con lo que tengo me sale un mensaje cada vez que hago un cambio pero la celda que me tiene que comprobar es el resultado de una operacion.

Espero haberme explicado

Muchas gracias de antemano

PD He visto que hay una funcion sendermail, pero no la entiendo eso para mas edelante

[David]

Pues, como te dije, en el evento Change de la hoja puedes hacer lo que necesitas.

Creo que sendermail es para envío de correo y no para envío de mensajes propiamente dichos a otra computadora.

[K_Qseo]

Gracias por tu ayuda pero ahora que he encontrao como mandar el correo por outlook con este codigo

Sub Mail_with_outlook()
Dim OutApp As Object
Dim OutMail As Object
Dim strto As String, strcc As String, strbcc As String
Dim strsub As String, strbody As String

Set OutApp = CreateObject("Outlook.Application")
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)

strto = "[email protected]"
strcc = ""
strbcc = ""
strsub = "Important message"
strbody = "Hi there" & vbNewLine & vbNewLine & _
"Cell A1 is changed"

With OutMail
.To = strto
.CC = strcc
.BCC = strbcc
.Subject = strsub
.Body = strbody
.Send
End With

Set OutMail = Nothing
Set OutApp = Nothing
End Sub


Se me queda en la bandeja de salida pero lo tengo que abrir y darle a enviar desde el boton

Sabes como hacer que lo envie y no lo deje en la bandeja

Gracias nuevamente

[David]

Según tengo entendido, el sistema de seguridad de Outlook ya no permite enviar correo automáticamente sin conocimiento del propietario, así que es probable que por eso se quede en el buzón de salida.

[K_Qseo]

Muchas gracias por todo, lo he solucionado mandando por el outlook express

Este es el link de donde he conseguido el codigo

http://www.rondebruin.nl/sendmail.htm

porsi a alguien mas le puede servir

[abrahamvj]

Pues no es por nada, pero, la "casi autorespuesta", pues como que no tiene una relacion directa con la pregunta inicial!

Abraham

[David]

Es que en la pregunta inicial había puesto cómo enviar un mensaje a otro PC, aunque no había especificado que era un email .

Pero bueno, ya lo ha resuelto .

[K_Qseo]

Pues si, pero como lo he visto mas sencinllo de esta forma y que con el net send y asi queda constancia del mensaje , pos lo dejo asi

Un saludo y gracias por la ayuda