arthurcd,

Boa tarde!

Fiz no arquivo anexo, o que você está solicitando. No arquivo anexo estão dois arquivo: a sua planilha já modificada (atrabés de código VBA) e um arquivo exemplo de figura de um Ofício (.jpg). Você deve ter os dois arquivos na mesma pasta.

No arquivo, já inseri, como exemplo, a imagem do arquivo. Para testar, basta deletar o número do oífico lá na célula ou digitar qualquer outra coisa na mesma que a imagem ficará em branco.

Ao digitar o número 1611-16PP (única imagem que salvei) a imagem será carregada para o Excel.

Veja se assim lhe atende.

Uia! ja serviu perfeitamente teria como ela redimensionar tambem? tipo caso a imagem seja maior ajustar ao quadro...

arthurcd,

Bom... o quadro existente na planilha não tem como ajustar...

O que fiz foi alterar a propriedade AutoSize do Objeto Image para TRUE, a propriedade BorderColor para BRANCA e a propriedade BorderStyle para Transparente. Isso faz com que a figura a ser carregada se ajuste dentro do objeto Image de acordo com o tamanho que tiver sido salvo no arquivo .jpg.

Também tive que retirar o quadro existente na planilha pois assim, o objeto Image não consegue expandir/reduzir.

Puts tem imagens que são muito grandes....tp 1600x1200, essas não encaixam... mais enfim ja me ajudo demais valeu...