Insertar filas a formato excel según registros en listbox
Tengo un formulario (Uf_EntradaMaterial) en el cual capturo información que posteriormente se pasa a un listbox ( Listbox2), hasta aquí todo me funciona muy bien, posteriormente debo pasar la totalidad de la información contenida en el listbox a un formato contenido en una hoja del libro de excel de nombre Fmto_EA, lo que necesito es que cuando el número de items contenidos en el listbox sea superior a 47, me inserte en la hoja del formato a partir de la fila 57, una fila por cada registro adicional que haya en el listbox, actualmente utilizo el siguinte código, pero no he logrado hacer que me funcione correctamente.
Set he = Sheets("Fmto_EA")
j = 57
For e = 0 To Uf_EntradaMaterial.ListBox2.ListCount - 1
If Uf_EntradaMaterial.ListBox2.ListCount - 1 > 47 Then
he.Rows(j).Insert
he.Cells(j, "B") = Uf_EntradaMaterial.ListBox2.List(e)
End If
Next
Agradezco inmensamente al experto que me pueda colaborar con este tema