Kombinere msgbox fejlmeddelese med feltværdi
HejJeg har en base med link til billeder. Hvis billede ikke kan åbnes fås en fejlkode . Den vil jeg gerne forsyne med billednavnet på det jeg forsøger at åbne.
p.t ser koden sådan ud:
Private Sub Detaljesektion_Format(Cancel As Integer, FormatCount As Integer)
Kilde = "\\Njord\filedata\Journal\HRD\Arbejdsmappe- lukket\Medarbejderdata\Personalegalleri\" & Me!Billednavn & ".jpg"
On Error GoTo ProcErr
If Not IsNull(Billednavn) Then
Me!Billedramme.Visible = True
Me!Billedramme.Picture = Kilde
Else
Me!Billedramme.Visible = False
Me!Billedramme.Picture = ""
End If
ProcErr:
If Err.Number = 2220 Then MsgBox "intet billede"
Hvordan gør jeg det?