Olá pessoal,
Gostaria de saber se tem como inserir um hiperlink para cada menu da minha caixa de listagem, gostaria que quando clicasse em um dos menus, abrisse um arquivo pdf do computador, sei q tem como abrir documentos através de hyperlinks, porém não sei como por eles na caixa de listagem.
Obrigado desde já
Segue o arquivo corrigido para verificação. Fiz os testes aqui, e ocorreu tudo bem.
----------
Neste caso você não coloca o hyperlink na caixa de listagem, mas sim algum nome, que ao concatenar com um endereço aonde os arquivos estão, ele abrirá o arquivo.
Segue o código:
Sub AbrirArquivo
Dim Endereco, ArqName as String
oDoc = ThisComponent
oPlan = oDoc.Sheets.getByName ("Nome_da_sua_Plan")
'Nome do arquivo salvo e a extensão. Pode ser outra extensão
ArqName = oPlan.getCellRangeByName ("C2").String & ".pdf"
'Link aonde está o arquivo
Endereco = oPlan.getCellRangeByName ("B4").String
'Converte em link genérico e global, usado principalmente para computadores em rede
sArquivo = ConvertToUrl (Endereco & ArqName)
oSys = CreateUnoService("com.sun.star.system.SystemShellExecute")
oSys.execute(sArquivo, "", 0)
End SubNeste caso pelo oq eu entendi eu não consigo abrir um documento em cada menu da minha caixa de listagem isso?.
Consegui usar esse codigo que vc me passou, porém se eu jogar ele na caixa de listagem em todos os menus ele vai abrir apenas um arquivo.
No caso, você precisa definir que a macro abra conforme vc mudar as o evento dela, dessa forma ela irá pegar o valor que está na caixa de listagem, concatenar com o endereço que está o arquivo (lembrando que este endereço deve ser padrão para todos) e abrir o arquivo. Agora, se precisar abrir todos os arquivos que estão na caixa de listagem de uma vez, o procedimento deve ser outro.
Sem título 1.ods Mas como faço para definir q a macro abra conforme mude os eventos e pegue o valor que está na caixa de listagem?.
Pois configurei dois hiperlinks de dois arquivos diferentes na planilha, configurei a macro de acordo com o que vc me passou, mas quando executo a macro na caixa de listagem, ela abre apenas um arquivo nos dois menus que ela possue.
Estou anexando também a planilha que eu fiz para vc entender melhor.
Obrigado
Olhe na minha resposta atualizada com seu arquivo
Agora deu certo, obrigado pela grande ajuda amigo, sou meio leigo nesses assuntos ainda rsrs.
Fique tranquilo…estamos aqui para ajudar. Apenas marque minha resposta como correta na bolinha cinza para que outras pessoas possam ver a resposta correta.
Feito. Obrigado