Boa noite Gonçalo

Conforme vc solictou abaixo sites com imagem no excel:

http://excelvbagraficos.blogspot.com/20 ... nte-1.html
http://excelvbagraficos.blogspot.com/20 ... nte-2.html
http://excelvbagraficos.blogspot.com/20 ... -o_15.html
http://www.officevb.com/2009/11/utiliza ... agens.html
http://mprinformatica.com.br/blog/?p=29

Aqui uma planilha para vc baixar--Créditos para o Ipadi http://www.4shared.com/file/68076502/db ... _Cond.html

Um abraço

Boa noite!!

Aqui tem algo que lhe interessa ..

http://www.tomasvasquez.com.br/forum/vi ... ?f=5&t=108

Att..

Gonçalo, por um acaso não seriam as mesmas duvidas ?

Associação conteúdo da célula com Imagem
viewtopic.php?f=5&t=2771&st=0&sk=t&sd=a&start=10

No tópico acima, eu anexei um exemplo baseado no modelo que anexou :

Anexos
fichas Tecnicas .....xlsx

Se "SIM", procure dar continuidade no mesmo Tópico, evitando abrir novos tópicos, sugiro que leia as regras do Forum e procure segui-la.

[]s

eu me expliquei mal... eu nao quero procv eu quero saber como se faz em vba para ir buscar imagens a um directorio essa imagem vaira consoante a referencia do produto que eu insiro ....
vou deixar aqui a minha planilha ela ainda nao esta acabada , mas na form das fichas tecnicas eu preciso que apareça a imagem do pruduto ... quando eu inserir a referencia e fizer procurar ....

Boa tarde,

Este código de exemplo copia imagens que estão numa pasta para uma coluna ("B") conforme os valores correspondentes de outra coluna ("A").
Utilizei a extensão "gif", mas você pode usa outras como "jpg" e "bmp", por exemplo.
Depois é só adaptar para a sua necessidade:

Sub ImportarImagens()
    Dim ws As Worksheet
    Dim Imagem As Shape
    Dim Pasta As String
    
    'Pasta onde estão os arquivos
    Pasta = "C:TempImagens"
    
    Set ws = ActiveSheet
    
    'Laço para percorrer o intervalo de valores
    For i = 2 To 10
        
        'Importa cada imagem para o Excel, na coluna "B", utilizando como referência
        'o valor da coluna "A"
        Set Imagem = ws.Shapes.AddPicture(Pasta & Cells(i, "A").Value & ".gif", True, True, _
        Cells(i, "B").Left, Cells(i, "B").Top, Cells(i, "B").Width, Cells(i, "B").Height)
    Next
End Sub

Abraço

nao e bem isso de uma olhada na planilha pf estou mesmo desesperado
eu queria que quando puser a ref e fizer procurar ele me va buscar a imagem que esta ligada a eesa referencia ... vou por imagens a explicar se alguem me pudesse ajudar era maravilhoso

e tambem que ele me grave se eu puser um imagem nova num novo artigo ...

quero que ele grave o caminho do ficheiro aqui ....
abaixo vou deixar tambem a o ficheiro par ase alguem me puser dar um jeito o explicar passo a passo como faço

eu pus o endereço manualmente mas ja vi quem puse-se automatico ... mas eu nao sei ,S
desde ja agradeço qualquer ajuda

Gonçalo, de fato em suas primeiras postagens, são bem diferentes desta, no outro tópico você citou que as imagens estariam na propria planilha e foi este o modelo que enviou e tambem não disse nada sobre Formulário.

Deixando esta questão de lado, é sempre importante avaliarmos antes o que realemnte queremos e analizar se o que escrevemos condiz com a solicitação, ficando mais claro e bem mais fácil postar uma ajuda expecifica, e não ficar imaginando se seria aquilo ou não, apesar que o tópico ajudará de outra forma, mas como sabe, a maioria das ajudas são voluntárias e depende de tempo disponivel, mas tudo bem, na proxima acertamos.

Quanto a esta nova solicitação, tenho algumas perguntas :
1°) Não serão utilizadas as imagens que estão na aba base de imagens ?

2°) Ao inves de gravar o Caminho do Arquivo, é muito mais eficiente termos uma pasta definida só para as imagens, deixando a rotina mais leve e rápida, a não ser que irá ter as imagens esplhadas em várias pastas no PC.

3°) Você diz digitar uma Referencia e buscar a imagem associada a ela, esta referencia são numéricas ? se SIM, os nomes dos arq de imagens deveriam ser o numero da referencia, fica bem mais fácil trabalhar e não o nome como referenciou no Caminho ( E:lena.bmp)

4°) O que quer dizer com :
"e tambem que ele me grave se eu puser uma imagem nova num novo artigo"

[]s

desde ja agradeço mauro e peço desculpa pela informaçao mal postada , sei que ano eu desculpa mas estou um pouco de cabeça perdida
quanto as perguntas vou responder sucintamente ....
1°) Não serão utilizadas as imagens que estão na aba base de imagens ?
nao . como pode ver no segundo exmplo ja retirei essa aba ...

2ª )Ao inves de gravar o Caminho do Arquivo, é muito mais eficiente termos uma pasta definida só para as imagens, deixando a rotina mais leve e rápida, a não ser que irá ter as imagens esplhadas em várias pastas no PC.

concordo contigo realmente isso seria mais pratico ... nao tinha pensado nisso ...

3°) Você diz digitar uma Referencia e buscar a imagem associada a ela, esta referencia são numéricas ? se SIM, os nomes dos arq de imagens deveriam ser o numero da referencia, fica bem mais fácil trabalhar e não o nome como referenciou no Caminho ( E:lena.bmp)

sim as referencias sao numericas , como pode ver nas difrentes paginas da planilha .. tem sempre uma primeira coluna referente a refrencia ....
serao sempre numericas e nunca se irao repitir..

4°) O que quer dizer com :
"e tambem que ele me grave se eu puser uma imagem nova num novo artigo"

com isto pretendo dizer que como pode ver se escrever uma refrencia nova e os dados todos essa referencia e adiconada a base de dados na planilha ... gostaria que a imagem que eu associa-se a essa referencia tambem fica-se guardade...

Desde ja peço desculpa ....
e Agradeço a vossa disponiblidade ....
Obrigado

Gonçalo, no modelo que anexou ainda existe a aba (base de imagens), mas tudo bem, já sei que não irá utiliza-la.

Agora, na Aba Fichas temos alguns Códigos assim :

3059 = 3006
7143 = P23-705/3
7146 = P23-7025/10

É isto mesmo ? isto pode complicar evido às imagens que terão de ter estes nomes.

Apesar de dizer que não tem intimidade com VBA, o link que o José indicou :
Inserir Foto (imagem) no cadastro VBA
http://www.tomasvasquez.com.br/forum/vi ... ?f=5&t=108

tem rotina que podem ser adaptadas para o seu caso, vou ver o que dá para fazer de momento, depois posto.

[]s

nao esses sao erros :S obigado mauro

nao esses sao erros :S obigado mauro

Gonçalo, sem problemas, de qualquer forma eu ia acertar para deixar somente os numeros.

Na medida do possível, hoje o dia foi bem corrido pra mim devido ao feriado, estive fazendo as adaptações em seu arquivo, não consegui terminar, falta pouca coisa, e hoje quero ir dormir mais cedo, então amanhã assim que der anexo o Modelo.

Espero que de para aguardar.

[]s