Hogyan lehet törölni az összes képet egy cellatartományban?

Ha több kép van feltöltve a munkalapjára, most törölnie kell néhányat egy meghatározott tartományban, hogyan kezelje gyorsan?

Töröljön minden képet egy adott cellatartományban VBA kóddal

Törölje az összes képet egy munkalapon vagy az egész munkafüzetben a Kutools for Excel segítségével

Töröljön minden képet egy adott cellatartományban VBA kóddal

Itt van egy egyszerű VBA-kód, amely segítségével törölheti a képeket a kiválasztott tartományból anélkül, hogy egyesével törölné őket, kérjük, tegye a következőket:

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modul, és illessze be a következő kódot a Modulok Ablak.

VBA kód: törölje az összes képet a kiválasztott cellatartományból:

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

Megjegyzések: A fenti kódban A5: B8 az a tartomány, ahonnan törölni kívánja a képeket, kérjük, változtassa meg igényeinek megfelelően.

3. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és a kiválasztott tartományban lévő képek egyszerre törlődtek, lásd a képernyőképet:

Törölje az összes képet egy munkalapon vagy az egész munkafüzetben a Kutools for Excel segítségével

Ha törölnie kell az összes képet egy munkalapról vagy egy munkafüzetből, akkor a Kutools for Excels Illusztrációk és objektumok törlése segédprogram tehet egy szívességet.

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Kattints Kutools > töröl > Illusztrációk és objektumok törlése, lásd a képernyőképet:

2. Az Illusztrációk és objektumok törlése párbeszédpanelen ellenőrizze képek tól töröl részben válassza ki azt a kört, amelyből törölni szeretné a képeket benéz szakasz, lásd a képernyőképet:

3. Ezután kattintson Ok gombra, és az összes kép törlődik a munkalapról vagy az egész munkafüzetből, ahogy kiválasztotta.

Kattintson a Kutools for Excel letöltéséhez és az ingyenes próbaverzióhoz most!