Faire apparaitre image + texte

Résolu
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   -  
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Suivant le fichier joint, j'ai deux petits problèmes.
1) Dans la 4ème image (avec les nuages) à chaque fois que je change l'image des conditions, (en cliquant sur les boutons à gauche de la console) je suis obligé de remettre l'image du hublot en premier plan.
Y a-t-il un moyen que cette image reste toujours en premier plan ?

2) Actuellement, (au-dessus de l'image des nuages) je choisi un texte de la liste déroulante qui se trouve en A16 (les textes sont de A18 à A28 en blanc).

Donc, ce que je souhaiterais (si possible)
1) Avoir l'image des conditions avec le texte correspondant.
2) Avoir l'image du hublot toujours en premier plan.

J'espère avoir réussi à bien m'expliquer ?
Merci de votre aide

https://cjoint.com/doc/22_05/LEwjSLUIybK_Mod%C3%A8le-console.xlsx




Configuration: Windows / Edge 101.0.1210.53

30 réponses

ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Toujours pas très clair
Si tu veux changer l'image (actuellement nommée) "Ensoleil"
1. Tu la fait apparaitre avec le bouton Ensoleillé
2. Tu fais glisser l'image hublot
3. tu fais glisser l'image "Ensoleil"
4. tu la supprimes
5. tu colles ta nouvelle image
6. tu la dimensionnes comme les autres
7. Tu la renomme "Ensoleil"
8. tu remets tout en place
0
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   20
 
ça ne fonctionne pas, ça met en jaune la ligne
".Shapes (nomh) .Select"
' Hublot Conditions
Public Sub majConditions(nomh, nomob)
With ActiveSheet
.Shapes(nomh).Select
Selection.ShapeRange.ZOrder msoBringToFront
.Shapes("hublot_Conditions").Select
Selection.ShapeRange.ZOrder msoBringToFront
.Range(celConditions).Value = Replace(nomob, "_", " ")
.Range(celQuit).Select
End With
End Sub

Le nom de l'image est bien "Ensoleil"
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
et que vaut nomh (tu passes le curseur sur nomh dans le debogueur?
es tu sûr de ne pas avoir ajouté un espace au nom de l'image ?
0
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   20
 
Je ne vois rien de spécial
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
C'est dans le dernier fichier que je t'ai renvoyé ?
Tu vas vérifier si cette image est bien là
1. Tu cées une feuille "Liste_shapes"
2. Tu vas dans l'editeur vba (Alt-F11)
3. Insertion Module. ça doit créer un Module 1
4. Copies y ce code
Option Explicit

Const FL = "Liste_shapes"
Const FC = "CONSOLE"

Sub ListeShapes_1()
Dim T(), n As Long, sh As Shape, k As Long
With Sheets(FC)
  n = .Shapes.Count
  ReDim T(1 To n, 1 To 6)
  k = 0
  For Each sh In .Shapes
    k = k + 1
    T(k, 1) = sh.Name
    T(k, 2) = sh.Type
    T(k, 3) = sh.Top
    T(k, 4) = sh.Left
    T(k, 5) = sh.Height
    T(k, 6) = sh.Width
  Next sh
End With
Sheets(FL).Cells(2, 1).Resize(n, 6) = T
End Sub

5. Tu lances la macro ListeShapes_1
6. Dans la feuille Liste_shapes, tu as la lisyte des shapes de la feuille CONSOLE. Tu dois y retrouver "Ensoleil"

Tu dis
0
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   20
 
Avec l'ancienne, je vois bien le nom
Avec la nouvelle, je ne vois pas son nom.
Est-ce que cela a une importance que ce soit une image .png ?
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Avec la nouvelle, je ne vois pas son nom.
es tu sûr de l'avoir nommé ?
Est-ce que cela a une importance que ce soit une image .png ?
Je ne pense pas, j'ai fait une tentative, ça fonctionne, l'image apparait et son nom est bien dans la liste
https://www.cjoint.com/c/LEzqQLSPu6B
clic sur le bouton Ensoleillé, ça devrait fonctionner

Envoies le fichier
0
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   20
 
0
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
1. Tu n'a pas renommé l'image, elle s'appelle "Image 3"
2. Je ne peux pas le faire pour toi, mon vieil excel 2003 'a ratatiné tous les boutons radio.
0
Guy72 Messages postés 973 Date d'inscription   Statut Membre Dernière intervention   20
 
OUpsss !!!
J'ai compris le problème.
Quand j'ai fait mon image, je l'ai appelé "Ensoleil" et je l'ai inséré dans ma feuille.
Là ou je n'ai pas fais attention, c'est qu'il fallait s'occuper du nom en haut à gauche.
Bon, je ne t'embête plus avec ça.
Merci encore pour ton aide ;)
0

Discussions similaires