une image qui s'affiche

[petchy]

bonjour à tous
tous d'abord je vous souhaite une bonne et heureuse année et surtout une bonne santé.
voila ,j'ai une question bete
comment faire pour que lorsque mon classeur s'ouvre,si j'ai dans ma cellule G11 un chiffre superieur à 0 j'ai une image qui s'affiche
if g11 > 0 then
Image1.Visible = True
else
Image1.Visible = false
end if
en gros c'est ça

merci
@ plus
petchy

 

[Kobaya]

Re : une image qui s'affiche

salut petchy,

il faut mettre ton code dans la procédure Private Sub Workbook_Open() du module ThisWorkbook.

 

[Temjeh]

Re : une image qui s'affiche

Bonjour à tous


Private Sub Workbook_Open()
If Range("G11") > 0 Then
ActiveSheet.Shapes("Image1").Visible = True
Else
ActiveSheet.Shapes("Image1").Visible = False
End If
End Sub

Voir ici:
https://www.excel-downloads.com/threads/masquer-un-objet-dans-excel-par-vba.45361/

Temjeh

 

[petchy]

Re : une image qui s'affiche

bonsoir

impeccable pour le code
merci