Zorg er voor dat je in de map met scans een afbeelding hebt die GeenAfbeelding.jpg heet.
vb zoals
deze download zo"n afbeelding en noem deze
GeenAfbeeling.jpgBij aanwijzen van de pagina pas je je code aan zoals hier onder:
Private Sub Form_Current()
On Error GoTo GeenAfbeelding
Dim FileLocation As String
'Vind de locatie van Mijn Documenten
'Deze functie vind je in Module1
FileLocation = MijnDocumenten & "\Scans Beleggingen\" & Scan
ScanAfbeelding.Picture = FileLocation
Exit Sub
GeenAfbeelding:
FileLocation = MijnDocumenten & "\Scans Beleggingen\GeenAfbeelding.jpg"
ScanAfbeelding.Picture = FileLocation
End Sub
Rapport per belegging is me ook gelukt btw
dankzij je filmpje. Maak van het veld waar je het volledige pad opslaat een
berekend veld. Niet omdat het moet maar omdat het kan.
JE ZAL DIT WAT MOETEN AANPASSEN zodat het verwijst naar de map met JOUW afbeeldingen
Dat is data dat niet wordt opgeslagen en als je vroeg of laat beslist om de locatie van de scans te wijzigen hoef je enkel DAT veld aan te passen.