Sbarazzarsi di Web Stuff (Microsoft Excel)
Grant copia regolarmente le informazioni dalle pagine Web e le incolla in fogli di lavoro. Finisce non solo con i dati grezzi, ma anche con altri elementi, come caselle di controllo, immagini, loghi, ecc. Grant vuole un modo semplice per sbarazzarsi di tutti questi elementi non dati.
Quando incolli per la prima volta dal Web in un foglio di lavoro Excel, potresti prendere in considerazione l’utilizzo di Incolla speciale per eseguire operazioni come Incolla come testo o Incolla valori. Questo dovrebbe aiutare a impedire in primo luogo di inserire quegli oggetti indesiderati nel tuo foglio di lavoro.
Se Incolla speciale non fornisce i risultati desiderati o se stai lavorando con un foglio di lavoro in cui le informazioni e gli oggetti sono già stati incollati, ci sono alcune cose che puoi provare. La prima cosa che la maggior parte delle persone prova è usare Go To Special, in questo modo:
-
Premi F5. Excel visualizza la finestra di dialogo Vai a.
-
Fare clic sul pulsante Speciale. Excel visualizza la finestra di dialogo Vai a speciale.
(Vedi figura 1.)
-
Seleziona l’opzione Oggetti.
-
Fare clic su OK.
Quando si esegue questa operazione, Excel seleziona un numero di oggetti nel foglio di lavoro e quindi è possibile premere il tasto Canc per eliminarli.
Il problema è che questo metodo non seleziona tutti gli elementi non dati nel foglio di lavoro; ne seleziona solo un sottoinsieme, gli elementi considerati “oggetti” da Excel.
Una soluzione migliore è utilizzare una macro per selezionare tutte le forme nel foglio di lavoro e quindi eliminarle. Questo è abbastanza semplice da fare, usando una macro come questa:
Sub DeleteAllShapes1() Dim shp As Shape For Each shp In ActiveSheet.Shapes shp.Delete Next End Sub
La macro scorre semplicemente attraverso ogni forma sul foglio di lavoro attivo ed elimina ciascuna di esse. È possibile espandere leggermente la macro facendo in modo che elimini anche tutti i collegamenti ipertestuali incollati nel foglio di lavoro. Tutto ciò che serve è l’aggiunta di una singola riga:
Sub DeleteAllShapes2() Dim shp As Shape For Each shp In ActiveSheet.Shapes shp.Delete Next ActiveSheet.Hyperlinks.Delete End Sub
Se, per qualche strana ragione, queste macro non eliminano tutti gli elementi non di dati che vuoi rimuovere, c’è un altro approccio che puoi usare:
fare una sosta in NotePad prima di Excel. È sufficiente incollare i dati Web in un documento Blocco note vuoto, quindi selezionare tali informazioni (dopo averle incollate) e copiarle di nuovo negli Appunti. Quindi, incollalo in Excel.
L’unica cosa che resta dovrebbero essere dati diretti.
_Nota: _
Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.
ExcelTips è la tua fonte di formazione economica su Microsoft Excel.
Questo suggerimento (6951) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 ed Excel in Office 365. Puoi trovare una versione di questo suggerimento per l’interfaccia del menu precedente di Excel qui: