Faire apparaitre une image qd chexkbox active
Résolu
olivia
-
olivia -
olivia -
Bonjour,
Je souhaiterais quand je clique sur une checkBox faire apparaitre une image qui se trouve dans un contrôle activex image. Je pense que la ligne de code serait : quand chexbox1 est coché fait apparaitre l'image si ce n'est pas le cas l'image ne devra pas apparaître.
Pouvez vous m'aider sur la ligne de code à écrire car je suis débutante en VBA.
Par avance merci pour votre aide.
Olivia
Je souhaiterais quand je clique sur une checkBox faire apparaitre une image qui se trouve dans un contrôle activex image. Je pense que la ligne de code serait : quand chexbox1 est coché fait apparaitre l'image si ce n'est pas le cas l'image ne devra pas apparaître.
Pouvez vous m'aider sur la ligne de code à écrire car je suis débutante en VBA.
Par avance merci pour votre aide.
Olivia
A voir également:
- Faire apparaitre une image qd chexkbox active
- Apparaitre hors ligne instagram - Guide
- Image iso - Guide
- Légender une image - Guide
- Comment faire apparaître le curseur sans souris - Guide
- Apparaitre hors ligne whatsapp - Guide
11 réponses
Salut,
Ta chexkox est sur une Userform ou sur ta feuille de calcul
Ton image est elle dans le même répertoire que ton fichier ou stockée sur le fichier
Ta chexkox est sur une Userform ou sur ta feuille de calcul
Ton image est elle dans le même répertoire que ton fichier ou stockée sur le fichier
Je travaille sur word et l'image est stockée sur le fichier, car c'est un document qui va être utilisé par plusieurs personnes.
Re,
Word n'est pas ma tasse de thé, j'espère que M@rina passera par là
tu peux également aller sur son site tu devrais trouver ton bonheur
https://www.faqword.com/
Word n'est pas ma tasse de thé, j'espère que M@rina passera par là
tu peux également aller sur son site tu devrais trouver ton bonheur
https://www.faqword.com/
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
Trouvé sur le Net :
Voici un fichier exemple
Je n'ai pas étudié le comportement de cette macro s'il doit y avoir plusieurs images et plusieurs checkbox, je ne crois pas qu'elle fonctionne dans ce cas...
Trouvé sur le Net :
Private Sub CheckBox1_Click() If CheckBox1.Value = True Then With ActiveWindow With .View .ShowPicturePlaceHolders = True End With End With Else With ActiveWindow With .View .ShowPicturePlaceHolders = False End With End With End If End Sub
Voici un fichier exemple
Je n'ai pas étudié le comportement de cette macro s'il doit y avoir plusieurs images et plusieurs checkbox, je ne crois pas qu'elle fonctionne dans ce cas...
merci pour ton aide mais je n'arrive pas à le faire fonctionner.
Où je dois rentrer le nom de mon image ???
Où je dois rentrer le nom de mon image ???
Re-
Alors, il faudrait déjà que tu saches si ton image est un objet shape ou inlineshape. voir ici la différence
Ensuite, s'il s'agit d'un inlineshape, il faut que tu en connaisses l'index. Puis adapter ce code :
Alors, il faudrait déjà que tu saches si ton image est un objet shape ou inlineshape. voir ici la différence
Ensuite, s'il s'agit d'un inlineshape, il faut que tu en connaisses l'index. Puis adapter ce code :
Private Sub CheckBox1_Click() If CheckBox1.Value = False Then With ActiveDocument.InlineShapes(1) .Range.Font.Hidden = True End With Else With ActiveDocument.InlineShapes(1) .Range.Font.Hidden = False End With End If End Sub
mon image est une inlineshape selon le les informations fournis par ton document.
en revanche tu parles d'index je ne sais pas à quoi cela correspond et ou je trouve cette information et une fois trouvé à quel endroit je le mets dans ton code.
Désolé mais je suis débutante et j'ai pas toutes les notions.
Merci pour ton aide
Olivia
en revanche tu parles d'index je ne sais pas à quoi cela correspond et ou je trouve cette information et une fois trouvé à quel endroit je le mets dans ton code.
Désolé mais je suis débutante et j'ai pas toutes les notions.
Merci pour ton aide
Olivia
Je suis également novice dans ce genre de macro, j'essaie de m'accrocher aux branches...
Pour trouver les numéros d'index de tes différents InlineShapes :
1- Dans ton fichier word taper ALT+F11
2- Insertion/Module
3- Copier/coller ce code dans le module :
4- Fermer la fenêtre Visual Basic
5- Dans ton doc Word taper ALT+F8, sélectionner NumeroIndex et cliquer sur Exécuter.
La macro va sélectionner chacun de tes InlineShapes (c'est plus visible avec les images qu'avec les CheckBox (ou la tu ne verras rien que le numéro s'afficher...). Note le chiffre correspondant à l'image sélectionnée.
Tu pourras adapter le code ci dessous l'index étant le chiffre en gras :
Pour trouver les numéros d'index de tes différents InlineShapes :
1- Dans ton fichier word taper ALT+F11
2- Insertion/Module
3- Copier/coller ce code dans le module :
Sub NumeroIndex() Dim i As Integer For i = 1 To ActiveDocument.InlineShapes.Count ActiveDocument.InlineShapes(i).Select MsgBox i Next End Sub
4- Fermer la fenêtre Visual Basic
5- Dans ton doc Word taper ALT+F8, sélectionner NumeroIndex et cliquer sur Exécuter.
La macro va sélectionner chacun de tes InlineShapes (c'est plus visible avec les images qu'avec les CheckBox (ou la tu ne verras rien que le numéro s'afficher...). Note le chiffre correspondant à l'image sélectionnée.
Tu pourras adapter le code ci dessous l'index étant le chiffre en gras :
Private Sub CheckBox1_Click() If CheckBox1.Value = False Then With ActiveDocument.InlineShapes(1) '1 à adapter .Range.Font.Hidden = True End With Else With ActiveDocument.InlineShapes(1) '1 à adapter .Range.Font.Hidden = False End With End If End Sub
Si cela peux t'aider à la place de l'image cela pourrait tout aussi bien être une combobox ou une listbox qui apparait quand checkbox 1 est cohé.
Car mon image est inséré dans un contrôle activex
Car mon image est inséré dans un contrôle activex
merci pour ton aide ca fonctionne!!!!!!!!!!!!!!!!!!! Tu me sauves
cependant j'ai juste eu du mal avec alt+F8 à trouver le numéro de mon image.
Penses tu qu'il y a un moyen plus facile de trouver le numéro d'index sans passer par une macro?
cependant j'ai juste eu du mal avec alt+F8 à trouver le numéro de mon image.
Penses tu qu'il y a un moyen plus facile de trouver le numéro d'index sans passer par une macro?