Excel VBA TextBox
El cuadro de texto es simplemente como un cuadro que se usa para obtener información de un usuario, los cuadros de texto son parte de los formularios de usuario y en la pestaña de desarrollador en cualquier hoja de trabajo de Excel, si queremos hacer cuadros de texto en un formulario de usuario, podemos seleccionar la opción de cuadro de texto desde los controles de formulario de usuario en VBA o en la hoja de trabajo, podemos seleccionarlo desde la pestaña de diseño.
VBA TextBox es uno de los controles de los muchos controles del formulario de usuario. Al mostrar el cuadro de texto en el formulario de usuario, podemos pedirles que ingresen los datos en el cuadro de texto, y los datos ingresados por el usuario se pueden almacenar en la hoja de trabajo con códigos simples.
Los formularios de usuario son muy atractivos en la codificación VBA. Nos ayuda enormemente, especialmente cuando necesitamos obtener información de los usuarios. Con los formularios de usuario, tenemos muchos controles y para obtener el valor de entrada de los usuarios, "Cuadro de texto" es la opción ideal en un formulario de usuario. Al poner un cuadro de texto en el formulario de usuario, podemos decirle al usuario que ingrese el valor requerido en el cuadro de texto que estamos mostrando. Si no tiene idea sobre los cuadros de texto de VBA, este artículo hará un recorrido por los cuadros de texto de VBA.
¿Cómo insertar TextBox en VBA UserForm?
Para insertar un cuadro de texto primero, necesitamos insertar el formulario de usuario. Para insertar un formulario de usuario, vaya a Insertar> Formulario de usuario.
Tan pronto como haga clic en Formulario de usuario, lo haremos como otro módulo.
Haga clic en Formulario de usuario para ver los controles del formulario de usuario.
En esta caja de herramientas de Controles, seleccione “TextBox” y arrastre el formulario de usuario.
Con esto, podemos ver muchas propiedades asociadas con este cuadro de texto.
Propiedades de TextBox
Presione la tecla F4 para ver las Propiedades del cuadro de texto.
Como podemos ver, el cuadro de texto tiene Nombre, color, Borde como este. Ahora dé un nombre apropiado para que podamos referirnos fácilmente a este cuadro de texto mientras codificamos.
Ejemplo de uso de TextBox en Userform
Realizaremos uno de los proyectos con texto VBA. Crearemos un formulario de usuario de entrada de datos para almacenar los detalles de los empleados.
Paso 1: en el formulario de usuario, dibuja Etiqueta.
Paso 2: cambie el texto predeterminado de la etiqueta a "Nombre del empleado".
Paso 3: Delante de la etiqueta, dibuja un cuadro de texto.
Paso 4: asigne un nombre adecuado al cuadro de texto como "EmpNameTextBox".
Paso 5: ahora dibuje una etiqueta más debajo de la primera etiqueta e ingrese el texto como "ID de empleado".
Paso 6: frente a la segunda etiqueta, dibuje un cuadro de texto más y asígnele el nombre "EmpIDTextBox".
Paso 7: dibuja una etiqueta más e ingresa el texto como "Salario".
Paso 8: Dibuje un cuadro de texto más delante de la etiqueta "Salario" y asígnele el nombre "Cuadro de texto de salario".
Paso 9: Ahora inserte el "Botón de comando" de la Caja de herramientas.
Paso 10: cambie el texto del botón de comando a "Enviar".
Ok, hemos terminado con la parte de diseño del formulario de usuario. Ahora necesitamos escribir el código para almacenar los datos ingresados en este formulario de usuario. A partir de ahora, ejecute el formulario de usuario presionando la tecla F5. Deberíamos ver un formulario de usuario como este.
Paso 11: cambie el título del formulario de usuario en la ventana Propiedades.
Paso 12: Ahora haga doble clic en el botón Enviar comando. Tan pronto como haga doble clic, verá este procedimiento secundario automático como el siguiente.
Aquí es cuando hace clic en el botón Enviar, lo que debería suceder. Necesitamos mencionar las tareas en el código VBA. En este proyecto, nuestro objetivo es almacenar los datos ingresados en el cuadro de texto tan pronto como hagamos clic en el botón Enviar.
Para esto, primero, cree una plantilla como esta en la hoja de trabajo llamada "Hoja de empleados".
Step 13: Now come back to the visual basic editor. Inside the button, click subroutine in VBA first to determine the last used row by using the below code.
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 End Sub
Step 14: First thing is in the first column we will store Employee Name. So for this, we need to access the text box named “EmpNameTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value End Sub
Step 15: In the second column, we need to store Employee ID. So this will be obtained by accessing the text box named “EmpIDTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value End Sub
Step 16: At last, we need to store the salary part. For this, we need to access to text box named “SalaryTextBox.”
Code:
Private Sub CommandButton1_Click() Dim LR As Long LR = Worksheets("Employee Sheet").cell(Rows.Count, 1).End(xlUp).Row + 1 Ramge("A" & LR).Value = EmpNameTextBox.Value Ramge("B" & LR).Value = EmpIDTextBox.Value Range("C" & LR).Value = SalaryTextBox.Value End Sub
Ok, we are done with the coding part as well. Now run the code using the F5 key. We should see a User Form like the below.
A partir de ahora, todas las cajas están vacías.
Primero llene los detalles.
Ahora haga clic en el botón "Enviar". Almacenará los datos en la hoja de trabajo.
De esta manera, puede seguir ingresando los datos y presionar y enviar el botón. Este es el formulario de usuario de entrada de datos simple con un cuadro de texto.
