Cum să ștergeți toate imaginile dintr-o gamă de celule?
Dacă există mai multe imagini populate în foaia dvs. de lucru, acum doriți să ștergeți unele dintre ele într-un interval specificat, cum vă descurcați rapid?
Ștergeți toate imaginile dintr-un anumit interval de celule cu cod VBA
Ștergeți toate imaginile dintr-o foaie de lucru sau întreaga carte de lucru cu Kutools pentru Excel
Ștergeți toate imaginile dintr-un anumit interval de celule cu cod VBA
Iată un cod VBA simplu care vă poate ajuta să ștergeți imaginile din intervalul selectat fără a le șterge pe rând, vă rugăm să procedați astfel:
1. Țineți apăsat butonul ALT + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. Clic Insera > Modul, și lipiți următorul cod în Module Fereastră.
Cod VBA: ștergeți toate imaginile dintr-un interval selectat de celule:
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
notițe: În codul de mai sus, A5: B8 este gama din care doriți să ștergeți imaginile, vă rugăm să o schimbați în funcție de nevoile dvs.
3. Apoi apăsați F5 tasta pentru a rula acest cod, iar imaginile din intervalul selectat au fost șterse simultan, vezi captura de ecran:
Ștergeți toate imaginile dintr-o foaie de lucru sau întreaga carte de lucru cu Kutools pentru Excel
Dacă trebuie să ștergeți toate imaginile dintr-o foaie de lucru sau dintr-un registru de lucru, Kutools pentru Excel 's Ștergeți ilustrații și obiecte utilitatea vă poate face o favoare.
| Kutools pentru Excel : cu mai mult de 300 de programe de completare Excel la îndemână, gratuit pentru a încerca fără limitări în 30 de zile. |
După instalare Kutools pentru Excel, vă rugăm să faceți următoarele:
1. Clic Kutools > Șterge > Ștergeți ilustrații și obiecte, vezi captura de ecran:
2. În Ștergeți ilustrații și obiecte casetă de dialog, bifați poze de la Șterge , apoi alegeți domeniul de aplicare pe care doriți să îl ștergeți din sub uită-te în secțiune, vezi captura de ecran:
3. Apoi apasa Ok și toate imaginile vor fi șterse din foaia de lucru sau din întregul registru de lucru așa cum ați selectat.
Faceți clic pentru a descărca Kutools pentru Excel și încercare gratuită acum!
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
