Supportnet / Forum / Datenbanken

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: [code] 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 [/code] Was ist falsch? Die Zeile If Me... mit Sicherheit, allerdings weiss ich nicht, wie ich die Abfrage gestalten soll. Schreibe ich im Code nur: [code] Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer) Me!Bild_x.Picture = Me!Pfad End Sub [/code] 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

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

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

• VBA: Eine Variable in einem String
• verknüpfte dokument in der ansicht nicht gefunden
• Animierte Bilder
• Bilder Anzeigen geht nicht!
• Eigene Bilder