☰

Macros de formulario de usuario de Excel 2016, Windows 7

tag-icon • tag-icon windows-7 macros microsoft-excel-2016
Macros de formulario de usuario de Excel 2016, Windows 7

Creé un formulario de usuario en Excel 2016 que contiene varios cuadros combinados, varios cuadros de texto, dos botones de opción y un botón de envío. Primero, ¿cómo consigo que los cuadros combinados hagan referencia a una lista que ya he configurado?

Respuesta1

Puede activar un evento utilizando el controlador de eventos form_activate. Haga clic derecho en su formulario de usuario en la ventana del proyecto y haga clic en "Ver código"

Pegue algo de esta naturaleza en la ventana de código:

Private Sub UserForm_Activate()
    ComboBox1.AddItem ("1")
    ComboBox1.AddItem ("2")
    ComboBox1.AddItem ("3")
End Sub

Esto cargará elementos en el cuadro combinado. También puedes cambiarlo a algo como esto:

Private Sub UserForm_Activate()
    ComboBox1.AddItem (range("'Sheet1'!A1").value)
    ComboBox1.AddItem (range("'Sheet1'!A2").value)
End Sub

si los elementos de su cuadro combinado están en alguna parte de la hoja de Excel.

Una vez que se crea el evento Activar, necesita algo que abra el formulario en primer lugar (lo cual estoy seguro de que ya ha descubierto). Entonces algo como esto:

Public Sub show_form()
    UserForm1.Show
End Sub

luego llamarías al evento show_form mediante un botón o algo en la hoja de Excel.

Ejemplo completo

Aquí hay un ejemplo completo:

Cree un nuevo libro de trabajo. Pon algunos datos en A1 y A2. Mantenga el nombre de hoja predeterminado de "Hoja1"

Presione Alt F11 para abrir el lado de VBA. haga clic en Insertar > Formulario de usuario

Aparece UserForm1. Haga clic derecho sobre él y haga clic en Ver código. Pega esto:

Private Sub UserForm_Activate()
    ComboBox1.AddItem (Range("'Sheet1'!A1").Value)
    ComboBox1.AddItem (Range("'Sheet1'!A2").Value)
End Sub

Haga doble clic en ThisWorkBook en el árbol. Haga clic en Insertar > Módulo. Pega esto:

Public Sub show_form()
    UserForm1.Show
End Sub

Tu árbol debería verse así:

ingrese la descripción de la imagen aquí

Ahora, en el libro de Excel, agregue una forma como un cuadro. Haga clic derecho en su forma y haga clic en Asignar macro. Seleccione mostrar_formulario.

Ahora intenta correr. Haz clic en la forma que tenías. Esto debería mostrar el formulario. Al hacer clic en el menú desplegable, debería tener dos elementos completos.

Respuesta2

Aquí hay un ejemplo completo:

Cree un nuevo libro de trabajo. Pon algunos datos en A1 y A2. Mantenga el nombre de hoja predeterminado de "Hoja1"

Presione Alt F11 para abrir el lado de VBA. haga clic en Insertar > Formulario de usuario

Aparece UserForm1. Haga clic derecho sobre él y haga clic en Ver código. Pega esto:

Private Sub UserForm_Activate() ComboBox1.AddItem (Range("'Sheet1'!A1").Value) ComboBox1.AddItem (Range("'Sheet1'!A2").Value) End Sub Haga doble clic en ThisWorkBook en el árbol. Haga clic en Insertar > Módulo. Pega esto:

Public Sub show_form() UserForm1.Show End Sub

información relacionada