Dos Formularios VBA en una misma fila en excel

Pero antes de pasar al userform2 tienes que validar que los datos del userform1 ya fueron agregados. Otra opción es, antes de pasar al userform2 validar que estén correctos los datos del userform1, después al presionar el botón insertar del userform2, se deberán guardar los datos del usreform1 y del userform2 en la misma fila.

Veo que en tu macro estás insertando una fila, ¿quieres qué se inserte la fila o que se guarden en la siguiente fila disponible?, es decir, en la fila 4, luego en la 5, 6, etc.

Dime cómo quieres hacerlo.

Dante, buen día, la opción más correcta a lo que quiero que realice la macro es "antes de pasar al userform2 validar que estén correctos los datos del userform1, después al presionar el botón insertar del userform2, se deberán guardar los datos del usreform1 y del userform2 en la misma fila."

Después cuando quiera ingresar de nuevo a cargar el formulario sea en la siguiente disponible, cabe agregar que tiene otro módulo en que cual me agrega en forma ascendente, los datos de las columna "A y D"

Desde ya muchas gracias!

Te anexo el código completo para insertar el registro en la siguiente fila disponible, tal como lo necesitas.

Código para el UserForm1

Private Sub CommandButton1_Click()
'El botón1 del userform1 ya no es necesario
End Sub
Private Sub CommandButton3_Click()
'Por.Dante Amor
'Botón 3 del userform1 para Abrir el formulario 2
    '
    'Valida los datos
    If ComboBox1 = "" Then
        MsgBox "El combo1 está vacío, favor de capturar un dato correcto.", vbExclamation, "CAPTURA"
        Exit Sub
    End If
    If ComboBox2 = "" Then
        MsgBox "El combo2 está vacío, favor de capturar un dato correcto.", vbExclamation, "CAPTURA"
        Exit Sub
    End If
    If ComboBox3 = "" Then
        MsgBox "El combo3 está vacío, favor de capturar un dato correcto.", vbExclamation, "CAPTURA"
        Exit Sub
    End If
    '
    'Abre userform2
    UserForm2.Show
    '
    Unload Me
End Sub

Código para el UserForm2

Private Sub CommandButton1_Click()
'Botón para insertar
    Set h1 = Sheets("sheet1")
    '
    'Validación de datos
    If TextBox3 = "" Then
        MsgBox "Capturar información en el textbox3", vbExclamation, "CAPTURA"
        Exit Sub
    End If
    'Fila siguiente
    u = h1.Range("A" & Rows.Count).End(xlUp).Row + 1
    '
    'Se insertan los datos del form1
    h1.Cells(u, 1) = UserForm1.ComboBox1
    h1.Cells(u, 2) = UserForm1.ComboBox2
    h1.Cells(u, 3) = UserForm1.ComboBox3
    'Se insertan los datos del form2
    h1.Cells(u, 4) = TextBox3
    h1.Cells(u, 5) = ComboBox6
    h1.Cells(u, 6) = TextBox4
    'Limpiar datos
    UserForm1.ComboBox1 = Empty
    UserForm1.ComboBox2 = Empty
    UserForm1.ComboBox3 = Empty
    TextBox3 = Empty
    ComboBox6 = Empty
    TextBox4 = Empty
    '
    MsgBox "Datos insertados", vbInformation, "CAPTURA"
    Unload Me
End Sub

S a l u d o s . D a n t e   A m o r

Recuerda valorar la respuesta.

Sabe cargue los datos como usted los hizo y me da este error un error 

Entiendo que h1 = sheets1 (sheet1) y u hace referencia a la fila y el num a la culumna pero cuando le hago un click al botón agregar me da error 424 y cuando lo depuero me selecciona esa fila.

Desde ya muchas gracias!!!

Si agregaras los datos al final sería fácil de determinar el fin de rango... pero como estás insertando una fila para colocar los datos al inicio, no debes insertar nuevamente la fila desde el 2do formulario.

Esto claro está siempre y cuando el orden de ejecución es siempre el mismo: primero el 1ro y luego el 2do (valga la redundancia ;)

Entonces aquí retira la línea que marco de negrita:

Private Sub CommandButton1_Click()

Sheets("sheet1").Activate
ActiveSheet.Cells(2, 4).Select
Selection.EntireRow.Insert
ActiveSheet.Cells(2, 4) = TextBox3
ActiveSheet.Cells(2, 5) = ComboBox6

Sdos y comentame ...

Elsa, buen día, ya había probado con borrar lo que resaltas en negrita, pero no m carga los datos en la fila que quiero (que es la fila en donde están los datos de la useform1), sino que reemplaza los datos y quedan siempre en la fila "H2:Z2"

Muchas gracias por todo!