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ö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:
Az összes képet törölje egy munkalapról vagy egy teljes munkafüzetből a Kutools for Excel alkalmazással
Ha törölnie kell az összes képet egy munkalapról vagy egy munkafüzetből, akkor a Kutools for Excel 's Illusztrációk és objektumok törlése segédprogram tehet egy szívességet.
Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. |
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 és az ingyenes próbaverzió letöltéséhez!
A legjobb irodai termelékenységi eszközök
A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet
- újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
- Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
- Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
- Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
- Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
- Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
- Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
- Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
- Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
