Pergunte aqui
2

Botão seleção de arquivos

perguntadas 2017-03-23 21:37:21 +0100

imagem do gravatar de Beto

updated 2017-04-02 17:20:08 +0100

imagem do gravatar de Grafeno

Alguma maneira de "puxar" os dados para uma célula do botão "seleção de arquivos" do "Controles de Formulário":

Descrição da imagem

editar alterar tag assinalar como ofensivo fechar mesclar Excluir

1 Resposta

2

respondidas 2017-03-25 14:44:47 +0100

imagem do gravatar de Grafeno

Bom dia,


Uma maneira é associar o código abaixo ao evento Texto-modificado do seu controle Seleção de arquivo:

Sub Texto_Modificado( oEvento As Object )
Dim oSelArquivo As Object
Dim oPlan As Object
Dim oCel As Object
Dim sArquivo As String

   oSelArquivo = oEvento.Source
   sArquivo = oSelArquivo.Text

   oPlan = ThisComponent.Sheets.getByName("Planilha1")
   oCel = oPlan.getCellRangeByName( "A1" )

   oCel.String = sArquivo  
End Sub


Atte,

editar assinalar como ofensivo Excluir Link mais

Comentários

1

Obrigado, colega, pelo seu desprendimento e colaboração!

imagem do gravatar de BetoBeto ( 2017-03-26 03:25:43 +0100 )editar

Às ordens! E agradeço o retorno.

imagem do gravatar de GrafenoGrafeno ( 2017-03-26 17:59:37 +0100 )editar
Login/Registrar para responder

Ferramentas de perguntas

1 seguidor

Estatísticas

Perguntadas: 2017-03-23 21:37:21 +0100

Lidas: 42 vezes

Última atualização: Mar 25