Jak převést adresy URL obrázků na skutečné obrázky v aplikaci Excel?

V Excelu můžete narazit na situace, kdy máte seznam adres URL obrázků a chcete v buňkách zobrazit skutečné obrázky namísto pouze odkazů. Tato příručka vás provede třemi způsoby převodu adres URL obrázků na skutečné obrázky v aplikaci Excel.

Převeďte adresy URL obrázků na skutečné obrázky v aplikaci Excel

• Pomocí kódu VBA
• Pomocí Kutools for Excel
• Pomocí funkce IMAGE (Excel 365)

Převeďte adresy URL obrázků na skutečné obrázky pomocí kódu VBA

Tato metoda je ideální pro uživatele starších verzí aplikace Excel, které nepodporují funkci IMAGE. VBA vám umožňuje automatizovat proces načítání a vkládání obrázků z adres URL.

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

2, klikněte Vložit > Modula vložte následující kód do okna modulu.

Sub URLPictureInsert()
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

3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a všechny odpovídající obrázky byly extrahovány z adres URL obrázků do sousedního sloupce najednou a obrázky budou umístěny do středu vašich konkrétních buněk, viz screenshot:

Převeďte adresy URL obrázků na skutečné obrázky pomocí Kutools for Excel

Pokud si nejste jisti prací s kódem VBA nebo chcete rychlejší a uživatelsky přívětivější řešení, Kutools for Excel nabízí výkonnou funkci s názvem „Vložit obrázky z cesty (URL)“. Tento nástroj umožňuje snadno vkládat obrázky přímo do listu z online adres URL obrázků nebo z cest k lokálním souborům – bez nutnosti napsat jediný řádek kódu. Je ideální pro uživatele, kteří potřebují rychlý a spolehlivý způsob dávkového importu obrázků a vizuálního vylepšení tabulek jen několika kliknutími.

1. Jít do Kutools > Vložit > Vložit obrázky z cesty (URL).

2. V zobrazeném dialogovém okně nakonfigurujte následující nastavení, jak je znázorněno na snímcích obrazovky:

3. Klikněte na OK a obrázky budou extrahovány z adres URL, viz snímek obrazovky:

TipPokud v dialogovém okně zaškrtnete možnost Přidat původní obrázek jako komentář, Kutools automaticky vloží obrázek také jako komentář k buňce, což vám umožní zobrazit náhled původního obrázku při najetí myší na buňku – aniž byste jej museli zobrazovat přímo v listu. To je obzvláště užitečné pro udržení přehlednosti a lehkosti tabulky a zároveň pro zachování přístupu k obrázkům v plné velikosti na vyžádání.

Převeďte adresy URL obrázků na skutečné obrázky pomocí funkce IMAGE (Excel 365)

Pokud používáte Excel 365 nebo Excel pro web, máte přístup k funkci IMAGE() – jednoduchý a výkonný způsob, jak zobrazovat obrázky přímo z adres URL v buňkách.

Syntaxe funkce IMAGE:

=IMAGE(source, [alt_text], [sizing], [height], [width])

• zdroj: URL obrázku (z bezpečnostních důvodů musí být HTTPS)
• alt_text: Alternativní textový popis
• dimenzování: 0 až 3 pro možnosti přizpůsobení obrazu. 0 (přizpůsobit buňku), 1 (původní velikost), 2 (vlastní velikost), 3 (zachovat poměr stran)
• výška, šířka: Potřebné pouze při nastavení velikosti na 2

Do prázdné buňky, kde chcete zobrazit obrázek, zadejte následující vzorec. Potom vzorec zkopírujte do ostatních buněk. Všechny obrázky jsou extrahovány z relativních adres URL. Viz snímek obrazovky:

=IMAGE(A2)

Všechny tři metody mohou při správné implementaci přinést profesionální výsledky. Pro moderní uživatele Excelu je funkce IMAGE() nejjednodušším a nejčistším řešením. Pokud používáte starší verze nebo potřebujete dávkové zpracování, VBA nebo Kutools jsou vynikající alternativy. Pokud máte zájem prozkoumat další tipy a triky pro Excel, náš web nabízí tisíce výukových programů, které vám pomohou zvládnout Excel.