Salve a tutti, mi serviva inserire del testo predeterminato servendomi 
della barra APPUNTI e mi servivo di questa routine:
Dim MyData As Object  
     'Set MYdata = New DataObject       
           MyData.SetText "Testo"
           MyData.PutInClipboard
  Adesso che sono passato a Word 2016 la routine non funziona più nel senso che non inserisce niente 
nella colonna degli APPUNTI.
 Avete un suggerimento?