Control multipage
Hola necesito un poco de ayuda con el control multipage.
Quiero crear en un gormulario un control multipage con tantas páginas como elementos tiene una lista de un comb box, no encuentro la forma de cambiar el numero de páginas en tiempo real, osea durante la ejecución del formulario.
No se si alguien podría echarme una manilla.
Cualquier ayuda es bienvenida
Gracias de antemano :-)
Quiero crear en un gormulario un control multipage con tantas páginas como elementos tiene una lista de un comb box, no encuentro la forma de cambiar el numero de páginas en tiempo real, osea durante la ejecución del formulario.
No se si alguien podría echarme una manilla.
Cualquier ayuda es bienvenida
Gracias de antemano :-)
Respuesta de Elsa Matilde
1
Siguiendo tu ejemplo, cree un Userform con un control multipage de 1 sola página (Page1) y en él tengo un combobox y un botón de comando.
Este botón tiene la siguiente rutina:
Private Sub CommandButton1_Click()
Dim conta As Byte
conta = 1 'porque ya existe el page0
While conta < ComboBox1.Value
MultiPage1.Pages.Add "Page" & conta, "nombre de tu page"
conta = conta + 1
Wend
End Sub
La rutina también podría estar en el evento click del combobox.
Espero te sirva la idea.
Saludos
Elsa
PD) No te pierdas mi manual '300 Macros' explicadas en español.
Descarga la demo gratis desde:
Este botón tiene la siguiente rutina:
Private Sub CommandButton1_Click()
Dim conta As Byte
conta = 1 'porque ya existe el page0
While conta < ComboBox1.Value
MultiPage1.Pages.Add "Page" & conta, "nombre de tu page"
conta = conta + 1
Wend
End Sub
La rutina también podría estar en el evento click del combobox.
Espero te sirva la idea.
Saludos
Elsa
PD) No te pierdas mi manual '300 Macros' explicadas en español.
Descarga la demo gratis desde:
