jMSS,

Poste seu arquivo.

Segue meu arquivo:

a mainha linha de código que faz chamar ou que deveria fazer a seleção e levar até a outra user form são essas:

Private Sub ListView1_KeyPress(KeyAscii As Integer)
ListView1_Dblclick
End Sub
--------------------------------------------------------------------------
Private Sub lstv_Dblclick()

With UserForm1
.sql = wsCadastroClientes
.sql = .sql & " WHERE NF_ENTRADA = " & lstv.SelectedItem
Set .CarregaRegistro = carregaDados.Recordset

.wsCadastroClientes.Open .sql, adOpenKeyset, adLockOptimistic

Call .CarregaRegistro
.indice = id
.lblIndice.Caption = id
.lblTotal.Caption = Total

Set .wsCadastroClientes = Nothing

End With
Unload Me

End Sub