UserForm carregando um hyperlink

[wolmyneto]

Bom dia!
Tenho um problema e gostaria de saber se alguem saberia me ajudar.

Tenho um base de dados em excel e criei uma interface com o Visua Basic.
Esta base é composta de caracteristicas de produtos e de um hyperlink com pdf (ou qualquer arquivo salvo no computador) do produto.
Nesta interface eu coloquei a opção de adicionar algum elemento à minha tabela.
O problema é que gostaria de que, no momento de adicionar um componente à planilha, eu pudesse adicionar tambem o hyperlink.. e salvar estes dados (inclusive o caminho do hyperlink) em minha planilha.

A pergunta é se é possivel de fazer isso? existe alguma ferramenta da UserForm que vai me dar a oportunidade de percorrer os arquivos de meu computador (como se eu fosse no comando abrir), escolher o bom arquivo e adiciona-lo a minha planilha.

Desde ja agradeço a atençao

Wolmy

[webmaster]

Wolmy,

Em parte, isso ajuda?

http://www.tomasvasquez.com.br/blog/mic ... filedialog

Abraços

[wolmyneto]

Muito obrigado pela resposta.

Curioso foi que postei a pergunta em um outro lugar, e recebia uma resposta diferente.
De fato, nenhuma das duas funcionou exatamente como eu queria, mas quando estudei os codigos e misturei os dois, consegui fazer funcionar exatamente como eu queria.
Isso ai..
Muito Obrigado mesmo
vou postar aki o codigo, porque pode ser q alguem esteja com o mesmo problema que eu.


'dou um parametro de entrada j, com ultima linha ocupada,
'e no programa coloco para escrever na linha j+1

Sub SalvarHyperlink(j)
Dim Files As Variant
Files = Dir("C:\*.xls*", vbArchive)
With Application
Debug.Print Files
Files = .GetOpenFilename()
Planilha1.Cells(j+1 , 8).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Files
End With
End Sub

Bom
Muito obrigado
Abraços
Wolmy

[webmaster]

Wolmy,

Esqueci de avisar, mas precisei mudar o tópico de fórum, já que não condizia com a descrição. O fórum de Modelo Cadastro é para dúvidas referete ao modelo que disponibilizo:

http://www.tomasvasquez.com.br/blog/mod ... soft-excel

Abraços