online 1
gast (50)

/ Forum / Datenbanken

DatenbankenDatenbanken

Fragevon schnuffelhase vom 02.09.2019, 11:08 Options

Verknüpfte Bilder

Hallo zusammen,
ich habe eine Excel-Tabelle, die mit allerlei Maschinendaten gefüttert und gepflegt wird. Diese Tabelle wird per Verknüpfung in Access eingelesen und soll per Bericht als eine Art Datenblatt ausgegeben werden. Daneben gibt es einen Ordner, in dem es für die Maschinen zugehörige Bilder gibt, allerdings nicht für alle. Ich habe es bis jetzt noch nicht hinbekommen, dass, wenn zu einem Datensatz kein Bild vorhanden ist, eine Art Platzhalter (kein_bild.jpg) oder so angezeigt wird. Fehlt hier ein Bild, bleibt das letzte solange stehen, bis wieder eine Übereinstimmung gefunden wird. Wie kann ich diesen "Fehler" abfangen? Mein Code sieht so aus:

Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
    If Me![Bild_x] <> "" Then
        Me!Bild_x.Picture = Me!Pfad
      Else
        Me!Bild_x.Picture = "D:\kein_bild.jpg"
    End If
End Sub

Was ist falsch? Die Zeile If Me... mit Sicherheit, allerdings weiss ich nicht, wie ich die Abfrage gestalten soll.
Schreibe ich im Code nur:

Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
        Me!Bild_x.Picture = Me!Pfad
End Sub

kommt beim ersten fehlenden Bild die Fehlermeldung, dass das entsprechende Bild nicht geöffnet werden kann.

Danke schonmal im Voraus für die Hilfe!

Gruß
Mario


Antwort schreiben

Antwort 1 von Teddy7 vom 03.09.2019, 13:21 Options

Da kann es ja 2 Fehler geben: a) es ist kein "PFad" gespeichert und b) unter dem Pfad gibt es kein Bild

für a) kann man abfragen
if nz(Pfad,"") = "" then

nz macht aus einem Feld, das NULL ist das was hinter dem Komma steht

Gruß
Teddy

Antwort 2 von lleopard vom 04.09.2019, 12:49 Options

Hi Mario,

Warum hinterlegst du nicht grundsätzlich ein Bildchen, daß über dem Bild liegt?

ich meine du blendest das ein(.visible = true), wenn der Pfad für das Bild der Maschine nicht existiert, und blendest es im umgekehrten Fall wieder aus.

Gruß Leo

Ähnliche Themen

VBA: Eine Variable in einem String
Oli00  23.03.2007 - 92 Hits - 2 Antworten

verknüpfte dokument in der ansicht nicht gefunden
bhalli  06.07.2007 - 16 Hits -

Animierte Bilder
FlyDie  31.12.2007 - 157 Hits -

Bilder Anzeigen geht nicht!
IceBlue2  06.03.2008 - 217 Hits - 7 Antworten

Eigene Bilder
wiese  05.05.2008 - 89 Hits - 3 Antworten

Hinweis

Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..

Neue Einträge

Version: supportware 1.9.150 / 10.06.2022, Startzeit:Thu Jan 8 21:07:44 2026