Aktivér Udvikler-fanen i Excel:
- Gå til
Filer
> Indstillinger
> Tilpas båndet
. - Marker
Udvikler
i højre kolonne og klik på OK
.
Indsæt et billede ved hjælp af VBA:
- Gå til
Udvikler
-fanen, og klik på Visual Basic
. - Indsæt en ny modul ved at klikke på
Indsæt
> Modul
. - Kopier og indsæt følgende VBA-kode i modulen:
vba
< ="flex gap-1 items-center">http://www.w3.org/2000/svg" width="24" height="24" fill="none" viewBox="0 0 24 24" class="icon-sm">Kopier kode Sub InsertPicture()
Dim picPath As String
picPath = Application.GetOpenFilename("Billedfiler (*.jpg; *.jpeg; *.gif; *.png), *.jpg; *.jpeg; *.gif; *.png", , "Vælg et billede")
If picPath = "Falsk" Then Exit Sub
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1") ' Ændr til det relevante ark
Dim pic As Picture
Set pic = ws.Pictures.Insert(picPath)
' Indstil billedets placering og størrelse, hvis nødvendigt
pic.Left = ws.Cells(1, 1).Left
pic.Top = ws.Cells(1, 1).Top
pic.Width = 100
pic.Height = 100
End Sub
- Kør makroen:
- Luk VBA editoren.
- Tilbage i Excel, tilføj en knap ved at gå til
Udvikler
> Indsæt
> Form Controls
> Knap (Form Control)
. - Tegn knappen på arket, og vælg
InsertPicture
-makroen, når du bliver spurgt om at tildele en makro.
Når du klikker på knappen, vil du blive bedt om at vælge en billedfil, og billedet vil blive indsat i det valgte ark på den specificerede placering og størrelse.
Dette vil give dig en simpel måde at indsætte billeder i Excel ved hjælp af en knap. Hvis du har brug for at indsætte billeder på andre måder, kan koden tilpasses efter behov.