Imagem na planilha com caminho vindo da celula

2024 - VBA & Macros

Post Recente por Fernando Fernandes 12 anos atrás

5 Posts

2 Usuários

0 Reactions

1,328 Visualizações

RSS

ericaffj

(@ericaffj)

Posts: 38

Eminent Member

Topic starter

Bom dia , Gente precisava que a imagem fosse carregada automaticamente ao abrir a planilha, segue anexo o arquivo para ilustrar o que preciso, a planilha EMPRESA na celula I2, possuo um sistema onde o usuario seleciona a imagem e o caminho vai para essa celula, porem gostaria que essa mesma imagem fosse carregada na image1 da planilha LEMBRETE, será possivel?

obrigada....

Postado : 24/08/2012 4:44 am

ericaffj

(@ericaffj)

Posts: 38

Eminent Member

Topic starter

Aguem me ajuda por favor rsrsrs ...

Postado : 25/08/2012 5:39 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Experimente:

Private Sub CarregaImg()
Dim TxtFoto
TxtFoto = Sheets("EMPRESA").Range("I2")
On Error GoTo ErrorHandler
        Sheets("LEMBRETE").Image1.Picture = LoadPicture(TxtFoto)
        Sheets("LEMBRETE").Image1.PictureSizeMode = fmPictureSizeModeStretch
        
ErrorHandler:
        If Err.Number = 71 Then MsgBox ("Não existe foto")
        Err.Clear
        Resume Next

End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 25/08/2012 8:26 am

ericaffj

(@ericaffj)

Posts: 38

Eminent Member

Topic starter

obrigadaaaa. funcionou perfeitamente.

Postado : 27/08/2012 7:45 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

oPA, amgos, acho que é isso que eu preciso.
vejam por favor o arquivo anexo.

quero digitar a matrícula na aba FORM e o excel pegar o dados na pla DADOS. Ok, isso eu sei fazer com procv.
Mas quero que o excecel carregue a imagem direto de uma pasta no meu pc.

Alguém me salva aeeee

valeu !

MODELO.xlsx

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 26/11/2012 11:58 am