Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Anlage aus variablem Verzeichnis?
Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6
zurück: Datensatznummer gleichschalten in mehrere formularen weiter: Formular in der Datanblattansicht öffnen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
MissPh!
Office-VBA-Programmiererin


Verfasst am:
27. Jul 2009, 11:27
Rufname:
Wohnort: NRW

Re: AW: Anlage aus variablem Verzeichnis? - Re: AW: Anlage aus variablem Verzeichnis?

Nach oben
       Version: Office 2007

Du bist doch immer wieder für eine Überraschung gut... Rolling Eyes
Kann es sein, dass du keine Ahnung hast, was der Code tut, denn du das einsetzt?
MattAccess - 27. Jul 2009, 11:07 hat folgendes geschrieben:
Private Sub Befehl626_Click()
Bildindex = Bildindex + 1
Me!BildObjekt.Picture = pfad & strListe(Bildindex)

If Bildindex < UBound(strListe) Then
Bildindex = Bildindex + 1
Me!BildObjekt.Picture = pfad & strListe(Bildindex)
Else
MsgBox "Ende erreicht!"
End If

End Sub
Die blauen Zeilen sollten natürlich die roten ersetzen, was dachtest du?!
_________________
Gruß MissPh!
MattAccess
Learning by Doing :-D


Verfasst am:
27. Jul 2009, 11:32
Rufname:
Wohnort: Ingolstadt


AW: Anlage aus variablem Verzeichnis? - AW: Anlage aus variablem Verzeichnis?

Nach oben
       Version: Office 2007

Naja, ich dachte wohl nicht ganz soweit,
für mein Verständnis war das so gedacht, dass der Index +1 gesetzt wird,
und ich danach dann die If-Bedingungen abfrage.
Sowas funktioniert in der Form zumindest bei meiner eigentlichen Programmiertätigkeit, aber in VBA anscheinend nicht Rolling Eyes

Aber bei meinem "Bild zurück" Button sollte meinem Verständnis nach alles passen, fuktioniert auch, aber die Meldung kommt beim ersten (letzten)Bild nicht:
Code:
Private Sub Befehl625_Click()
    If Bildindex > LBound(strListe) Then
        Bildindex = Bildindex - 1
        Me!BildObjekt.Picture = pfad & strListe(Bildindex)
      Else
        MsgBox "Anfang erreicht!"
    End If
End Sub
MissPh!
Office-VBA-Programmiererin


Verfasst am:
27. Jul 2009, 12:44
Rufname:
Wohnort: NRW

AW: Anlage aus variablem Verzeichnis? - AW: Anlage aus variablem Verzeichnis?

Nach oben
       Version: Office 2007

MattAccess - 27. Jul 2009, 11:32 hat folgendes geschrieben:
für mein Verständnis war das so gedacht, dass der Index +1 gesetzt wird,
und ich danach dann die If-Bedingungen abfrage.
Sowas funktioniert in der Form zumindest bei meiner eigentlichen Programmiertätigkeit, aber in VBA anscheinend nicht Rolling Eyes
Wenn du mal genau hinschaust, wird dort zweimal addiert und das kann ja wohl nicht gut gehen - egal in welcher Programmiersprache!

In meinem letzten Lösungsvorschlag steht LBound = 0 für einen Leereintrag, die eigentliche Zählung
beginnt bei 1, deshalb musst du hier mit 1 und nicht mit LBound vergleichen.

_________________
Gruß MissPh!
MattAccess
Learning by Doing :-D


Verfasst am:
27. Jul 2009, 13:36
Rufname:
Wohnort: Ingolstadt


AW: Anlage aus variablem Verzeichnis? - AW: Anlage aus variablem Verzeichnis?

Nach oben
       Version: Office 2007

Code:
Private Sub Befehl625_Click()
    Bildindex = Bildindex - 1
    If Bildindex > LBound(strListe) Then
        Me!BildObjekt.Picture = pfad & strListe(Bildindex)
      Else
        MsgBox "Anfang erreicht!", vbOKOnly, "Hinweis"
        Bildindex = 1
    End If
End Sub
So funktionierts bei mir jetzt, hab nur die Reihenfolge vertauscht und zähle vorm Vergleich.
Oder ist hier VBA-technisch etwas einzuwenden?

Ansonsten sag ich nämlich an dieser Stelle vielen herzlichen Dank für deine/eure Hilfe und vor allem für die Geduld Smile

Grüße,
Matt
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite Zurück  1, 2, 3, 4, 5, 6
Diese Seite Freunden empfehlen

Seite 6 von 6
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Formulare: Anlage per VBA hinzufügen 8 jerryre89 1312 14. Apr 2012, 20:21
jerryre89 Anlage per VBA hinzufügen
Keine neuen Beiträge Access Tabellen & Abfragen: Feld Anlage in bestehender Datenbank erstellen 4 Ogni 295 09. Nov 2010, 10:40
Ogni Feld Anlage in bestehender Datenbank erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragen mit variablem Namen vergleichen 1 Chris123456 185 18. Aug 2010, 19:28
Gast Abfragen mit variablem Namen vergleichen
Keine neuen Beiträge Access Tabellen & Abfragen: Dateien und Ordner aus Verzeichnis auslesen und Tabellieren 0 binichnich 993 17. Jun 2010, 15:05
binichnich Dateien und Ordner aus Verzeichnis auslesen und Tabellieren
Keine neuen Beiträge Access Berichte: Bericht mit variablem Inhalt? 1 blue_think 302 18. März 2010, 09:20
tooones Bericht mit variablem Inhalt?
Keine neuen Beiträge Access Formulare: Anlage mdb wird geblockt - Access 2007 0 GeorgK 598 21. Sep 2009, 12:37
GeorgK Anlage mdb wird geblockt - Access 2007
Keine neuen Beiträge Access Programmierung / VBA: Acc2007 - Anlage in Datenbank einfügen 5 Berliner 898 26. Nov 2008, 05:47
Willi Wipp Acc2007 - Anlage in Datenbank einfügen
Keine neuen Beiträge Access Programmierung / VBA: Daten in Tabelle für ein Verzeichnis möglich? 2 Markos 398 24. Nov 2008, 09:50
Markos Daten in Tabelle für ein Verzeichnis möglich?
Keine neuen Beiträge Access Programmierung / VBA: Verzeichnis Serienbrief aus Access 0 Gast 382 29. Apr 2008, 21:03
Gast Verzeichnis Serienbrief aus Access
Keine neuen Beiträge Access Programmierung / VBA: Verzeichnis ermitteln / Pfad aufschlüsseln 2 metalbeetle 3931 23. Jan 2008, 21:17
metalbeetle Verzeichnis ermitteln / Pfad aufschlüsseln
Keine neuen Beiträge Access Programmierung / VBA: Tabelle in bestimtes Verzeichnis speichern 8 isegrim67 485 31. Aug 2007, 10:57
isegrim67 Tabelle in bestimtes Verzeichnis speichern
Keine neuen Beiträge Access Programmierung / VBA: aktuelles Verzeichnis der DB 2 redqueen 2824 16. Nov 2006, 07:58
redqueen aktuelles Verzeichnis der DB
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme