Crear formulario de ingreso y salida

Primero muchas gracias por leer mi consulta lo que estoy tratando de hacer es un form en la hoja 1 con 4 texbox llamados Area, código, descripción, cantidad, tipo de movimiento( salida o ingreso) y lo que necesito es poder ingresar el registro en la hoja 2, cualquier ejemplo me sirve para poder orientarme ya que no he visto nada de maros como en 2 años.

3 Respuestas

Respuesta

Aquí se hablo del mismo tema: Ejemplo

Respuesta
1
Respuesta

[Hola 

Te paso la macro


Valora la respuesta para finalizar saludos!

Private Sub CommandButton1_Click()
    Set h2 = Sheets("Hoja2")    ' Nombre de la hoja
    If TextBox1 = "" And TextBox2 = "" And TextBox3 = "" _
    And TextBox4 = "" Then
        MsgBox "Ingrese datos en todos los campos "
        Exit Sub
    End If
    u = h2.Range("A" & Rows.Count).End(xlUp).Row + 1
    '
    If u < 2 Then u = 2
    '
    h2.Cells(u, "A") = TextBox1
    h2.Cells(u, "B") = TextBox2
    h2.Cells(u, "C") = TextBox3
    h2.Cells(u, "D") = TextBox4
    '
    TextBox1 = ""
    TextBox2 = ""
    TextBox3 = ""
    TextBox4 = ""
    '
    MsgBox "Registrado correctamente"
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas