Sommario
Se si taglia o si copia un testo o un'immagine, questa viene prima salvata negli appunti. Successivamente, è possibile incollare il testo o l'immagine in qualsiasi punto, ad esempio nei file di Word e di Excel. In Excel, è possibile incollare dagli appunti in molti modi. Utilizzando Microsoft Applicazioni Visual Basic (VBA) permette di incollare dagli appunti nel file Excel con alcuni codici. In questo articolo, vi mostrerò 3 metodi per usare VBA per incollare dagli appunti a Excel.
Supponiamo di avere copiato alcuni testi da un file di testo e che sono stati salvati negli appunti. Ora, si desidera incollarli nel file Excel utilizzando VBA .
Scarica il quaderno di esercizi
Incollare dagli appunti in Excel.xlsm3 metodi per incollare dagli Appunti a Excel usando VBA
1. Incollare dagli Appunti in una singola cella con VBA
Prima di applicare questo metodo è necessario attivare Libreria di oggetti Microsoft Forms 2.0 per il VBA progetto. Per farlo,
➤ Stampa ALT+F11 per aprire Il VBA
Vai a Strumenti> Riferimenti nel VBA finestra.
Si aprirà la finestra Riferimento - Progetto VBAP finestra.
Controllo Libreria di oggetti Microsoft Forms 2.0 e fare clic su OK .
Attiva il Libreria di oggetti Microsoft Forms 2.0 . Ora,
➤ Fare clic sul pulsante Inserire e selezionare Modulo .
Si aprirà la finestra Modulo(Codice) finestra.
➤ Inserire il seguente codice nel file Modulo(Codice) finestra,
Sub Paste_from_Clipboard() Dim CObj As MSForms.DataObject Set CObj = New MSForms.DataObject CObj.GetFromClipboard XText = CObj.GetText(1) ActiveSheet.Range("B4").Value = XText End Sub Il codice creerà un file Macro che incollerà il testo dagli appunti nella cella B4 .
Dopo aver inserito il codice,
➤ Fare clic sul pulsante Correre o premere F5 .
Ora,
➤ Chiudere o ridurre a icona l'applicazione VBA finestra.
Si vedrà che i testi degli appunti sono stati incollati nella cella B4 .
Per saperne di più: Come copiare e incollare in Excel senza formule (7 semplici trucchi)
Letture simili
- Come copiare valori unici in un altro foglio di lavoro in Excel (5 metodi)
- Copiare celle unite e filtrate in Excel (4 metodi)
- Come copiare righe in Excel (4 modi semplici)
- Copiare e incollare migliaia di righe in Excel (3 modi)
- Come copiare e incollare la formattazione esatta in Excel (6 metodi rapidi)
2. Incollare dagli Appunti con SendKeys
Questo metodo si basa sul tasto di scelta rapida CTRL+V che viene utilizzato per incollare i dati. Con un VBA è possibile utilizzare questo comando per incollare i dati dagli appunti. Primo,
➤ Fare clic con il tasto destro del mouse sul nome del foglio dalla finestra di dialogo Progetto del pannello del VBA finestra.
Viene visualizzato un menu a discesa.
Espandere Inserire facendo clic e selezionando Modulo .
Si aprirà la finestra Modulo(Codice) finestra.
➤ Inserire il seguente codice nel file Modulo(Codice) finestra,
Sub Paste_from_Clipboard_2() ActiveSheet.Range("B4").Select SendKeys "^v" End Sub Il codice creerà un file Macro denominato Incolla_da_Clipboard_2 che darà il comando CTRL+V dopo aver selezionato la cella B4 e incollare i dati dagli appunti in questa cella.
Ora,
➤ Chiudere o ridurre a icona l'applicazione VBA finestra.
➤ Stampa ALT+F8
Si aprirà la finestra Macro finestra.
➤ Selezionare Incolla_da_Clipboard_2 nel Nome della macro e fare clic su Correre .
Il risultato è che il testo degli appunti è stato incollato nella cella B4 .
Per saperne di più: Excel VBA per copiare solo i valori nella destinazione (Macro, UDF e UserForm)
3. Incollare dagli Appunti in un intervallo
In questo metodo vi mostrerò come potete copiare una serie di dati da un foglio negli appunti e incollare i dati in un altro foglio dagli appunti.
Supponiamo di avere il seguente set di dati in un foglio chiamato Dati .
Ora,
➤ Stampa ALT+11 per aprire il VBA finestra.
➤ Fare clic con il tasto destro del mouse sul nome del foglio dalla finestra di dialogo Progetto del pannello del VBA finestra.
Viene visualizzato un menu a discesa.
Espandere Inserire facendo clic e selezionando Modulo .
Si aprirà la finestra Modulo(Codice) finestra.
➤ Inserire il seguente codice nel file Modulo(Codice) finestra,
Sub Copy_Clipboard_Range() Worksheets("Data").Range("B4:E9").Copy ActiveSheet.Paste Destination:=Worksheets("Paste sheet").Range("B5:E10") End Sub 
Il codice copia i dati da B4:E9 del foglio denominato Dati negli appunti, dopodiché i dati verranno incollati in B5:E10 del foglio denominato Foglio di pasta dalla clipboard.
Dopo di che,
➤ Chiudere o ridurre a icona l'applicazione VBA finestra.
➤ Stampa ALT+F8
Si aprirà la finestra Macro finestra.
➤ Selezionare Copia_Clipboard_Range nel Nome della macro e fare clic su Correre .
Di conseguenza, i dati verranno incollati nella destinazione desiderata.
➤ Andare alla pagina Casa e fare clic sull'icona della piccola freccia verso il basso nell'angolo in basso a sinistra della scheda Appunti nastro.
Si aprirà la clipboard sul lato sinistro del file Excel.
Ora, i dati che sono stati incollati nel foglio si trovano negli appunti. In realtà, i dati sono stati salvati qui all'inizio e poi sono stati incollati nel foglio da qui.
Per saperne di più: Formula per copiare e incollare valori in Excel (5 esempi)
Conclusione
In questo articolo, troverete 3 metodi per incollare dagli appunti a Excel utilizzando VBA I primi due metodi incollano il contenuto degli appunti in una singola cella, mentre con il terzo metodo è possibile incollare i dati in un intervallo. In caso di confusione, non esitate a lasciare un commento.
