Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
if then Problem
zurück: Schnelles Einlesen von großen Datenmengen weiter: Abbruch von DoCmd.SendObject mit Meldung abfangen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
miraG
Gast


Verfasst am:
09. Feb 2012, 10:23
Rufname:

if then Problem - if then Problem

Nach oben
       Version: Office 2003

Hallo liebes Forum,
ich habe ein Problem mit einer if-then Funktion und hoffe auf Eure Hilfe.
Folgendes soll passieren:

Code:

If x>29 then Call dokumentcontr and goto nr_end else goto RW_Loop


Es scheint mit dem "and" nicht zu funktionieren... Da dieses jedoch innerhalb
einer Schleife steht, muss ich die "Call dokumentcontr" zuerst ausführen und
kann dann erst mit goto weiterspringen, sonst lässt mich das Programm innerhalb
meiner Schleife nicht aussteigen...
Wenn ich nur
Code:

If x>29 then goto nr_end else goto RW_Loop

benutze bekomme ich den Ausstieg nicht, da die Kontrolle bei einem anderen
Programm liegt. Mit
Code:

If x>29 then Call dokumentcontr else goto RW_Loop

wird das andere Programm zwar unterbrochen, aber ich komme aus der Schleife nicht raus...
stpimi
Moderator Access


Verfasst am:
09. Feb 2012, 10:34
Rufname:
Wohnort: Graz


AW: if then Problem - AW: if then Problem

Nach oben
       Version: Office 2003

Servus!

Deine Codierung entspricht nicht nur nicht der Syntax, sondern ist auch sehr schwer lesbar und wartungsunfreundlich.

Schreib
Code:
If x>29 then
  Call dokumentcontr
  goto nr_end
else
  goto RW_Loop
End If


Wobei man GoTo eigentlich vermeiden sollte, wo es nur geht (Stichwort Spaghetticode).

_________________
Lg, Michael

Dein Feedback hilft auch anderen - vergiß es nicht!
miraG
Gast


Verfasst am:
09. Feb 2012, 11:24
Rufname:

AW: if then Problem - AW: if then Problem

Nach oben
       Version: Office 2003

Hallo,
klappt leider auch nicht, da die Kontrolle offensichtlich noch bei dem anderen Programm liegt... ich verwende die printjobs.dll
http://www.alice-dsl.net/ahmed.martens/Tools.html

kann man so eine Schleife auch umdrehen? so etwa, nur dass er dann den folgenden Code nicht mehr nimmt, sondern nach 5xMaus ist aus....
Code:

Do 
For x = 1 To 5
   DoEvents
   sleep 1000            '1 Sekunden warten
MsgBox "Hier kommt die Maus"    'als reaktionstest :-)
Next x
    If x > 4 Then
        GoTo nr_end
        Else
        GoTo RW-Loop
       End If
Loop While i > 0
i= myDruckjobs.Dokument..... ' hier wird dann erst i wieder geprüft...

Dann läuft er jedoch nur durch die For Schleife und geht dann zum Ende
MissPh!
Office-VBA-Programmiererin


Verfasst am:
09. Feb 2012, 11:52
Rufname:
Wohnort: NRW


AW: if then Problem - AW: if then Problem

Nach oben
       Version: Office 2003

Hallo,
Code:
    If x > 4 Then
        GoTo nr_end
der nachfolgende Code wird nie erreicht, weil x an der Stelle immer > 4 ist.

Versuche doch noch einmal genauer zu beschreiben, was du mit dem Code erreichen willst. Und was hat es auf sich mit den GoTo's?
Oder zeige die komplette Prozedur, damit man sich ein genaueres Bild vom Ablauf machen kann.

_________________
Gruß MissPh!
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
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 Programmierung / VBA: Access Bericht if then else 2 Crizzy 99 15. Jan 2014, 16:45
Crizzy Access Bericht if then else
Keine neuen Beiträge Access Programmierung / VBA: Problem mit If - then 6 sualkin 97 04. Jul 2013, 09:24
Marmeladenglas Problem mit If - then
Keine neuen Beiträge Access Programmierung / VBA: Recordset.Clone: If rs.NoMatch then neuen Datensatz anlegen 2 Starfire2009 296 31. Okt 2012, 10:38
Starfire2009 Recordset.Clone: If rs.NoMatch then neuen Datensatz anlegen
Keine neuen Beiträge Access Formulare: if Bildpfad nicht gefunden, then... 3 taupe 300 12. März 2012, 16:10
taupe if Bildpfad nicht gefunden, then...
Keine neuen Beiträge Access Tabellen & Abfragen: IF THEN mit mehreren Optionen 5 Gast 188 08. Nov 2011, 18:19
KlausMz IF THEN mit mehreren Optionen
Keine neuen Beiträge Access Programmierung / VBA: IF (Button AND 2) > 0 THEN ... 8 JoeM 503 01. März 2011, 16:59
Gast IF (Button AND 2) > 0 THEN ...
Keine neuen Beiträge Access Programmierung / VBA: Nach If...Then... 2 befehle ausführen 12 informatiknewbie 1698 26. Nov 2010, 10:32
Gallo24 Nach If...Then... 2 befehle ausführen
Keine neuen Beiträge Access Programmierung / VBA: If Dateityp = zip Then - Problem 4 Gast 485 24. Aug 2010, 11:05
Gast If Dateityp = zip Then - Problem
Keine neuen Beiträge Access Formulare: Access If - Then - End If Block 4 Jose999 1820 14. Mai 2010, 13:22
Gast Access If - Then - End If Block
Keine neuen Beiträge Access Programmierung / VBA: If -> Else -> Then -> verzweiflen 12 Masterkey 695 04. März 2010, 14:33
MissPh! If  -> Else -> Then -> verzweiflen
Keine neuen Beiträge Access Programmierung / VBA: Recordset: If aktuelles Fields(0) = nächstem Fields(0) then 1 Roliviech 680 28. Okt 2009, 09:37
Marmeladenglas Recordset: If aktuelles Fields(0) = nächstem Fields(0) then
Keine neuen Beiträge Access Tabellen & Abfragen: IF - Then in einer Abfrage 5 liteman 375 21. Aug 2009, 19:43
derArb IF - Then in einer Abfrage
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP JavaScript