Hej hej
Antar att du vet hur man lägger in kod, samt hur man triggar den :). Så, nedan kod behöver modifieras för att passa dina ändamål.

Mvh Christian

Option Explicit

Sub Insert_signature()

Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("BladetsNamnDärSignaturenSkaPlaceras")
' Exempel: Dim ws As Worksheet: Set ws = ThisWorkbook.Sheets("Signatur")
Dim PicPath As String: PicPath = ThisWorkbook.Sheets("Namn På Bladet Där LetaRadFunktionen Till BildSignaturens Sökväg Finns").Range("CellenReferensTillDärDinLetaradFunktionFinns")
'Exempel: Dim PicPath As String: PicPath = ThisWorkbook.Sheets("Path").Range("A1")



With ws.Pictures.Insert(PicPath)
With .ShapeRange
.LockAspectRatio = msoTrue
'Bredd och storlek på din bild, testa dig fram till vad som passar,
.Width = 150
.Height = 200
End With
'Bestämmer vänster/top placering för bilden, i detta fall 5 rader, 10 kolumner.
.Left = ws.Cells(5, 10).Left
.Top = ws.Cells(5, 10).Top
.Placement = 1
.PrintObject = True
End With
End Sub