Hoe zet u afbeeldings-URL’s om naar daadwerkelijke afbeeldingen in Excel?
In Excel kunt u situaties tegenkomen waarin u een lijst met afbeeldings-URL’s hebt en de werkelijke afbeeldingen direct in de cellen wilt weergeven in plaats van alleen de koppelingen. Deze handleiding leidt u stap voor stap door drie methoden om afbeeldings-URL’s om te zetten naar daadwerkelijke afbeeldingen in Excel.
Zet de afbeeldings-URL’s om naar werkelijke afbeeldingen in Excel
Zet de afbeeldings-URL’s om naar werkelijke afbeeldingen met VBA-code
Deze methode is perfect voor gebruikers met oudere versies van Excel die de AFBEELDING-functie niet ondersteunen. Met VBA automatiseert u het ophalen en invoegen van afbeeldingen vanaf URL’s.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en plak de volgende code in het modulevenster.
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- In de bovenstaande code is A2:A5 het celbereik met de URL’s van de afbeeldingen die u wilt ophalen; pas de celverwijzingen aan naar uw eigen situatie.
- Met deze code kunt u de grootte van de opgehaalde afbeeldingen helaas niet aanpassen.
- De bovenstaande code plaatst de werkelijke afbeeldingen uitsluitend in de cellen direct naast uw URL-kolom; u kunt niet zelf kiezen in welke cel de afbeeldingen verschijnen.
- U dient basiskennis van code te hebben: ontbreekt er ook maar één teken of is er iets foutief, dan wordt de code niet succesvol uitgevoerd.
- Gebruik dit spaarzaam bij grote datasets om prestatieproblemen te voorkomen.
3. Druk vervolgens op de toets F5 om deze code uit te voeren. Alle bijbehorende afbeeldingen worden dan tegelijkertijd opgehaald uit de afbeeldings-URL’s en gecentreerd in de desbetreffende cellen van de aangrenzende kolom geplaatst. Zie onderstaande schermafbeelding:
Zet de afbeeldings-URL’s om naar werkelijke afbeeldingen met Kutools voor Excel
Als u liever geen VBA-code gebruikt of op zoek bent naar een snellere, gebruiksvriendelijkere oplossing, biedt Kutools voor Excel de krachtige functie „Afbeeldingen invoegen vanaf pad (URL)”. Met deze tool voegt u moeiteloos afbeeldingen rechtstreeks in uw werkblad in—vanaf online afbeeldings-URL’s of lokale bestandspaden—zonder ook maar één regel code te schrijven. Ideaal voor wie snel en betrouwbaar meerdere afbeeldingen tegelijk wil importeren en spreadsheets visueel wil opwaarderen met slechts enkele klikken.
1. Ga naar Kutools > Invoegen > Afbeeldingen invoegen vanaf pad (URL).
2. Configureer in het verschijnende dialoogvenster de instellingen zoals weergegeven in de schermafbeeldingen:
3. Klik op OK en de afbeeldingen worden automatisch uit de URL’s gehaald. Zie de schermafbeelding hieronder:
Zet de afbeeldings-URL’s om naar werkelijke afbeeldingen met de AFBEELDING-functie (Excel 365)
Als u Excel 365 of Excel voor het web gebruikt, beschikt u over de AFBEELDING()-functie: een eenvoudige én krachtige manier om afbeeldingen direct vanaf URL’s in cellen weer te geven.
Syntaxis van de AFBEELDING-functie:
=IMAGE(source, [alt_text], [sizing], [height], [width])- bron: URL van de afbeelding (moet HTTPS zijn vanwege beveiliging)
- alt_tekst: Alternatieve tekstbeschrijving
- Grootteaanpassing: 0 tot 3 voor opties om afbeeldingen passend te maken. 0 (past in cel), 1 (originele grootte), 2 (aangepaste grootte), 3 (behoudt aspectverhouding)
- hoogte,breedte: Alleen vereist wanneer grootteaanpassing is ingesteld op 2
Voer de volgende formule in een lege cel in op de plek waar u de afbeelding wilt weergeven, en kopieer deze vervolgens naar andere cellen. Alle afbeeldingen worden opgehaald uit relatieve URL’s. Zie de schermafbeelding hieronder:
=IMAGE(A2)
- Alleen beschikbaar in Excel 365 en Excel 2021
- Vereist HTTPS-URL’s
- Beperkte ondersteuning van afbeeldingsformaten (JPEG, PNG, GIF, BMP)
Alle drie de methoden leveren professionele resultaten op wanneer ze correct worden toegepast. Voor moderne Excel-gebruikers is de AFBEELDING()-functie de eenvoudigste en netste oplossing. Gebruikt u een oudere versie of hebt u batchverwerking nodig? Dan zijn VBA en Kutools uitstekende alternatieven. Wilt u nog meer Excel-tips en -trucs ontdekken?Onze website biedt duizenden tutorials om u te helpen Excel onder de knie te krijgen.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins