Como puxo informações para mais de um formulário

Olá, bom dia!

Tenho um formuário chamado cadVendedor e outro formulário chamado pesqCadEndereco. Antes de trabalhar com esses dois formulários eu criei um código que pudesse buscar o endereço do formulário pesqCadEndereco para cadCliente.
Agora deste mesmo formulário pesqCadEndereco, eu quero puxar o endereço para cadVendedor. Alguém poderia me ajudar.

Vou mostrar os código que utilizei.

Código:

Private Sub fncCapturarProduto()
   On Error Resume Next
   Dim Linha As Integer
   Linha = Me.list_SelectEnderecos.ListIndex + 1
   If Selecionado = True Then
       Forms![cadCliente].Form.cep.Value = Me.list_SelectEnderecos.Column(1, Linha)
       Forms![cadCliente].Form.enderecoCliente.Value = Me.list_SelectEnderecos.Column(2, Linha)
       Forms![cadCliente].Form.bairro.Value = Me.list_SelectEnderecos.Column(3, Linha)
       Forms![cadCliente].Form.estado.Value = Me.list_SelectEnderecos.Column(4, Linha)
       Forms![cadCliente].Form.cidade.Value = Me.list_SelectEnderecos.Column(5, Linha)
       Forms![cadCliente].Form.pais.Value = Me.list_SelectEnderecos.Column(6, Linha)
       
   End If
   Forms![cadCliente].Form.numero.SetFocus


Private Sub list_SelectEnderecos_DblClick(Cancel As Integer)
Call fncCapturarProduto

Option Compare Database
Dim Selecionado As Boolean

Disponibilizei meu banco para que possa me ajudar nessa minha dúvida. Obrigado!

boa tarde
manda o bd para analise. falando assim fica dificil, td depende da estrutura do bd.

Já resolvi amigo, obrigado!

blz,
então so marca como resolvido no topico.
o forum agradece o retorno