Quelqu'un peut-il m'expliquer pourquoi un code aussi simple ne passe pas ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
 
Sub insererImage()
 
Dim CMD As CommonDialog
 
CMD.DialogTitle = "Choisissez une image"
End Sub
A l'exécution, ça me donne le message d'erreur suivant :

Erreur d'exécution 91.
Variable objet ou variable de bloc With non définie

A noter que cette erreur disparaît dès que je mets en commentaire la ligne

CMD.DialogTitle = "Choisissez une image"