Microsoft 365 Bug macro Dim objData As New MSForms.DataObject

Claudy

XLDnaute Accro
Bonjour,
après un passage de Win 7 vers win10, j'ai du réinstaller mes macros perso dont celle ci:
VB:
Sub CopyToClipboard2()
   [CODE]Dim objData  As New MSForms.DataObject
Dim strText

strText = ActiveCell.Value
objData.SetText strText
objData.PutInClipboard
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 15773696
.TintAndShade = 0
.PatternTintAndShade = 0
End With
End Sub[/CODE]

elle fonctionnait parfaitement avant mais là elle bug sur
Code:
Dim objData  As New MSForms.DataObject
Et je ne trouve plus MicrosoftForms 2.0 Object Library dans les références


Merci d’avance pour votre aide,

Claudy
 

Pièces jointes

  • Capture.PNG
    Capture.PNG
    18.8 KB · Affichages: 32
Dernière édition:

Discussions similaires

Réponses
2
Affichages
655

Statistiques des forums

Discussions
311 725
Messages
2 081 943
Membres
101 849
dernier inscrit
florentMIG