Thema Datum  Von Nutzer Rating
Antwort
24.12.2018 11:43:58 Robin
NotSolved
Blau If Boolean true wird ignoriert
24.12.2018 12:05:36 Crazy Tom
NotSolved
25.12.2018 17:10:26 Gast81301
NotSolved
25.12.2018 18:00:35 Gast70117
NotSolved
25.12.2018 17:47:14 Mackie
Solved
25.12.2018 17:58:04 Gast80697
NotSolved

Ansicht des Beitrags:
Von:
Crazy Tom		 Datum:
24.12.2018 12:05:36		 Views:
449		 Rating:
     
Antwort:
  Ja
Thema:
If Boolean true wird ignoriert

moin

ich würde mal denken dass das Ende deiner For-Each- Schleife immer ein false liefert

demnach würde die MsgBox in den ersten Teil deiner If CStr... gehören

und dein Else gehört ins Else

dann kannste dir auch die blnFound sparen

 

könnte dann ungetestet so aussehen

 

For Each zeLL In rngXX.Cells
 
    If CStr(zeLL.Value) = strSN Then
        zeLL.Interior.ColorIndex = 6
        MsgBox "Serienummer bereits vorhanden"
    Else
        zeLL.Interior.ColorIndex = xlColorIndexNone
        intEnd = Cells(Rows.Count, 1).End(xlUp).Row + 1
        Cells(intEnd, 1).Value = strSN
        Cells(intEnd, 2).Value = strN
    End If
Next zeLL

 

MfG Tom

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
24.12.2018 11:43:58 Robin
NotSolved
Blau If Boolean true wird ignoriert
24.12.2018 12:05:36 Crazy Tom
NotSolved
25.12.2018 17:10:26 Gast81301
NotSolved
25.12.2018 18:00:35 Gast70117
NotSolved
25.12.2018 17:47:14 Mackie
Solved
25.12.2018 17:58:04 Gast80697
NotSolved