Questo browser non è più supportato.
Esegui l'aggiornamento a Microsoft Edge per sfruttare i vantaggi di funzionalità più recenti, aggiornamenti della sicurezza e supporto tecnico.
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(128, 8%, 22%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EA%3C/text%3E%3C/svg%3E)
Buon giorno,
è possibile cancellare il contenuto degli appunti con una macro?
Grazie dell'attenzione.
Pier Luigi
excel 2010
Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.
Gentilissimo Norman buona sera,
in effetti la domanda verteva per ".....contenuto degli appunti di Office...."
mi vado a leggere i thread suggeriti.
Eventualmente rifarò un ulteriore quesito.
Grazie dei tuoi sempre graditi suggerimenti.
Buona serata.
Pier Luigi
Ciao Pier Luigi,
sicuramente il codice è ineccepibile.
ma, lanciando:
Public Sub Tester()
Application.CutCopyMode = False
End Sub
la casella degli appunti non si cancella.
Dove sbaglio?
Forse stiamo confondendo i dati di Excel, gli appunti di Office e gli appunti di Windows!
Eseguendo una operazione di copia , si crea un 'marquee' (la linea di formiche in movimento intorno alle celle copiate) attorno le celle copiate
Per cancellare il marquee, e quindi la capacità di incollare direttamente i dati copiati, ****potresti eseguire l'istruzione VBA:
Application.CutCopyMode = False
Tuttavia, questo codice non cancellerebbe il contenuto degli appunti di Office e, quindi, dopo l'escuzione del codice, si vederebbe i dati copiati ancora negli appunti di Office:
Non credo che ci sia un modo di cancellare gli appunti di Office tramite VBA - a meno che non si tratti di Excel 2000. In tal caso, si poteva sfruttare l'oggetto CommandBars per replicare l'effetto della cancellazione manuale degli appunti di Office.
Diversamenti, il contenuto degli appunti di Windows può essere cancellato programaticamente con il codice del secondo suggerimento indicato nella mia risposta originaria. In tal caso, anche gli appunti di Offic non persisterebbero e sarebbero svuotati con la chiusura di Excel.
A questo proposito, i seguenti vecchi thread da un forum inglese potrebbero essere di interesse:
https://www.pcreview.co.uk/threads/clear-office-clipboard-from-vba.3059786/
https://www.pcreview.co.uk/threads/how-to-clear-clipboard-in-ms-word-using-vba.3729648/
===
Regards,
Norman
Gentilissimo Norman, grazie
sicuramente il codice è ineccepibile.
ma, lanciando:
Public Sub Tester()
Application.CutCopyMode = False
End Sub
la casella degli appunti non si cancella.
Dove sbaglio?
Grazie
Cordiali saluti
Pier Luigi
Ciao Pier Luigi,
è possibile cancellare il contenuto degli appunti con una macro?
Certo!
Per cancellare i dati di Excel dagli appunti, prova:
'=========>>
Option Explicit
'--------->>
Public Sub Tester()
Application.CutCopyMode = False
End Sub
'<<=========
Per cancellare i dati dagli appunti di Windows, prova:
'=========>>
Option Explicit
Public Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long
Public Declare Function EmptyClipboard Lib "user32" () As Long
Public Declare Function CloseClipboard Lib "user32" () As Long
'--------->>
Public Sub ClearClipboard()
OpenClipboard (0&)
EmptyClipboard
CloseClipboard
End Sub
'<<=========
===
Regards,
Norman