Cómo transferir datos de un formulario de usuario a una hoja de trabajo

Nivel de dificultad:

Fácil

Cómo transferir datos desde un formulario de usuario a una hoja de cálculo

1. 1

   Abre Microsoft Excel y crea un nuevo libro en blanco haciendo clic en el menú Archivo y selecciona "Nuevo". Guarda el archivo de Excel como "update_worksheet.xls".

2. 2

   Mantén el libro abierto y abre el Editor de Visual Basic pulsando Alt-F11. Crea un nuevo formulario de usuario haciendo clic en el menú Insertar y selecciona la opción "formulario de usuario". Nombre el formulario "transferForm" cambiando el nombre de atributo en el menú Propiedades. Cambia el atributo de título a "transferForm".

3. 3

   Agrega un cuadro de texto al formulario mediante la selección de un cuadro de texto de la caja de herramientas y arrástralo a su lugar en el formulario. Nombra el cuadro "transferInput" en la ventana de propiedades. Si la caja de herramientas no está abierta, selecciona el menú Ver y Herramientas.

4. 4

   Agrega un botón de actualización al formulario mediante la selección de un control CommandButton del cuadro de herramientas y arrástralo a su lugar en el formulario. Nombra el CommandButton "transferButton" en la ventana de propiedades y cambia el atributo a "Actualizar Hoja de cálculo".

5. 5

   Agrega un botón de cierre al formulario mediante la selección de un segundo CommandButton de la caja de herramientas y arrástralo a su lugar en el formulario. Nombra en el CommandButton "CloseButton" en la ventana de propiedades y cambia el atributo a "Cerrar formulario".

6. 6

   Abre el editor de código de Visual Basic, haz doble clic en el transferButton (botón de actualización). Agrega código al _CLICK transferButton () que transfiera los datos introducidos en el cuadro de texto a la hoja de update_worksheet.xls cuando el usuario haga clic en el botón. Cierra el editor de código de Visual Basic. Private Sub transferButton_Click() Dim transferWorksheet as Worksheet Set transferWorksheet = Worksheets(“Sheet1”) transferWorksheet.Cells(1,1).Value = Me.transferInput.Value End Sub

7. 7

   Vuelve a abrir el editor de código de Visual Basic, haz doble clic en el CloseButton (botón de cierre). Agrega código a la función closeButton_Click () que cierre el formulario cuando el usuario haga clic en el botón. Cierra el editor de código de Visual Basic. Privado closeButton_Click Sub () Unload Me End Sub

8. 8

   Ejecuta el código del formulario haciendo clic en el menú Ejecutar y selecciona "Ejecutar Sub / UserForm". Introduce los datos en el campo de entrada y haz clic en el "transferButton". Asegúrate de que los datos se transfieren con éxito al valor de la primera celda de la hoja de cálculo Excel, cambia a Excel si es necesario. Guarda y cierra el formulario de usuario en ejecución.

9. 9

   Usa un procedimiento de evento de Excel para abrir el formulario de usuario cuando un usuario abra el libro en Excel. Abre el Explorador de proyectos y haz doble clic en la ventana de código ThisWorkbook. Introduce una macro que abra el formulario cuando se abra la hoja de cálculo y guárdala. Guarda y cierra Visual Basic y update_worksheet.xls. Private Sub Workbook_Open () transferForm.Show End Sub

10. 10

    Vuelve a abrir "update_worksheet.xls". El formulario transferForm se abrirá. Escribe algún texto en el campo "transferInput" y haz clic en el "transferButton". El texto escrito en el formulario de usuario transferForm será transferido a la primera celda en Sheet1 en update_worksheet.xls.

Read this article in English: How to Transfer Data From UserForm to a Worksheet