Este fórum está sendo desativado

[GENECI]

Bom dia!

E possível associar uma imagem ao arquivo quando for salvar a planilha?

Exemplo: Tenha várias planilhas referente cidades é possível associar a foto da cidade correspondente quando salvar o arquivo. Na lista de arquivos, antes de abrir apresentar o nome do arquivo com a foto relacionada.
A nível de informação visual é ótimo.

Obrigado - Geneci

[alexandrevba]

Boa tarde!!

Algo assim pode ajudar....

Código: Selecionar todos

Sub AleVBA_2355()
    InsertPictureAInRange ThisWorkbook.Path & "\MinhaImagem.gif", _
    Range("A1")
End Sub

Use o evento

Código: Selecionar todos

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Caso queira que ocorra ao salvar o arquivo!

Att