De mi form Copiar datos de varios combobox y textbox a una hoja X en celdas diferentes y luego imprimir esa hoja X

Soy primerizo en este Foro de Expertos. Quisiera su ayuda...

Tengo un archivo en donde genero un formulario para realizar una búsqueda con un combobox y el resultado me muestra lo que busco y en un textbox el dato de la otra columna que busco. Esto lo repito en un total de 15 combobox y textbox en el mismo formulario.

Quiero generar con un CommandButton, me copie los datos de los combobox y textbox a una hoja que nombre "temp" en celdas diferentes y esa hoja que ya tengo ajustada poder imprimirla, y luego me limpie esas celdas de la hoja "temp" junto a los combobox y textbox del form, para poder buscar otros datos e imprimirlos.

NOTA: la hoja "temp" es la "HOJA4" en mi libro.

.- Este es mi comando de busqueda que me funciona para cada combobox

Private Sub ComboBox1_Change()
Dim fila As Integer
Dim final As Integer

If ComboBox1.Value = "" Then
Me.TextBox1 = ""
End If

For fila = 2 To 5000
If Hoja5.Cells(fila, 2) = "" Then
final = fila - 1
Exit For
End If
Next

For fila = 2 To final
If ComboBox1 = Hoja5.Cells(fila, 2) Then
Me.TextBox1 = Hoja5.Cells(fila, 4)
Exit For
End If
Next

End Sub

---------------------------------------------------------

Private Sub ComboBox1_Enter()
Dim fila As Integer
Dim final As Integer
Dim Lista As String

For fila = 1 To ComboBox1.ListCount
ComboBox1.RemoveItem 0
Next fila

For fila = 2 To 5000
If Hoja5.Cells(fila, 2) = "" Then
final = fila - 1
Exit For
End If
Next
For fila = 2 To final
Lista = Hoja5.Cells(fila, 2)
ComboBox1.AddItem (Lista)
Next

End Sub

-----------------------------------------

Esta es mi hoja que quiero imprimir y llenar celdas con los datos del form

Espero me haya podido explicar bien y me puedan ayudar