Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Inserir e Visualizar Imagem
Inserir e Visualizar Imagem
Bom Dia Amigos!
Gostaria de desenvolver o seguinte sistema:
Quando eu clicar com botão direito em qualquer célula da coluna D, eu consigo escolher uma imagem em uma pasta.
Ao escolher essa imagem, ele lança o caminho da imagem na base de dados APOIO
Depois de realizado esse procedimento
Se o usuário der duplo clique na Célula D3 por exemplo, o Excel mostra essa imagem num formulário, ou de qualquer outra forma
É possível?
Obrigado
Gostaria de desenvolver o seguinte sistema:
Quando eu clicar com botão direito em qualquer célula da coluna D, eu consigo escolher uma imagem em uma pasta.
Ao escolher essa imagem, ele lança o caminho da imagem na base de dados APOIO
Depois de realizado esse procedimento
Se o usuário der duplo clique na Célula D3 por exemplo, o Excel mostra essa imagem num formulário, ou de qualquer outra forma
É possível?
Obrigado
- Anexos
-
- Macro_Imagens.zip
- (9.69 KiB) Baixado 248 vezes
Re: Inserir e Visualizar Imagem
salvador,
Veja se as alterações feitas no modelo, atendem sua necessidade.
Veja se as alterações feitas no modelo, atendem sua necessidade.
- Anexos
-
- Macro_Imagens.zip
- (27.34 KiB) Baixado 241 vezes
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm
Re: Inserir e Visualizar Imagem
Não queria abusar mas uma duvida que estou passando trabalho, no momento que selecionamos a Imagem poderias estar copiando a imagem e colocando em outra pasta especifica?
Obrigado.
Obrigado.
Re: Inserir e Visualizar Imagem
Julio,
Experimente o que se segue :
Se estiver utilizando o modelo que disponibilizei, notará que a variável arquivoImagem é pública, sendo que a mesma é definida através da rotina caixaImagem.
Defina a variável caminhoCopia e chame a rotina acima, após o processo.
Experimente o que se segue :
Código: Selecionar todos
Sub copiaArquivo()
Dim fso As Object
Dim caminhoCopia As String
caminhoCopia = ""
Set fso = VBA.CreateObject("Scripting.FileSystemObject")
Call fso.CopyFile(arquivoImagem, caminhoCopia)
End Sub
Defina a variável caminhoCopia e chame a rotina acima, após o processo.
-
- Manda bem
- Mensagens: 127
- Registrado em: Sex Out 05, 2018 2:42 pm
[RESOLVIDO] Re: Inserir e Visualizar Imagem
Simplesmente Maravilhoso.
Muito Obrigado Saulo incrível.
Muito Obrigado Saulo incrível.