Thema Datum  Von Nutzer Rating
Antwort
29.11.2011 09:28:45 Sino
Solved
29.11.2011 10:05:18 Till
NotSolved
29.11.2011 11:04:24 Gast27334
NotSolved
29.11.2011 14:42:38 Sino
NotSolved
29.11.2011 19:23:08 Dekor
NotSolved
29.11.2011 20:31:10 Till
NotSolved
29.11.2011 20:36:47 Till
NotSolved
30.11.2011 08:54:39 Sino
NotSolved
30.11.2011 11:14:15 Till
NotSolved
30.11.2011 11:27:20 Sino
NotSolved
30.11.2011 11:57:22 Till
NotSolved
30.11.2011 13:02:36 Gast71196
NotSolved
30.11.2011 13:11:03 Sino
NotSolved
30.11.2011 18:17:17 Till
NotSolved
01.12.2011 09:18:42 Sino
NotSolved
01.12.2011 15:46:01 Sino
NotSolved
01.12.2011 16:02:20 TIll
NotSolved
01.12.2011 16:31:38 Sino
NotSolved
Rot Problem innerhalb einer Schleife
02.12.2011 09:13:20 Sino
NotSolved
02.12.2011 16:57:31 Till
NotSolved
02.12.2011 17:03:54 Till
NotSolved

Ansicht des Beitrags:
Von:
Sino
Datum:
02.12.2011 09:13:20
Views:
1119
Rating: Antwort:
  Ja
Thema:
Problem innerhalb einer Schleife

 Hallo Till,

kleine Codeanpassung:

        For y = 3 To lngZeilen
            'Bedingungen
                With gesamt
                    V1 = .Cells(y, 11)
                    V2 = .Cells(y, 4).Value
                    V3 = .Cells(y, 3).Value
                End With
                
              'L9.3 + Fremd + DOPPEL* oder STOR*
               If Not V3 Like "L9.5" And Not V3 Like "L9.6" And V2 Like "FREMD*" And (V1 Like "STOR*" Or V1 Like "DOPPEL*") Then
                                    
              'Alle L9.5 + L9.6 raus
               If V3 Like "L9.5" And V3 Like "L9.6" Then
                                  
              'Alle in Spalte FahrzeugID ungleich W* raus
               If V1 <> "W*" Then

               'Alle ROTES* und TANK* raus
                If V2 Like "ROTES*" _
                Or V2 Like "TANKK*" Then
                
                gesamt.Rows(y).Copy unbetrachtet.Rows(x)
                x = x + 1

                End If
                End If
                End If
                End If
                
                
                
        Next y

 

 

 

Ich verstehe einfach nicht warum nur der erste IF-BLOCK ausgeführt/beachtet wird???!?!

 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
29.11.2011 09:28:45 Sino
Solved
29.11.2011 10:05:18 Till
NotSolved
29.11.2011 11:04:24 Gast27334
NotSolved
29.11.2011 14:42:38 Sino
NotSolved
29.11.2011 19:23:08 Dekor
NotSolved
29.11.2011 20:31:10 Till
NotSolved
29.11.2011 20:36:47 Till
NotSolved
30.11.2011 08:54:39 Sino
NotSolved
30.11.2011 11:14:15 Till
NotSolved
30.11.2011 11:27:20 Sino
NotSolved
30.11.2011 11:57:22 Till
NotSolved
30.11.2011 13:02:36 Gast71196
NotSolved
30.11.2011 13:11:03 Sino
NotSolved
30.11.2011 18:17:17 Till
NotSolved
01.12.2011 09:18:42 Sino
NotSolved
01.12.2011 15:46:01 Sino
NotSolved
01.12.2011 16:02:20 TIll
NotSolved
01.12.2011 16:31:38 Sino
NotSolved
Rot Problem innerhalb einer Schleife
02.12.2011 09:13:20 Sino
NotSolved
02.12.2011 16:57:31 Till
NotSolved
02.12.2011 17:03:54 Till
NotSolved