VBA : Word : Image à afficher dans un userform

Fermé

kiricouille0 Messages postés 4 Date d'inscription samedi 10 novembre 2018 Statut Membre Dernière intervention 28 décembre 2018 - 28 déc. 2018 à 15:22
m@rina Messages postés 21701 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 11 mars 2025 - 29 déc. 2018 à 01:54

Bonjour à tous,

J'aimerais afficher une image quand j'appuie sur une case à cocher, mais ça ne marche pas.
Voici le code :


Private Sub CheckBox6_Click()

Dim macase As Object, fichier As String
Set macase = Me.CheckBox6
If macase = True Then
    fichier = " ... \gege.jpg"
    If Dir(fichier) = "" Then
        Image1.Picture = LoadPicture("")
    Else
        Image1.Picture = LoadPicture(fichier)
    End If
    macase = False
End If

Voici le userform :

Voici les caractéristiques de la zone dessin du userform :

En vous remerciant.

A voir également:

VBA : Word : Image à afficher dans un userform
Excel compter cellule couleur sans vba - Guide
Mkdir vba ✓ - Forum VB / VBA
L'indice n'appartient pas à la sélection vba ✓ - Forum Programmation
Vba range avec variable ✓ - Forum VB / VBA
Vba autofill ✓ - Forum Excel

1 réponse

Réponse 1 / 1

m@rina Messages postés 21701 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 11 mars 2025 11 407
29 déc. 2018 à 01:54

Bonjour,

Je ne sais pas de quelle case à cocher tu parles... Hier c'était un contrôle ActiveX dans le document, aujourd'hui tu parles de Userform, mais je ne vois pas de case à cocher...

m@rina

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Erreur d'exécution 13 Incompatibilité de type

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

appliquer une pause dans une macro vba excel