Come eliminare tutte le immagini in un intervallo di celle?
Se ci sono più immagini popolate nel tuo foglio di lavoro, ora, vuoi eliminarne alcune in un intervallo specificato, come gestisci rapidamente?
Elimina tutte le immagini in un intervallo specifico di celle con codice VBA
Elimina tutte le immagini in un intervallo specifico di celle con codice VBA
Ecco un semplice codice VBA che può aiutarti a eliminare le immagini nell'intervallo selezionato senza eliminarle una per una, per favore fai come segue:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulo, e incolla il codice seguente nel file Moduli Finestra.
Codice VBA: elimina tutte le immagini in un intervallo di celle selezionato:
Sub DeletePic()
Dim xPicRg As Range
Dim xPic As Picture
Dim xRg As Range
Application.ScreenUpdating = False
Set xRg = Range("A5:B8")
For Each xPic In ActiveSheet.Pictures
Set xPicRg = Range(xPic.TopLeftCell.Address & ":" & xPic.BottomRightCell.Address)
If Not Intersect(xRg, xPicRg) Is Nothing Then xPic.Delete
Next
Application.ScreenUpdating = True
End Sub
Note:: Nel codice sopra, A5: B8 è l'intervallo da cui si desidera eliminare le immagini, modificarlo in base alle proprie esigenze.
3. Quindi premere F5 chiave per eseguire questo codice e le immagini nell'intervallo selezionato sono state eliminate contemporaneamente, vedi screenshot:
Elimina tutte le immagini in un foglio di lavoro o in un'intera cartella di lavoro con Kutools per Excel
Se è necessario eliminare tutte le immagini da un foglio di lavoro o da una cartella di lavoro, il file Kutools per Excel's Elimina illustrazioni e oggetti l'utilità può farti un favore.
Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. |
Dopo l'installazione Kutools for Excel, si prega di fare come segue:
1. Clic Kutools > Elimina > Elimina illustrazioni e oggetti, vedi screenshot:
2. Nel Elimina illustrazioni e oggetti finestra di dialogo, controllare Immagini dal Elimina sezione, quindi scegli l'ambito da cui desideri eliminare le immagini sotto il file guarda dentro sezione, vedi screenshot:
3. Quindi fare clic Ok e tutte le immagini verranno eliminate dal foglio di lavoro o dall'intera cartella di lavoro come selezionato.
Fai clic per scaricare Kutools per Excel e prova gratuita Ora!
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!