Ventana de mensajes en macros

Una posibilidad: si tienes Excel 2000 o superior, puedes presentar un formulario como no modal y continuar con la ejecución del código. Por ejemplo, suponiendo que hubiera un formulario llamado UserForm1 que tiene una etiqueta llamada Label1:

Sub Probanding()
With UserForm1
Dim n As Long
.Show 0
.Label1 = "aaaaaaaa"
DoEvents
For n = 1 To 30000000#
Next n
.Label1 = "bbbbbbbb"
End With
End Sub


Si ejecutas el código anterior, verás que al principio la etiqueta muestra unas cuantas aes, y después el mismo número de bes.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Giancarlo" escribió en el mensaje news:a4dc01c4d619$32a4e3d0$
Hola a todos !!!

Durante la ejecución de un macro necesito que aprezca una
ventana con un mensaje, por ejemplo, "Procesando"
mienstras el macro continúa ejectutándose. Al finalizar
todos los procesos la ventana con el mensjae debe cerrarse.
He intentado con MsgBox pero no he podido hacerlo.

Alguien sabe como hacer esto?

Gracias anticipadas.

Slds,

Giancarlo

Fernando:

Antes que nada gracias por tu ayuda.

He copiado el código que me proporcionaste a un macro
nuevo pero no se ejecuta, obtengo el siguiente mensaje:
"Se ha producido un error '424' en tiempo de ejecución:
Se requiere un objeto"

Si sabes solucionarlo por favor íme cómo.
Por cierto tengo el Excel XP.

Slds,

Giancarlo

Una posibilidad: si tienes Excel 2000 o superior, puedes

presentar un formulario como no modal y continuar con la
ejecución del código. Por ejemplo, suponiendo que hubiera
un formulario llamado UserForm1 que tiene una etiqueta
llamada Label1:

Sub Probanding()
With UserForm1
Dim n As Long
.Show 0
.Label1 = "aaaaaaaa"
DoEvents
For n = 1 To 30000000#
Next n
.Label1 = "bbbbbbbb"
End With
End Sub


Si ejecutas el código anterior, verás que al principio la

etiqueta muestra unas cuantas aes, y después el mismo
número de bes.

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Giancarlo" escribió en el mensaje

news:a4dc01c4d619$32a4e3d0$

Hola a todos !!!

Durante la ejecución de un macro necesito que aprezca una
ventana con un mensaje, por ejemplo, "Procesando"
mienstras el macro continúa ejectutándose. Al finalizar
todos los procesos la ventana con el mensjae debe

cerrarse.

He intentado con MsgBox pero no he podido hacerlo.

Alguien sabe como hacer esto?

Gracias anticipadas.

Slds,

Giancarlo
.

Para que funcione el código tienes que tener un formulario llamado Userform1 que tenga una etiqueta llamada Label1 (ambos son los nombres que tienen por defecto).
Un saludo.


Fernando Arroyo
MS MVP - Excel


"Giancarlo" escribió en el mensaje news:9b0e01c4d622$89c35ad0$
Fernando:

Antes que nada gracias por tu ayuda.

He copiado el código que me proporcionaste a un macro
nuevo pero no se ejecuta, obtengo el siguiente mensaje:
"Se ha producido un error '424' en tiempo de ejecución:
Se requiere un objeto"

Si sabes solucionarlo por favor íme cómo.
Por cierto tengo el Excel XP.

Slds,

Giancarlo

OK. Gracias.
Slds,
Giancarlo

Para que funcione el código tienes que tener un

formulario llamado Userform1 que tenga una etiqueta
llamada Label1 (ambos son los nombres que tienen por
defecto).

Un saludo.


Fernando Arroyo
MS MVP - Excel


"Giancarlo" escribió en el mensaje

news:9b0e01c4d622$89c35ad0$

Fernando:

Antes que nada gracias por tu ayuda.

He copiado el código que me proporcionaste a un macro
nuevo pero no se ejecuta, obtengo el siguiente mensaje:
"Se ha producido un error '424' en tiempo de ejecución:
Se requiere un objeto"

Si sabes solucionarlo por favor íme cómo.
Por cierto tengo el Excel XP.

Slds,

Giancarlo



.