Using DataObject type for clipboard

[troubadour]

What is wrong with this code ? Thank you
(suggested to me by J.W. at this useful page :
http://www.word.mvps.org/FAQs/MacrosVBA/ManipulateClipboard.htm )

Type DataObject
Toto As Object
End Type
________________________
Sub MyTest()
Dim MyData As DataObject
Dim strClip As String
Set MyData = New DataObject (compiler error here : incorrect use of
the “new†keyword )
MyData.GetFromClipboard
strClip = MyData.GetText
MsgBox (strClip)
End Sub

 

[CarolineJ]

Nothing is wrong with the procedure you just need to remove the TYPE
declaration at the top then it will work great!