XL 2021 Problème avec "coller" en dehors d'Excel

Magic_Doctor · 22 Octobre 2025

Bonjour,

Utilisant un clavier français (AZERTY) ou espagnol (QWERTY), je suis fréquemment confronté à des problèmes de caractères. Pour y pallier, j'ai réalisé un petit utilitaire :
- Un tableau avec des caractères alphabétiques, numériques, monétaires et symboliques.
- Quand on clique sur un caractère, celui-ci est copié et il n'y a plus qu'à le coller ailleurs (Bloc-note, Word...).
Ça marche bien, mais il demeure un petit souci. Quand, par exemple, je remplace le 2ème "n" de "nino" par "ñ" pour obtenir "niño", le "ñ" se substitue bien au "n", mais tout de suite après le "ñ" il y a un renvoie à la ligne. Autrement dit j'obtiens :
niñ
o
au lieu de :
niño

C'est bizarre. J'ai beau tourner en rond, je ne parviens pas à résoudre ce problème. C'est d'autant plus déconcertant quand on sait que là où on colle on n'est plus dans Excel.
En revanche, quand on va sur le site web via "More Symbols" (dont je me suis inspiré) et que l'on clique sur un caractère quelconque et qu'on le colle ensuite en dehors d'Excel, ce problème n'apparaît pas.
Une réponse à cette histoire ?

sylvanu · 22 Octobre 2025

Bonjour Magic_doctor, TooFatBoy,
En passant par ChatGPT, ceui ci préconise cette fonction pour faire un transfert dans le presse papier.
Je ne comprends pas trop d'où vient le problème, mais avec cette fonction ça a l'air de marcher. 🙂

VB:

Function Clipboard(Optional StoreText As String) As String
If StoreText = "" Then Exit Function
Dim x As Variant
'Store as variant for 64-bit VBA support
  x = StoreText
'Create HTMLFile Object
  With CreateObject("htmlfile")
    With .parentWindow.clipboardData
      Select Case True
        Case Len(StoreText)
          'Write to the clipboard
            .setData "text", x
        Case Else
          'Read from the clipboard (no variable passed through)
            Clipboard = .GetData("text")...

TooFatBoy · 22 Octobre 2025

Bonjour,

Si tu utilises une fonction genre Asc ou Chr pour mettre ton caractère dans le bloc-note, alors essaye de la remplacer par AscW ou ChrW.

Magic_Doctor · 22 Octobre 2025

Bonjour,

C'est déjà fait.

sylvanu · 22 Octobre 2025

Bonjour Magic_doctor, TooFatBoy,
En passant par ChatGPT, ceui ci préconise cette fonction pour faire un transfert dans le presse papier.
Je ne comprends pas trop d'où vient le problème, mais avec cette fonction ça a l'air de marcher. 🙂

VB:

Function Clipboard(Optional StoreText As String) As String
If StoreText = "" Then Exit Function
Dim x As Variant
'Store as variant for 64-bit VBA support
  x = StoreText
'Create HTMLFile Object
  With CreateObject("htmlfile")
    With .parentWindow.clipboardData
      Select Case True
        Case Len(StoreText)
          'Write to the clipboard
            .setData "text", x
        Case Else
          'Read from the clipboard (no variable passed through)
            Clipboard = .GetData("text")
      End Select
    End With
  End With
End Function

TooFatBoy · 22 Octobre 2025

Magic_Doctor à dit:
Bonjour,

C'est déjà fait.

De rien.

Magic_Doctor · 22 Octobre 2025

Bonjour sylvanu,

Un grand merci, maintenant ça marche parfaitement.
Pas très bien compris la fonction de ChatGPT, mais l'essentiel est que le problème soit résolu.
Bonne fin d'après-midi.

eriiic · 22 Octobre 2025

Bonjour,
tu pourrais jeter un oeil à https://wincompose.info/
Ca te donne un raccourci clavier mnémotechnique pour tous les caractères spéciaux

Magic_Doctor · 22 Octobre 2025

eriiic à dit:
Bonjour,
tu pourrais jeter un oeil à https://wincompose.info/
Ca te donne un raccourci clavier mnémotechnique pour tous les caractères spéciaux

Bonjour eriiic,

J'ai téléchargé ce programme, je l'ai installé et il ne se passe rien.
Dans le site ils disent "WinCompose devrait apparaître dans la barre système". Rien n'apparaît...

Magic_Doctor · 22 Octobre 2025

J'ai fait quelques petites modifications (propreté dans les macros et quelques items supplémentaires dans le tableau).
Avec l'aide de ChatGPT, j'ai pu résoudre le problème de la sélection malencontreuse de plusieurs cellules à la fois. Pour ce faire, j'avais besoin de trouver un moyen de purger le Presse-Papiers. ChatGpt m'a apporté la solution via des APIs.
Maintenant ça marche bien. Je suis content du résultat.
J'ai enfin pu apprécier la fonction de ChatGPT "Function Clipboard". Grâce à elle, quand on clique sur une cellule et que le "Copier" se fait automatiquement, les contours de la cellule ne scintillent pas, ce qui est plus esthétique et nous épargne le "Application.CutCopyMode = False"

eriiic · 22 Octobre 2025

Bizarre. Possible qu'il soit capricieux avec certaines configs.
Pourtant j'ai W11 et il a survécu à ce passage.

Magic_Doctor · 24 Octobre 2025

Bonjour,

Comme quoi, avec Excel on a toujours des surprises.
Il se trouve que tous mes essais je les faisais sur le Bloc-notes, Google, WhatsApp et ça marchait bien.
J'ai la mauvaise idée de faire l'essai sur Word, et là ce n'est plus pareil. Tout ce que je colle est souligné d'un affreux gros trait noir, et pour les lettres en minuscule, elles semblent être de petites majuscules, et pour bon nombre d'entre elles les diacritiques sont absents.
Comment résoudre ce problème ?

sylvanu · 24 Octobre 2025

Bonjour,
Avec Office 2007, j'ai fait un essai et votre fichier marche correctement.
Peut être un problème de version Office ?

TooFatBoy · 24 Octobre 2025

sylvanu à dit:
Avec Office 2007, j'ai fait un essai et votre fichier marche correctement.

Ta version de #4 fonctionne aussi parfaitement sous Office 2016.

gosselien · 24 Octobre 2025

Bonjour,
et en tapant "ALT 0241" ?
A défaut, on peut imprimer la table ASCII 🙂

P.

TooFatBoy · 24 Octobre 2025

gosselien à dit:
et en tapant "ALT 0241" ?

Ou peut-être aussi ~n ?

XL 2021 Problème avec "coller" en dehors d'Excel

Magic_Doctor

XLDnaute Barbatruc

sylvanu

TooFatBoy

XLDnaute Barbatruc

Magic_Doctor

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Pièces jointes

TooFatBoy

XLDnaute Barbatruc

Magic_Doctor

XLDnaute Barbatruc

eriiic

XLDnaute Barbatruc

Magic_Doctor

XLDnaute Barbatruc

Magic_Doctor

XLDnaute Barbatruc

Pièces jointes

eriiic

XLDnaute Barbatruc

Magic_Doctor

XLDnaute Barbatruc

Pièces jointes

sylvanu

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

gosselien

XLDnaute Barbatruc

Pièces jointes

TooFatBoy

XLDnaute Barbatruc

Discussions similaires

XL 2021 Problème avec "coller" en dehors d'Excel

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

XLDnaute Barbatruc

XLDnaute Barbatruc

Pièces jointes

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency