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" rel="nofollow - 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.
|