Überlauffehler 6 Excel VBA

Question

Ich verwende einen Zähler, um die wahren/falschen Bedingungen in einem Bereich zu verfolgen, wobei der Wert dieses Zählers verwendet wird, um weitere Aktionen zu bestimmen. Allerdings bekomme ich einen Überlauffehler, selbst wenn ein kleiner (15 Zeilen) Datensatz gelesen wird. Hier ist der Code:

Dim b As Double  'Exceptions Sheet 
Dim u As Integer 'Unhandled exception counter 

b = 2 

Sheets("Exceptions").Activate 

Do While Sheets("Exceptions").Cells(b, 2).Value <> "" 
    If Sheets("Exceptions").Cells(b, 14).Value <> "A" Then 
     u = u + 1 
    End If 
Loop 
    b = b + 1 

~ Dank ~

Answer 1

Sie sind nicht den Wert von b in der Schleife zu ändern, so dass es hält nur u erhöht wird, bis es überläuft