VB - Cami

Sub IngresarTrabajador()
    Dim FilaObjetivo As Long
    FilaObjetivo = Range.("NuevaFila").Value

    Worksheets("Trabajadores_produccion").Cell(FilaObjetivo, 1).Value = Range("Tipo_trabajador").Value
    Worksheets("Trabajadores_produccion").Cell(FilaObjetivo, 2).Value = Range("Nombre_Trabajador").Value
    Worksheets("Trabajadores_produccion").Cell(FilaObjetivo, 3).Value = Range("Sueldo").Value
    Worksheets("Trabajadores_produccion").Cell(FilaObjetivo, 4).Value = Range("Horas").Value

    MsgBox "Agregado"

End Sub