Broma

27/10/2007 - 19:11 por Belinda | Informe spam
Hola amigos...

Le he hecho a mi esposa una hojita para que lleve los gastos de la
casa, nada especial: Ingresos, gastos, observaciones y en C:2 el
saldo. Me gustaría que alguién me proporcionase una macro para que
cuando salga del libro, le salga una advertencia de que, dependiendo
del saldo que tenía al abrir el libro, le salga un mensaje,positivo o
negativo, dependiendo si el saldo de C:2 ha aumentado o disminuido,
sin ningún botón de aceptar o cancelar (queda feo...
Ya se que es una tontería, pero quiero ver como reacciona, pues le
tiene manía a los ordenadores...

Preguntas similare

Leer las respuestas

#1 julian-vlc-sp
27/10/2007 - 23:03 | Informe spam
¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.

Suponiendo que la celda C2 la tienes en la hoja llamada hoja1, podrías
probar poniendo lo siguiente en ThisWorkbook

Option Explicit
Public saldoinicio As Double

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim SaldoFinal As Double
SaldoFinal = Hoja1.Cells(2, 3)
If saldoinicio < SaldoFinal Then
MsgBox "El saldo ha aumentado"
End If
If saldoinicio > SaldoFinal Then
MsgBox "El saldo ha disminuido"
End If
If saldoinicio = SaldoFinal Then
MsgBox "El saldo se ha mantenido"
End If
End Sub

Private Sub Workbook_Open()
saldoinicio = Hoja1.Cells(2, 3)
End Sub



SALUDOS.
Julián-Valencia-España
http://ijulian.iespana.es/


"Belinda" escribió en el mensaje
news:
Hola amigos...

Le he hecho a mi esposa una hojita para que lleve los gastos de la
casa, nada especial: Ingresos, gastos, observaciones y en C:2 el
saldo. Me gustaría que alguién me proporcionase una macro para que
cuando salga del libro, le salga una advertencia de que, dependiendo
del saldo que tenía al abrir el libro, le salga un mensaje,positivo o
negativo, dependiendo si el saldo de C:2 ha aumentado o disminuido,
sin ningún botón de aceptar o cancelar (queda feo...
Ya se que es una tontería, pero quiero ver como reacciona, pues le
tiene manía a los ordenadores...
Respuesta Responder a este mensaje
#2 Belinda
29/10/2007 - 18:02 | Informe spam
On 27 oct, 22:03, "julian-vlc-sp" wrote:
> ¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.
>
Suponiendo que la celda C2 la tienes en la hoja llamada hoja1, podrías
probar poniendo lo siguiente en ThisWorkbook

Option Explicit
Public saldoinicio As Double

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim SaldoFinal As Double
SaldoFinal = Hoja1.Cells(2, 3)
If saldoinicio < SaldoFinal Then
MsgBox "El saldo ha aumentado"
End If
If saldoinicio > SaldoFinal Then
MsgBox "El saldo ha disminuido"
End If
If saldoinicio = SaldoFinal Then
MsgBox "El saldo se ha mantenido"
End If
End Sub

Private Sub Workbook_Open()
saldoinicio = Hoja1.Cells(2, 3)
End Sub

SALUDOS.
Julián-Valencia-Españahttp://ijulian.iespana.es/

"Belinda" escribió en el mensajenews:
Hola amigos...

Le he hecho a mi esposa una hojita para que lleve los gastos de la
casa, nada especial: Ingresos, gastos, observaciones y en C:2 el
saldo. Me gustaría que alguién me proporcionase una macro para que
cuando salga del libro, le salga una advertencia de que, dependiendo
del saldo que tenía al abrir el libro, le salga un mensaje,positivo o
negativo, dependiendo si el saldo de C:2 ha aumentado o disminuido,
sin ningún botón de aceptar o cancelar (queda feo...
Ya se que es una tontería, pero quiero ver como reacciona, pues le
tiene manía a los ordenadores...



..gracias julian, me sirve perfectamente...


Saludos
Respuesta Responder a este mensaje
#3 julian-vlc-sp
29/10/2007 - 19:43 | Informe spam
¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.

:-))


SALUDOS.
Julián-Valencia-España
http://ijulian.iespana.es/


"Belinda" escribió en el mensaje
news:
On 27 oct, 22:03, "julian-vlc-sp" wrote:
> ¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.
>
Suponiendo que la celda C2 la tienes en la hoja llamada hoja1, podrías
probar poniendo lo siguiente en ThisWorkbook

Option Explicit
Public saldoinicio As Double

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim SaldoFinal As Double
SaldoFinal = Hoja1.Cells(2, 3)
If saldoinicio < SaldoFinal Then
MsgBox "El saldo ha aumentado"
End If
If saldoinicio > SaldoFinal Then
MsgBox "El saldo ha disminuido"
End If
If saldoinicio = SaldoFinal Then
MsgBox "El saldo se ha mantenido"
End If
End Sub

Private Sub Workbook_Open()
saldoinicio = Hoja1.Cells(2, 3)
End Sub

SALUDOS.
Julián-Valencia-Españahttp://ijulian.iespana.es/

"Belinda" escribió en el
mensajenews:
Hola amigos...

Le he hecho a mi esposa una hojita para que lleve los gastos de la
casa, nada especial: Ingresos, gastos, observaciones y en C:2 el
saldo. Me gustaría que alguién me proporcionase una macro para que
cuando salga del libro, le salga una advertencia de que, dependiendo
del saldo que tenía al abrir el libro, le salga un mensaje,positivo o
negativo, dependiendo si el saldo de C:2 ha aumentado o disminuido,
sin ningún botón de aceptar o cancelar (queda feo...
Ya se que es una tontería, pero quiero ver como reacciona, pues le
tiene manía a los ordenadores...



..gracias julian, me sirve perfectamente...


Saludos
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida