Cómo crear una barra de progreso en VBA (Excel)
Una barra de progreso muestra visualmente el avance de una macro en Excel. Se crea con un UserForm y controles Label que se van activando secuencialmente.
Pasos
- Abre Excel, pulsa Alt+F11 para abrir el editor VBA. En el explorador de proyectos, clic derecho > Insertar > UserForm. Desde el Cuadro de herramientas, inserta 10 etiquetas (Label) alineadas horizontalmente.
- Propiedades de cada Label: Height=42, Width=12, Top=12. Deja Visible=False inicialmente.
- Añade un CommandButton al formulario. Clic derecho > Ver código.
- Declara variable:
Dim cnt As Integer: cnt = 0. - En el evento
UserForm_Initialize, oculta todas las etiquetas:Me.Label1.Visible = False ... Me.Label10.Visible = False. - En el botón, usa un bucle
Do While cnt < 10conSelect Case cntpara mostrar cada label y poner suBackColor = vbBlue. IncluyeMe.RepaintyApplication.Wait Now + TimeValue("00:00:05")para pausar 5 segundos. Incrementacnt = cnt + 1yLoop. - Inserta un Módulo (Insertar > Módulo) y añade:
Sub showProgressBar().
UserForm1.Show
End Sub - Ejecuta con F5.
Esta barra simple muestra 10 pasos con 5 segundos cada uno; adapta tiempos y colores según necesites.
- ·Cómo crear un DVD en alta definición (HD DVD)
- ·Cómo quitar la barra de progreso en DirecTV DVR
- ·Cómo crear un árbol binario en C
- ·Cómo crear un gráfico 3D en Excel
- ·Cómo crear una cuenta de correo electrónico: opciones gratuitas y de pago
- ·Cómo crear un banner publicitario en HTML
- ·Cómo crear una cuenta de RocketMail
- ·Cómo crear códigos de barras en Microsoft Publisher con Excel y Mail Merge
