A legtöbbünk számára könnyen beilleszthető a számítógépen tárolt képek a munkalapba. Kérjük, tegye a következőket:

1. A munkalapon kattintson arra a helyre, ahová képeket szeretne beszúrni.

2. Ezután kattints a gombra betétlap > képek > Ez az eszköz, lásd a képernyőképet:

3. A kiugrott Kép beszúrása ablakban nyissa meg a képeket tartalmazó mappát, majd tartsa lenyomva Ctrl gombot a beilleszteni kívánt képek kiválasztásához, lásd a képernyőképet:

4. Ezután kattints a gombra betétlap gombra, a kiválasztott képeket beillesztette a lapba. Mostantól beállíthatja vagy átméretezheti a képeket a szükséges cellákra, lásd a képernyőképet:

Ha rendelkezik Excel 2013 vagy újabb verzióval, beillesztheti a képeket az internetről vagy a One Drive-ról, kérjük, tegye a következőket:

1. A munkalapon kattintson arra a helyre, ahová képeket szeretne beszúrni.

2. Ezután kattints a gombra betétlap > képek > Online Képek, lásd a képernyőképet:

3. A következő ablak jelenik meg. Ban,-ben Online Képek részben írja be a keresett szöveget a szövegmezőbe, majd nyomja meg az gombot belép kulcs. Az összes megfelelő képet egyszerre keresi, lásd a képernyőképet:

4. Ezután válassza ki a kívánt képeket, majd kattintson a gombra betétlap gomb. A képek behelyezése után méretezze át, vagy állítsa be a képeket a kívánt helyzetbe.

A következő VBA-kód segíthet abban, hogy a cellaméret alapján több képet illesszen be a cellákba. Kérjük, tegye a következőket:

1. Állítsa be a cellaméretet, ahová a képet el szeretné helyezni, majd válassza ki a cellákat.

2. Ezután tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

3. Kattints betétlap > Modulok, és illessze be a következő makrót a Modulok ablak.

VBA kód: Helyezzen be több képet a cellaméret alapján

Sub InsertPictures()
'Updateby Extendoffice
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub

4. Ezután nyomja meg a gombot F5 gombot a kód futtatásához. Ban,-ben Nyisd ki ablakban válassza ki a képeket tartalmazó mappát, majd válassza ki a beilleszteni kívánt képeket, majd kattintson a gombra Nyisd ki gombot, és az összes kijelölt kép be lett helyezve a kiválasztásba a cellaméret alapján. Lásd a képernyőképet:

Ha még nem ismeri a VBA kódot, itt használhatja az energiaellátás funkciót - Képek importálása of Kutools az Excel számára. Ezzel a hasznos funkcióval több képet is gyorsan és egyszerűen importálhat a cellákba.

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

1. Kattints Kutools Plus > Import Export > Képek importálása, lásd a képernyőképet:

2. A kiugrott Képek importálása párbeszédpanelen tegye a következőket:

• A kiválasztható Import rendelés legördülő listából adja meg a kép sorrendjét Töltsön függőlegesen cellát cella után or Töltse vízszintesen a cellát cellák után;
• Ezután kattintson a gombra hozzáad gombbal válassza ki a képfájlokat vagy a mappát, amelyhez a képeket hozzá szeretné adni Képlista;
• Kattintson az Import méret gombra, a Képméret importálása párbeszédpanelen válassza a ikont Megfelelő cellaméret opciót.
• 

3. A beállítások elvégzése után kattintson a gombra import gombra, és most egy másikra Képek importálása kiugrik, adja meg a cél cellákat, ahová importálja a képet, lásd a képernyőképet:

4. Ezután kattints a gombra OK gombra, az összes kiválasztott kép be lett illesztve, hogy megfeleljen az egyes cellák méretének, az alábbi képernyőképen:

A következő VBA-kód segíthet több, a nevüknek megfelelő kép gyors beszúrásában, 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 Insert> Modulok, és illessze be a következő makrót a Modulok ablak.

VBA kód: Helyezzen be több képet, amely megfelel a nevüknek

Sub InserPictureByName()
'Updateby Extendoffice
Dim xFDObject As FileDialog
Dim xStrPath, xStrPicPath As String
Dim xRgName, xRgInser, xRg, xRgI As Range
Dim xFNum As Integer
Set xFDObject = Application.FileDialog(msoFileDialogFolderPicker)
With xFDObject
    .Title = "Please select the folder:"
    .InitialFileName = Application.ActiveWorkbook.Path
    .Show
    .AllowMultiSelect = False
End With
On Error Resume Next
xStrPath = ""
xStrPath = xFDObject.SelectedItems.Item(1)
If xStrPath = "" Then
Exit Sub
End If
Set xRgName = Application.InputBox("Please select the cells contain the image name:", "Kutools for Excel", , , , , , 8)
If xRgName Is Nothing Then
    MsgBox "No cells are select, exit operation! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
Set xRgInser = Application.InputBox("Please select the cells to output the images", "Kutools for Excel", , , , , , 8)
If xRgInser Is Nothing Then
    MsgBox " No cells are select, exit operation.! ", vbInformation, "Kutools for Excel"
    Exit Sub
End If
For xFNum = 1 To xRgName.Count
    Set xRg = xRgName.Item(xFNum)
    Set xRgI = xRgInser.Item(xFNum)
    xStrPicPath = xStrPath & "\" & xRg.Text & ".png"
    If Not Dir(xStrPicPath, vbDirectory) = vbNullString Then
        With xRgI.Parent.Pictures.Insert(xStrPicPath)
            .Left = xRgI.Left
            .Top = xRgI.Top
            .ShapeRange.LockAspectRatio = msoFalse
            .ShapeRange.Height = 60
            .ShapeRange.Width = 60
        End With
    End If
Next
End Sub

Megjegyzések: A fenti kódban megváltoztathatja a kép magasságát és szélességét a szkriptekben..ShapeRange.Hight = 60",".ShapeRange.Width = 60”Az Ön igényeinek.

3. Ezután nyomja meg a gombot F5 gombot a kód futtatásához, és a megnyílt ablakban válassza ki a mappát, amely tartalmazza a beilleszteni kívánt képeket, lásd a képernyőképet:

4. Ezután kattintson OK gombra, megjelenik egy prompt doboz, válassza ki a képneveket tartalmazó cellákat, lásd a képernyőképet:

5. Kattintson a gombra OK gombra, és egy másik prompt doboz jelenik meg, válassza ki azokat a cellákat, amelyekkel a képeket ki szeretné adni, lásd a képernyőképet:

6. Végül kattintson OK, és a képeket a nevük alapján azonnal beillesztették a cellákba, lásd a képernyőképet:

Ha van Kutools az Excel számára, Annak Match Import Képek funkcióval gyorsan és egyszerűen beillesztheti a képeket a képnevek alapján.

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

1. Kattints Kutools Plus > Import Export > Match Import Képek, lásd a képernyőképet:

2. A kiugrott Kép importálása kép párbeszédpanelen tegye a következőket:

• A kiválasztható Import rendelés legördülő listából adja meg a kép sorrendjét Töltsön függőlegesen cellát cella után or Töltse vízszintesen a cellát cellák után;
• Aztán a Mérkőzési tartomány szövegmezőben válassza ki azokat a képneveket, amelyek alapján képeket szeretne beszúrni;
• Ezután kattintson hozzáad gombbal válassza ki a képfájlokat vagy a mappát, amelyhez a képeket hozzá szeretné adni Képlista;
• Ezután meg kell adnia a kép méretét. kérem kattintson Import méret gombra, a Képméret importálása párbeszédpanelen válassza ki a kívánt képméretet.
• 

3. A beállítások elvégzése után kattintson a gombra import gombra, válasszon egy cellát vagy egy cellák listáját a képek megjelenítéséhez a kiugrott helyről Match Import Képek párbeszédpanel, lásd a képernyőképet:

4. Ezután kattints a gombra OK, és az összes olyan képet beillesztette, amelynek a nevei megfeleltek a cellaértékeknek, lásd a képernyőképet:

Kérjük, alkalmazza a következő VBA kódot a képek beszúrásához az URL-ek listája alapján.

1. Először állítsa be a szomszédos cellaméretet, amelyhez keresse a képeket.

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

3. Kattints betétlap > Modulok, és illessze be a következő makrót a Modulok ablak.

VBA kód: Helyezzen be képeket az URL-ek listájából

Sub URLPictureInsert()
'Updateby Extendoffice
Dim Pshp As Shape
Dim xRg As Range
Dim xCol As Long
On Error Resume Next
Application.ScreenUpdating = False
Set Rng = ActiveSheet.Range("A2:A5")
For Each cell In Rng
filenam = cell
ActiveSheet.Pictures.Insert(filenam).Select
Set Pshp = Selection.ShapeRange.Item(1)
If Pshp Is Nothing Then GoTo lab
xCol = cell.Column + 1
Set xRg = Cells(cell.Row, xCol)
With Pshp
.LockAspectRatio = msoFalse
If .Width > xRg.Width Then .Width = xRg.Width * 2 / 3
If .Height > xRg.Height Then .Height = xRg.Height * 2 / 3
.Top = xRg.Top + (xRg.Height - .Height) / 2
.Left = xRg.Left + (xRg.Width - .Width) / 2
End With
lab:
Set Pshp = Nothing
Range("A2").Select
Next
Application.ScreenUpdating = True
End Sub

Megjegyzések: A fenti kódban A2: A5 az a cellatartomány, amely tartalmazza azokat az URL-címeket, amelyekkel kibontani szeretné a képeket, a cellahivatkozásokat az igényeinek megfelelően módosítsa.

4. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, a megfelelő képeket kivonják az URL-ekből a szomszédos oszlopba, és a cellák közepére helyezik, lásd a képernyőképet:

Kutools az Excel számára csodálatos funkcióval rendelkezik - Képek beszúrása az útvonalról (URL). Ezzel a segédprogrammal a megfelelő képeket gyorsan és egyszerűen kinyerik az URL-ekből.

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

1. Kattints Kutools > betétlap > Képek beszúrása az útvonalról (URL), lásd a képernyőképet:

2. A kiugrott Képek beszúrása az útvonalról (URL) párbeszédpanelen állítsa be a következő műveleteket:

• Válassza ki az URL-cellák listáját és egy cellatartományt, ahová a képeket el szeretné helyezni;
• Adja meg a képek méretét, amire szüksége van a Képméret szakasz.
• 

3. Ezután kattintson Ok gombra, és az összes képet kivonták az URL-ekből, lásd a képernyőképet:

Az alábbi VBA kódot alkalmazhatja a képek beszúrására a képfájl útvonalai alapján.

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

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

VBA kód: Képek beillesztése a fájlok elérési útvonala közül

Sub InsertPicFromFilePath()
'Updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xVal As String
    On Error Resume Next
    Set xRg = Application.InputBox("Please select file path cells:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xVal = xCell.Value
        If xVal <> "" Then
            ActiveSheet.Shapes.AddPicture xCell.Value, msoFalse, msoTrue, _
            xCell.Offset(0, 1).Left, xCell.Top, xCell.Height, _
            xCell.Height
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. A fenti kód beillesztése után nyomja meg a gombot F5 kulcs a kód futtatásához, majd megjelenik egy prompt doboz, válassza ki a fájl elérési útjának celláit, lásd a képernyőképet:

4. Ezután kattintson OK gombra kattintva a fájl útvonalain alapuló összes kép a következő oszlopban jelenik meg, a következő képernyőkép szerint:

Kutools az Excel számára'S Képek beszúrása az útvonalról (URL) funkció szintén segítséget nyújthat a fájl elérési útjából származó relatív képek megjelenítéséhez.

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

1. Kattints Kutools > betétlap > Képek beszúrása az útvonalról (URL), a felbukkanó párbeszédpanelen adja meg a fájl elérési útját, a képek kiadásának tartományát, a kép méretét szükség szerint, lásd a képernyőképeket:

2. Az opciók beállítása után kattintson a gombra Ok gombra, a képek egyszerre kerülnek be a kiválasztott cellákba, lásd a képernyőképet:

tippek: Előfordulhat, hogy a kép átfedésben van a munkalap adatterületével, ahogy az alábbi képernyőképen látható. Ez azért történik, mert a kép túl nagy, és nem lesz átméretezve, hogy automatikusan illeszkedjen a fejléc vagy a lábléc szakasz mezőjébe.

A probléma megoldásához csak át kell méreteznie a fejlécben vagy a láblécben lévő képet, kérjük, tegye a következőket:

1. Kattintson a fejléc vagy a lábléc részre, ahol a kép található, majd kattintson a gombra Kép formázása alatt a Design fül, lásd a képernyőképet:

2. Az Kép formázása párbeszédpanel alatt Méret lapon, kérjük, állítsa be a kép méretét, hogy illeszkedjen a fejléc vagy a lábléc szakasz mezőjéhez, lásd a képernyőképet:

3. Ezután kattintson OK, akkor megkapja az eredményt, amire szüksége van.

1. Nyissa meg azt a munkalapot, ahová háttérképet szeretne beszúrni.

2. Ezután kattints a gombra Page Layout > Háttér, lásd a képernyőképet:

3. A kiugrott Képek beszúrása ablakban, kérjük, válasszon ki egy képet a számítógépéről, a webhelyről vagy a OneDrive-ból, amire szüksége van, lásd a képernyőképet:

4. Most a képet háttérként illesztették be a munkalapba, az alábbi képernyőkép szerint:

A fenti módszerrel nem lehet megváltoztatni a beillesztett háttérkép átlátszóságát, így ha a háttérkép színe nehéz, nem lesz kényelmes elolvasnia a munkalap adatait. Ebben a részben arról fogok beszélni, hogyan lehet átlátszó képet beilleszteni a cellák mögé.

1. Kattints betétlap > Alakzatok, és válasszon egy téglalap alakot, lásd a képernyőképet:

2. Ezután rajzoljon egy akkora alakzatot, amennyire szüksége van az aktív munkalapon.

3. Az alakzat megrajzolása után a rajzeszközök fül jelenik meg a szalagon, majd kattintson a gombra kialakított > Kép alakzat > Nincs vázlat, lásd a képernyőképet:

4. Ezután kattintson a jobb gombbal az alakzatra, és válassza a lehetőséget Formátum alakja a helyi menüből lásd a képernyőképet:

5. A kibővített Formátum alakja panel alatt a Fill & Line lapon hajtsa végre a következő műveleteket:

• Alatt Tölt válasszon Kép vagy textúra kitöltése választási lehetőség;
• Kattints betétlap gombot a Képforrás, és válasszon ki egy képet, amelyet be szeretne illeszteni;
• Ezután állítsa be a kép átlátszóságát az Ön igényeinek megfelelően Átlátszóy szakasz.
• 

6. Ezután meglátja, hogy a képekkel töltött forma háttérképként néz ki, mint a fenti képernyőképen látható.

Megjegyzések: Az ilyen típusú háttérkép beillesztése után semmilyen szöveget nem írhat be a képtartományba.

Mindkét fenti módszernek megvannak a maga korlátai, az első módszer nem változtathatja meg a kép átlátszóságát, a második módszer nem teszi lehetővé a szöveg bevitelét a képterületen belüli cellákba. E problémák megoldása érdekében Kutools az Excel számára'S Vízjel beszúrása funkció 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 > betétlap > Vízjel beszúrása, lásd a képernyőképet:

2. A kiugrott Vízjel beszúrása párbeszédpanelen válassza ki Kép vízjel, Majd kattintson a Válassza a Kép lehetőséget gombra, hogy kiválasszon egy képet, amelyet be szeretne illeszteni, majd adja meg a kép méretét, és jelölje be az Elmosás opciót, lásd a képernyőképet:

3. Ezután kattints a gombra Ok gombra, a képet háttérképként illesztették be a munkalapba.

Az Excelben a Másolás képként funkció egy cellatartomány képmásolásához és beszúrásához.

1. Válassza ki a másolni és képként beilleszteni kívánt cellatartományt.

2. Ezután kattints a gombra Kezdőlap > másolat > Másolás képként, lásd a képernyőképet:

3. A kiugrott Kép másolása párbeszédablakban válassza ki Kép tól kialakított szakasz, lásd a képernyőképet:

4. Ezután kattints a gombra OK gombot, most csak meg kell nyomnia Ctrl + V hogy a képet a munkafüzet bárhová illessze.

Az Excelben van egy Háló eszköz, amellyel fényképet készíthet a kiválasztott adatokról, majd beillesztheti képként. Amikor az eredeti adat megváltozik, a másolt kép dinamikusan megváltozik.

Először meg kell jelenítenie a Háló a szalagon, majd alkalmazza.

1. Kattints A Gyorselérés eszköztár testreszabása ikonra, majd kattintson a gombra További parancsok opció, lásd a képernyőképet:

2. A nyitottban Excel beállítások párbeszédpanelen tegye a következőket:

• választ Minden parancs tól Válaszd ki a parancsokat ledob;
• Ezután görgessen a kiválasztáshoz Háló a listából;
• Ezután kattintson hozzáad gombra kattintva hozzáadhatja ezt az eszközt a A Gyorselérés eszköztár testreszabása;
• Végül kattintson OK a párbeszédpanel bezárásához.
• 

3. És a Háló eszköz megjelent a szalagon, lásd a képernyőképet:

4. Ezután válassza ki a kívánt cellatartományt.

5. Ezután kattintson a gombra Háló eszközt, majd lépjen a munkalapra, és kattintson bárhová, az adattartomány képként kerül beillesztésre, az alábbi bemutató szerint:

Ha van Kutools az Excel számára, Annak Erőforrás-könyvtár funkcióval mentheti a kijelölt adatokat a Erőforrás-könyvtár, majd a későbbiekben tetszés szerint használja képként vagy szövegként.

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

1. Válassza ki azt az adattartományt, amelyet képként szeretne beszúrni.

2. Ezután kattints a gombra Kutools > Navigáció, lásd a képernyőképet:

3. A kibővített Navigáció tetején kattintson a gombra Erőforrás-könyvtár ikonra, majd kattintson a gombra A kiválasztott tartalom hozzáadása az Erőforrás könyvtárhoz ikon, lásd a képernyőképet:

4. Az Új erőforráskönyvtár bejegyzés párbeszédpanelen adja meg az elem nevét, majd válassza ki a hozzáadni kívánt csoportot. Lásd a képernyőképet:

5. Ezután kattints a gombra hozzáad gombot hozzáadásához Erőforrás-könyvtár ablaktábla. Ha ezt a tartományt képként kívánja beszúrni, akkor csak egy cellára kell kattintania a kép megkereséséhez, majd megtalálja a mentett elemet a Erőforrás-könyvtár és kattintson a gombra Helyezze be > Kép (EMF) az elem legördülő listájából. És az adattartomány képként kerül beillesztésre a lapba, lásd a képernyőképeket:

Normál esetben az Excel programban létrehozhat egy dinamikus nevű tartományt, majd a csatolt képet felhasználhatja a feladat megoldására az Excelben.

1. Először két oszlopot kell létrehoznia, amelyek tartalmazzák a termékneveket és a relatív képeket, lásd a képernyőképet:

2. Ezután kérjük, hozzon létre egy legördülő listát a cellaértékekhez. Kattintson egy cellára a legördülő lista megjelenítéséhez, majd kattintson a gombra dátum > adatok ellenőrzése > adatok ellenőrzése, lásd a képernyőképet:

3. A kiugrott adatok ellenőrzése párbeszédpanel alatt beállítások lapot választani Lista tól Hagyjuk legördülő menüből, majd válassza ki a létrehozandó cellákat a legördülő listából a forrás szövegdoboz, lásd a képernyőképet:

4. Kattints OK, és a cellaértékekkel rendelkező legördülő lista létrejött, válasszon ki egy elemet a legördülő listából, lásd a képernyőképet:

5. Ezután kattints a gombra képletek > Definiálja a nevet, lásd a képernyőképet:

6. Az Új név párbeszédpanelen tegye a következőket:

• Írja be a myimage nevű nevet a Név szövegdoboz;
• Ezután másolja és illessze be ezt a képletet: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) a Hivatkozások szövegmezőbe.

Megjegyzések: A fenti képletben:

• 11. lap! $ A $ 2: $ B $ 6: az a munkalap és tartomány, amely tartalmazza a használni kívánt értékeket és képeket;
• 11. lap! $ E $ 2: a munkalap azon cellája, ahol létrehozta a legördülő listát;
• 11. lap! $ A $ 2: $ A $ 6: a létrehozott cellák listája a legördülő lista alapján;
• A változó szám 2 a képeket tartalmazó oszlopszám. Ha képei a C oszlopban vannak, írja be a 3 értéket.

7. Ezután kattintson OK gombra, majd másolja és illessze be a megfelelő képet az E2 cellaértéke alapján az eredeti tartományból az F2 cellába, lásd a képernyőképet:

8. Ezután válassza ki a képet az F2 cellában, majd írja be ezt a képletet = myimage (az én képem az a tartománynév, amelyet a 6. lépésben hoztál létre a képletsávba, lásd a képernyőképet:

9. A képlet beírása után nyomja meg a gombot belép gombot, és most, ha kiválaszt egy elemet a legördülő listából, annak relatív képe azonnal megjelenik. Lásd a képernyőképet:

A fenti módszer a legtöbbünk számára nehéz lehet, itt bemutatok egy hasznos funkciót - Kép legördülő lista of Kutools az Excel számára, ezzel a hasznos eszközzel több kattintással hozhat létre több legördülő listát a hozzájuk tartozó képekkel.

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

1. Először két oszlopot kell létrehoznia, amelyek a termékneveket és a relatív képeket tartalmazzák a munkalapon.

2. Ezután kattintson Kutools > Legördülő lista > Kép legördülő lista, lásd a képernyőképet:

3. Az Kép legördülő lista párbeszédpanel, ha létrehozta a cellaértékek és képek oszlopait, kérjük, hagyja figyelmen kívül az 1. lépést, majd válassza ki az eredeti adat- és képtartományt, valamint a kimeneti tartományt, lásd a képernyőképet:

4. Ezután kattintson Ok gombra, a képekkel ellátott legördülő listák létrejöttek a kiválasztott cellákba, és amikor egy elemet kiválasztunk a legördülő cellából, annak megfelelő képe egyszerre jelenik meg, lásd alább a bemutatót:

Normál esetben használhatja a Mentés másként a munkafüzet összes képének mentéséhez, kérjük, tegye a következőket:

1. Kattints filé > Mentés másként, A Mentés másként ablakban adjon meg egy mappát az exportált fájlok elhelyezéséhez, majd válassza a lehetőséget Weboldal (*. Htm; *. Html) tól Mentés type legördülő lista, lásd a képernyőképet:

2. Kattintson a gombra Megtakarítás gombra, lépjen az adott mappába, és két fájlt fog látni, az egyik a HTML formátumú fájl, a másik pedig egy mappa, amely a munkafüzet képeit, diagramjait vagy más objektumait tartalmazza. Lásd a képernyőképet:

3. Ezután csak a képeket húzhatja át egy másik mappába, amire szüksége van.

Megjegyzések: Ennek használatával Mentés másként funkcióval, minden képet kétszer kap, az egyik kisebb, a másik nagyobb, így szükség esetén elmentheti a nagyobb felbontású képeket.

Az összes kép Excel fájlból történő mentéséhez a fájlkiterjesztést RAR-ra is módosíthatja. Kérjük, tegye a következőket:

1. Módosítsa a fájlkiterjesztést xlsx nak nek rar az alábbi képernyőképen:

2. Ezután csomagolja ki a fájlt, és 3 mappát és 1 fájlt fog látni a mappában, lásd a képernyőképet:

3. Ezután kattintson a gombra a xl mappát, majd nyissa meg a média mappát, látni fogja, hogy az összes képet itt tárolják másolatok nélkül, lásd a képernyőképet:

Ha van Kutools az Excel számára, Annak Exportálja a grafikát funkcióval gyorsan exportálhat néhány konkrét objektumot, például képeket, diagramokat, alakzatokat képformátumba, amire szüksége van.

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

1. Kattints Kutools Plus > Import Export > Exportálja a grafikát, lásd a képernyőképet:

2. Az Exportálja a grafikát párbeszédpanelen hajtsa végre a következő műveleteket:

• A pop-art design, négy időzóna kijelzése egyszerre és méretének arányai azok az érvek, amelyek a NeXtime Time Zones-t kiváló választássá teszik. Válassza a képek lehetőség a Típusai legördülő lista;
• Adjon meg egy mappát az exportáló képek mentéséhez;
• Ezután kattintson a legördülő listára a Export formátum hogy egy formátumot válasszon a képei számára.
• 

3. Végül kattintson Ok gombra, az aktuális munkafüzet összes képét elmentette a megadott mappába, lásd a képernyőképet:

A képek törléséhez az aktuális munkalapról az alábbi VBA-kód segíthet, kérjük, tegye a következőket:

1. Aktiválja a törölni kívánt képeket tartalmazó munkalapot.

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

3. Kattints betétlap > Modulok, és illessze be a következő makrót a Modulok Ablak.

VBA kód: Az összes kép törlése az aktuális munkalapról

Sub DeleteAllPics()
'Updateby Extendoffice
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
Pic.Delete
Next Pic
End Sub

4. Ezután nyomja meg a gombot F5 gombot a kód futtatásához, és az aktív munkalap összes képe egyszerre törlődik.

Ha csak egy cellatartományból kell törölnie a képeket, itt egy másik egyszerű kód segíthet.

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

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

VBA kód: Törölje a képeket egy cellatartományból

Sub DeletePic()
'Updateby Extendoffice
    Dim xPicRg As Range
    Dim xPic As Picture
    Dim xRg As Range
    Application.ScreenUpdating = False
    Set xRg = Range("B4:C6")
    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 B4: C6 az a tartomány, ahonnan törölni szeretné a képeket.

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

Ha van Kutools az Excel számára, Annak Illusztrációk és objektumok törlése funkcióval gyorsan törölheti a képeket egy munkalapról, néhány kiválasztott munkalapról vagy az egész munkafüzetről.

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. A nyitottban Illusztrációk és objektumok törlése párbeszédpanelen ellenőrizze képek tól töröl szakaszban, majd adja meg azt a kört, amelyből törölni szeretné a képeket a 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, a kiválasztott munkalapokról vagy az egész munkafüzetről, ahogyan Ön megadta.