Pro většinu z nás je snadné vložit obrázky uložené v počítači do listu. Udělejte prosím toto:

1. V listu klikněte na místo, kam chcete vložit obrázky.

2. Potom klepněte na tlačítko Vložit > Obrázky > Toto zařízení, viz screenshot:

3. Ve vyskočené Vložit obrázek otevřete složku, která obsahuje obrázky, a poté podržte Ctrl klíč k výběru obrázků, které chcete vložit, viz screenshot:

4. Potom klepněte na tlačítko Vložit tlačítko, vybrané obrázky byly vloženy do listu. Nyní můžete upravit nebo změnit velikost obrázků na buňky, které potřebujete, viz screenshot:

Pokud máte Excel 2013 nebo novější verze, můžete obrázky vkládat z webu nebo z One Drive, postupujte takto:

1. V listu klikněte na místo, kam chcete vložit obrázky.

2. Potom klepněte na tlačítko Vložit > Obrázky > Online obrázky, viz screenshot:

3. Zobrazí se následující okno. V Online obrázky části, zadejte do textového pole, co hledáte, a stiskněte vstoupit klíč. Všechny odpovídající obrázky se prohledávají najednou, viz screenshot:

4. Poté vyberte požadované obrázky a klikněte na Vložit knoflík. Po vložení obrázků prosím změňte jejich velikost nebo je upravte do požadované polohy.

Následující kód VBA vám pomůže vložit více obrázků do buněk na základě velikosti buňky. Udělejte prosím toto:

1. Upravte velikost buňky, do které chcete obrázek vložit, a poté buňky vyberte.

2. Poté podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

3, klikněte Vložit > Modula vložte následující makro do souboru Modul okno.

Kód VBA: Vložte více obrázků na základě velikosti buňky

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. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu. V Otevřená V okně vyberte složku, která obsahuje obrázky, poté vyberte obrázky, které chcete vložit, a klikněte na Otevřená tlačítko a všechny vybrané obrázky byly vloženy do vašeho výběru na základě velikosti buňky. Viz snímek obrazovky:

Pokud nejste obeznámeni s kódem VBA, zde můžete použít funkci napájení - Importovat obrázky of Kutools pro Excel. Díky této užitečné funkci můžete rychle a snadno importovat více obrázků do buněk.

Po instalaci Kutools pro Excel, proveďte následující kroky:

1, klikněte Kutools Plus > Import Export > Importovat obrázky, viz screenshot:

2. Ve vyskočené Importovat obrázky v dialogovém okně proveďte následující operace:

• V rozevíracím seznamu Importovat objednávku určete pořadí obrázků, které si můžete vybrat Naplňte svisle buňku po buňce or Vyplňte vodorovně buňku za buňkou;
• Potom klepněte na tlačítko přidat Tlačítko pro výběr obrazových souborů nebo složek pro přidání obrázků do Seznam obrázků;
• Klepněte na tlačítko Velikost importu tlačítko v Importovat velikost obrázku dialogové okno vyberte Odpovídající velikost buňky volba.
• 

3. Po dokončení nastavení klikněte import tlačítko a teď další Importovat obrázky je vyskočeno, určete cílové buňky, do kterých importujete obrázek, viz screenshot:

4. Potom klepněte na tlačítko OK Tlačítko, všechny vybrané obrázky byly vloženy tak, aby odpovídaly velikosti konkrétních buněk, jak je uvedeno níže:

Následující kód VBA vám pomůže rychle vložit více obrázků odpovídajících jejich jménům, postupujte takto:

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte realizovatt> Modula vložte následující makro do souboru Modul okno.

Kód VBA: Vložte více obrázků odpovídajících jejich jménům

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

Poznámka: Ve výše uvedeném kódu můžete změnit výšku a šířku obrázku ve skriptech “.ShapeRange.Height = 60",".ShapeRange.Width = 60„Podle vaší potřeby.

3. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a v otevřeném okně vyberte složku obsahující obrázky, které chcete vložit, viz screenshot:

4. A pak klikněte OK tlačítko, vyskočí okno s výzvou, vyberte buňky, které obsahují názvy obrázků, viz screenshot:

5. Pokračujte kliknutím OK Tlačítko a následuje další okno s výzvou, vyberte buňky, které chcete odeslat na obrázky, viz screenshot:

6. Konečně klikněte na tlačítko OK, a obrázky byly vloženy do buněk na základě jejich jmen najednou, viz screenshot:

Pokud máte Kutools pro Excel, S jeho Porovnat importované obrázky Díky této funkci můžete rychle a snadno vložit obrázky na základě jejich názvů.

Po instalaci Kutools pro Excel, udělejte prosím toto:

1, klikněte Kutools Plus > Import Export > Porovnat importované obrázky, viz screenshot:

2. Ve vyskočené Porovnat importovaný obrázek V dialogovém okně proveďte následující operace:

• V rozevíracím seznamu Importovat objednávku určete pořadí obrázků, které si můžete vybrat Naplňte svisle buňku po buňce or Vyplňte vodorovně buňku za buňkou;
• Pak od Rozsah zápasů textové pole, vyberte názvy obrázků, na které chcete vložit obrázky;
• A pak klikněte přidat Tlačítko pro výběr obrazových souborů nebo složek pro přidání obrázků do Seznam obrázků;
• Dále byste měli určit velikost obrázku. prosím klikněte Velikost importu tlačítko v Importovat velikost obrázku V dialogovém okně vyberte podle potřeby jednu velikost obrázku.
• 

3. Po dokončení nastavení klikněte import tlačítko, vyberte jednu buňku nebo seznam buněk a vyhledejte obrázky z vyskakovacího okna Porovnat importované obrázky dialog, viz screenshot:

4. Potom klepněte na tlačítko OKa všechny obrázky, jejichž názvy se shodovaly s hodnotami buněk, byly vloženy, viz screenshot:

K vložení obrázků na základě seznamu adres URL použijte následující kód VBA.

1. Nejprve upravte velikost sousední buňky, ve které chcete obrázky najít.

2. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

3, klikněte Vložit > Modula vložte následující makro do souboru Modul okno.

Kód VBA: Vložte obrázky ze seznamu adres URL

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

Poznámky: Ve výše uvedeném kódu, A2: A5 je rozsah buněk, který obsahuje adresy URL, ze kterých chcete obrázky extrahovat, měli byste podle potřeby změnit odkazy na buňky.

4. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu, odpovídající obrázky budou extrahovány z URL do sousedního sloupce a umístěny do středu buněk, viz screenshot:

Kutools pro Excel má úžasnou vlastnost - Vložit obrázky z cesty (URL). Pomocí tohoto nástroje budou z obrázků URL rychle a snadno extrahovány odpovídající obrázky.

Po instalaci Kutools pro Excel, proveďte následující kroky:

1, klikněte Kutools > Vložit > Vložit obrázky z cesty (URL), viz screenshot:

2. Ve vyskočené Vložit obrázky z cesty (URL) dialogové okno, nastavte prosím následující operace:

• Vyberte seznam buněk URL a rozsah buněk, kam chcete obrázky vložit;
• Určete velikost obrázků podle potřeby z Velikost obrázku sekce.
• 

3. A pak klikněte Ok tlačítko a všechny obrázky byly extrahovány z adres URL, viz screenshot:

Následující kód VBA můžete použít pro vkládání obrázků na základě cest k souborům obrázků.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula poté vložte následující kód do souboru Modul Okno.

Kód VBA: Vložte obrázky z řady cest k souborům

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. Po vložení výše uvedeného kódu stiskněte F5 klíč ke spuštění tohoto kódu, pak se zobrazí okno s výzvou, vyberte buňky cesty k souboru, viz screenshot:

4. Pak klikněte na tlačítko OK Tlačítko, všechny obrázky založené na cestách k souboru byly zobrazeny do dalšího sloupce jako následující snímek obrazovky:

Kutools pro ExcelJe Vložit obrázky z cesty (URL) Tato funkce vám také může pomoci zobrazit relativní obrázky z cesty k souboru.

Po instalaci Kutools pro Excel, udělejte prosím toto:

1, klikněte Kutools > Vložit > Vložit obrázky z cesty (URL)V rozbalovacím dialogovém okně zadejte rozsah cesty k souboru, rozsah pro výstup obrázků, velikost obrázku, jak potřebujete, viz screenshoty:

2. Po nastavení možností klikněte na Ok tlačítko, obrázky se vloží do vybraných buněk najednou, viz screenshot:

Tipy: Někdy možná zjistíte, že se obrázek překrývá s datovou oblastí listu, jak je ukázáno níže. K tomu dochází, protože obrázek je příliš velký a jeho velikost se nezmění tak, aby se automaticky vešel do pole oddílu záhlaví nebo zápatí.

Chcete-li tento problém vyřešit, stačí změnit velikost obrázku v záhlaví nebo zápatí, proveďte následující kroky:

1. Klikněte do části záhlaví nebo zápatí, kde je obrázek umístěn, a poté klikněte Formát obrázku pod Design karta, viz screenshot:

2. V Formát obrázku v dialogovém okně pod Velikost karta, upravte velikost obrázku tak, aby se vešla do pole sekce záhlaví nebo zápatí, viz screenshot:

3. A pak klikněte OK, získáte výsledek, jak potřebujete.

1. Otevřete list, kam chcete vložit obrázek na pozadí.

2. Potom klepněte na tlačítko Rozvržení stránky > Pozadí, viz screenshot:

3. Ve vyskočené Vložit obrázky v okně, prosím, vyberte jeden obrázek ze svého počítače, webu nebo OneDrive, jak potřebujete, viz screenshot:

4. Nyní byl obrázek vložen do listu jako pozadí, jak je uvedeno níže:

S výše uvedenou metodou nemůžete změnit průhlednost vloženého obrázku na pozadí, takže pokud je barva obrázku na pozadí silná, nebude pro vás vhodné číst data z listu. V této části budu hovořit o tom, jak vložit průhledný obrázek za buňky.

1, klikněte Vložit > Tvarya vyberte tvar obdélníku, viz screenshot:

2. Potom do aktivního listu nakreslete tvar tak velký, jak potřebujete.

3. Po nakreslení tvaru a Nástroje pro kreslení Na pásu karet se zobrazí karta a poté klepněte na Formát > Obrys tvaru > Žádný obrys, viz screenshot:

4. Poté klikněte pravým tlačítkem na tvar a vyberte Formátovat tvar z kontextové nabídky viz screenshot:

5. V rozšířeném Formátovat tvar podokno pod Vyplnit a řádek na kartě proveďte následující operace:

• Pod Vyplnit vyberte část Výplň obrázku nebo textury volba;
• klikněte Vložit tlačítko z Zdroj obrázkua vyberte jeden obrázek, který chcete vložit;
• Poté upravte průhlednost obrázku podle svých potřeb z Transparency sekce.
• 

6. A pak uvidíte, že tvar vyplněný obrázky vypadá jako obrázek na pozadí, jak je uvedeno výše.

Poznámka: Po vložení tohoto typu obrázku na pozadí nebudete moci zadávat žádný text v rozsahu obrázku.

Obě výše uvedené metody mají svá vlastní omezení, první metoda nemůže změnit průhlednost obrazu, druhá metoda neumožňuje zadávání textu do buněk uvnitř oblasti obrázku. K vyřešení těchto problémů Kutools pro ExcelJe Vložit vodoznak funkce vám může udělat laskavost.

Po instalaci Kutools pro Excel, udělejte prosím toto:

1, klikněte Kutools > Vložit > Vložit vodoznak, viz screenshot:

2. Ve vyskočené Vložit vodoznak dialogové okno vyberte Vodoznak obrázku, A pak klepněte na tlačítko Vyberte možnost Obrázek Tlačítko pro výběr jednoho obrázku, který chcete vložit, a poté zadejte měřítko obrázku a zaškrtněte možnost Vymýt, viz screenshot:

3. Potom klepněte na tlačítko Ok tlačítko, obrázek byl vložen do listu jako obrázek na pozadí.

V aplikaci Excel můžete použít Kopírovat jako obrázek funkce pro kopírování a vložení rozsahu buňky jako obrázku.

1. Vyberte rozsah buněk, které chcete zkopírovat a vložit jako obrázek.

2. Potom klepněte na tlačítko Domů > Zkopírujte > Kopírovat jako obrázek, viz screenshot:

3. Ve vyskočené Kopírovat obrázek , vyberte Obrázek z Formát sekce, viz screenshot:

4. Potom klepněte na tlačítko OK tlačítko, nyní stačí stisknout Ctrl + V vložit obrázek kamkoli v sešitu.

V aplikaci Excel existuje a Ložnice nástroj, který vám může pomoci pořídit fotografii pro vybraná data a poté ji vložit jako obrázek. Když se původní data změní, kopírovaný obrázek se dynamicky změní.

Nejprve byste měli zobrazit Ložnice na pásu karet a poté jej aplikujte.

1, klikněte Přizpůsobte panel nástrojů Rychlý přístup ikonu a potom klikněte na Další příkazy možnost, viz screenshot:

2. V otevřeném Možnosti aplikace Excel V dialogovém okně proveďte následující operace:

• vybrat Všechny příkazy z Vyberte příkazy z rozevírací;
• Poté vyberte výběr Ložnice ze seznamu;
• A pak klikněte přidat tlačítko pro přidání tohoto nástroje do Přizpůsobte panel nástrojů Rychlý přístup;
• Konečně klikněte na tlačítko OK zavřete toto dialogové okno.
• 

3. A Ložnice nástroj byl zobrazen na pásu karet, viz screenshot:

4. Poté vyberte rozsah buněk, které chcete použít.

5. A poté klikněte na Ložnice nástroj, pak přejděte na list a klikněte kamkoli, rozsah dat se vloží jako obrázek, jak je ukázáno níže:

Pokud máte Kutools pro Excel, S jeho Knihovna zdrojů můžete uložit vybraná data do souboru Knihovna zdrojů, a poté jej použijte jako obrázek nebo text pro budoucnost, jak budete chtít.

Po instalaci Kutools pro Excel, udělejte prosím toto:

1. Vyberte rozsah dat, který chcete vložit jako obrázek.

2. Potom klepněte na tlačítko Kutools > Navigace, viz screenshot:

3. V rozšířeném Navigace podokno, klepněte na tlačítko Knihovna zdrojů ikonu a potom klikněte na Přidejte vybraný obsah do knihovny prostředků ikona, viz screenshot:

4. V Nová položka knihovny prostředků V dialogovém okně zadejte název této položky a poté vyberte skupinu, do které chcete přidat. Viz screenshot:

5. Potom klepněte na tlačítko přidat pro přidání Knihovna zdrojů podokno. Chcete-li vložit tento rozsah jako obrázek, stačí kliknout na buňku a vyhledat obrázek a poté najít uloženou položku z Knihovna zdrojů v podokně a klikněte na Vložit jako > Obrázek (EMF) z rozevíracího seznamu položky. A rozsah dat bude vložen do listu jako obrázek, viz screenshoty:

Normálně v aplikaci Excel můžete vytvořit dynamický pojmenovaný rozsah a poté použít propojený obrázek pro řešení tohoto úkolu v aplikaci Excel.

1. Nejprve byste měli vytvořit dva sloupce, které obsahují názvy produktů a relativní obrázky, viz screenshot:

2. Poté vytvořte rozevírací seznam pro hodnoty buněk. Kliknutím na buňku zobrazte rozevírací seznam a poté klikněte na Data > Ověření dat > Ověření dat, viz screenshot:

3. Ve vyskočené Ověření dat v dialogovém okně pod Nastavení kartu, vyberte Seznam z povolit rozevírací seznam a poté vyberte buňky, z nichž chcete vytvořit rozevírací seznam Zdroj textové pole, viz screenshot:

4, klikněte OKa byl vytvořen rozevírací seznam s hodnotami buněk, vyberte jednu položku z rozevíracího seznamu, viz screenshot:

5. Potom klepněte na tlačítko Vzorce > Definujte jméno, viz screenshot:

6. V Nové jméno V dialogovém okně proveďte následující operace:

• Zadejte jméno zvané myimage do Příjmení Textové pole;
• Poté zkopírujte a vložte tento vzorec: =INDEX(Sheet11!$A$2:$B$6,MATCH(Sheet11!$E$2,Sheet11!$A$2:$A$6,0),2) do textového pole Odkazuje na.

Poznámka: Ve výše uvedeném vzorci:

• List11! $ A $ 2: $ B $ 6: je list a rozsah obsahující hodnoty a obrázky, které chcete použít;
• List11! $ E $ 2: je buňka v listu, kde jste vytvořili rozevírací seznam;
• List11! $ A $ 2: $ A $ 6: je seznam buněk, ze kterých jste vytvořeni, rozevírací seznam založený na;
• Číslo proměnné 2 je číslo sloupce obsahující obrázky. Pokud jsou vaše obrázky ve sloupci C, měli byste zadat 3.

7. A pak klikněte OK Poté zkopírujte a vložte odpovídající obrázek na základě hodnoty buňky v E2 z původního rozsahu do buňky F2, viz screenshot:

8. Dále vyberte obrázek v buňce F2 a zadejte tento vzorec = můj obrázek (můj obrázek je název rozsahu, který jste vytvořili v kroku 6) do řádku vzorců, viz screenshot:

9. Po zadání vzorce stiskněte vstoupit klíč a nyní, když vyberete jednu položku z rozevíracího seznamu, okamžitě se zobrazí její relativní obrázek. Viz snímek obrazovky:

Výše uvedená metoda může být pro většinu z nás obtížná, zde představím užitečnou funkci - Rozbalovací seznam obrázků of Kutools pro ExcelPomocí tohoto užitečného nástroje můžete vytvořit několik rozevíracích seznamů s jejich relativními obrázky pouhými několika kliknutími.

Po instalaci Kutools pro Excel, proveďte následující kroky:

1. Nejprve byste měli vytvořit dva sloupce, které obsahují názvy produktů a relativní obrázky v listu.

2. A pak klikněte Kutools > Rozbalovací seznam > Rozbalovací seznam obrázků, viz screenshot:

3. V Rozbalovací seznam obrázků dialogové okno, pokud jste vytvořili sloupce hodnot buněk a obrázků, prosím ignorujte krok 1, poté vyberte původní rozsah dat a obrázků a výstupní rozsah, viz screenshot:

4. A pak klikněte Ok tlačítko, do vybraných buněk byly vytvořeny rozevírací seznamy s obrázky a při výběru položky z rozevírací buňky se zobrazí její odpovídající obrázek najednou, viz níže ukázka:

Normálně můžete použít Uložit jako funkce pro uložení všech obrázků ze sešitu, proveďte toto:

1, klikněte Soubor > Uložit jako, V roce Uložit jako okno, určete složku, do které chcete exportované soubory umístit, a poté vyberte Webová stránka (*. Htm; *. Html) z Uložit jako rozevírací seznam typu, viz screenshot:

2. A pak klikněte na tlačítko Uložit Tlačítko, přejděte do konkrétní složky, uvidíte dva soubory, jeden je soubor formátu HTML a druhý je složka, která obsahuje obrázky, grafy nebo jiné objekty ze sešitu. Viz snímek obrazovky:

3. Poté můžete podle potřeby přetáhnout pouze obrázky do jiné složky.

Poznámka: Tímto použitím Uložit jako Díky této funkci získáte každý obrázek dvakrát, jeden je menší, druhý je větší, takže můžete ukládat obrázky s vyšším rozlišením, jak potřebujete.

Chcete-li uložit všechny obrázky ze souboru aplikace Excel, můžete také změnit příponu souboru na RAR. Udělejte prosím toto:

1. Změňte příponu souboru XLSX na rar jak je ukázáno níže:

2. Poté soubor rozbalte a ve složce uvidíte 3 složky a 1 soubor, viz screenshot:

3. Poté kliknutím otevřete xl složku a poté otevřete složku média složka, uvidíte, že všechny obrázky jsou zde uloženy bez duplikátů, viz screenshot:

Pokud máte Kutools pro Excel, S jeho Exportovat grafiku Pomocí této funkce můžete rychle exportovat některé konkrétní objekty, jako jsou obrázky, grafy, tvary, do obrazového formátu podle potřeby.

Po instalaci Kutools pro Excel, proveďte následující kroky:

1, klikněte Kutools Plus > Import Export > Exportovat grafiku, viz screenshot:

2. V Exportovat grafiku dialogové okno, proveďte následující operace:

• Vybrat Obrázky možnost z nabídky Typ nemovitosti rozbalovací seznam;
• Určete složku pro uložení exportovaných obrázků;
• Poté klikněte na rozevírací seznam z Formát exportu vyberte jeden formát obrázků.
• 

3. Konečně klikněte na tlačítko Ok Tlačítko, všechny obrázky v aktuálním sešitu byly uloženy do složky, kterou jste zadali, viz screenshot:

Chcete-li odstranit obrázky z aktuálního listu, níže uvedený kód VBA vám může pomoci, postupujte takto:

1. Aktivujte list obsahující obrázky, které chcete odstranit.

2. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

3, klikněte Vložit > Modula vložte následující makro do souboru Modul Okno.

Kód VBA: Odstraňte všechny obrázky z aktuálního listu

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

4. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a všechny obrázky v aktivním listu budou odstraněny najednou.

Pokud potřebujete odstranit obrázky pouze z řady buněk, může vám pomoci další jednoduchý kód.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující makro do souboru Modul Okno.

Kód VBA: Odstraňte obrázky z řady buněk

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

Poznámka: Ve výše uvedeném kódu, B4: C6 je rozsah, ze kterého chcete obrázky odstranit.

3. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a obrázky ve vybraném rozsahu budou odstraněny najednou, viz screenshoty:

Pokud máte Kutools pro Excel, S jeho Odstranit ilustrace a objekty Díky této funkci můžete rychle odstranit obrázky z listu, některých vybraných listů nebo celého sešitu.

Po instalaci Kutools pro Excel, proveďte následující kroky:

1, klikněte Kutools > Vymazat > Odstranit ilustrace a objekty, viz screenshot:

2. V otevřeném Odstranit ilustrace a objekty v dialogovém okně zaškrtněte Obrázky z Vymazat a poté zadejte rozsah, ze kterého chcete odstranit obrázky z pod Podívejte se do sekce, viz screenshot:

3. Pak klikněte na tlačítko Ok tlačítko a všechny obrázky budou odstraněny z listu, vybraných listů nebo celého sešitu, jak jste zadali.