Bonjour a tous

Dans un code VBA qui fonctionnait sous windows XP je chargeais le presse papier avec le code suivant, depuis que je l'utilise sous windows 8.1 ça bug, le contenu du presse papier ne correspond pas aux données de ma variable.
Je me retrouve avec deux carré comme on peut les trouver dans les codes ascii, mais ça m'est arrivé de voir également deux points d'interrogation, genre: ??

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim LongPx, LargPx As integer
    Dim MyData As New DataObject
 
 
    MyData.SetText LongPx
    MyData.PutInClipboard
    WshShell.SendKeys "^v", True
Est ce que quelqu'un aurait une idée pour resoudre ce probleme?
Merci d'avance