Bonjour,

Je me lance actuellement dans les Userbox et je sèche lamentablement sur le remplissage d'un Textbox à partir du contenu d'une cellule.

La cellule que je veux copier contient du texte dans lequel est inclus des caractères spéciaux issus des polices Wingdings.

L'instruction classique
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Me.TextBoxDetail = Range(ma cellule)
me renvoi bien le texte mais les caractères spéciaux sont remplacés par les caractères de la police du Textbox.
J'ai essayé :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range(Range(ma cellule).Text).Copy Destination:=Me.TextBoxDetail
mais cette méthode me renvoi l'erreur "La méthode copy de la classe range a échoué."

J'ai essayé :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Range(ma cellule).Copy
Me.TextBoxDetail.Paste
Qui me donne le même résultat que la méthode classique.

La question est donc : comment faire pour copier le contenu exact d'une cellule dans un Textbox ?
Et comme je vais devoir aussi remplir des cellules à partir d'une textbox, comment faire pour insérer des caractères de polices différentes dans une Textbox et copier son contenu à l'identique dans une cellule ?

Merci d'avance pour votre aide.

Michel