VBA : Word : Image à afficher dans un userform

kiricouille0 Messages postés 4 Date d'inscription Statut Membre Dernière intervention -
m@rina Messages postés 23816 Date d'inscription Statut Contributeur Dernière intervention - 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
Incompatibilité de type vba ✓ - Forum VB / VBA
Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
Vba range avec variable ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

m@rina Messages postés 23816 Date d'inscription Statut Contributeur Dernière intervention 11 462

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

appliquer une pause dans une macro vba excel

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

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

Votre réponse

Discussions similaires