Cuestión : ¿Por qué este código necesita reanudar?

He atado un pedazo de código que trabaja, especialmente pues camino él con su secuencia.  Sin embargo, cuando presiono para funcionar con el botón, continuará trabajando para algunas más líneas, después para.  Una vez que la comienzo manualmente, el código continuará trabajando para algunas más líneas en sus los propios.  Es confuso en cuanto a porqué apenas parará.  Sí, el With Sheets podría ser combinado, pero su atrasado y yo acaban de dejarlo como es.  ¿Sin embargo, no pensaría que que causaría el misfire.

Would cualquier persona tener una respuesta?

Cook class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
>Option notpretty " del class= " del id= " codeSnippet784385 del
class= del

Respuesta : ¿Por qué este código necesita reanudar?

Oops I faltó el claro error - ver abajo:

Si está ido (. Células (i, 11), 11) = “115528” entonces. Rema (i) .EntireRow.Delete
Si está ido (. Células (i, 11), 11) = “124957” entonces. Rema (i) .EntireRow.Delete

debe haber sido:

Si está ido (. Células (i, 11), 6) = “115528” entonces. Rema (i) .EntireRow.Delete
Si está ido (. Células (i, 11), 6) = “124957” entonces. Rema (i) .EntireRow.Delete
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

DelUnNeeded secundario ()
FinalRow dévil tan de largo, i como de largo, lPos como de largo

Con las hojas (“PIDs”)
    FinalRow =. Células (. Rows.Count, “H”). Extremo (xlUp). Fila
    Para i = lastrow 4 al paso -1
        Si UCase (. Células (i, 8)) = “POSICIÓN VACANTE” entonces. Rema (i) .EntireRow.Delete
        Si está ido (. Células (i, 11), 6) = “115528” entonces. Rema (i) .EntireRow.Delete
        Si está ido (. Células (i, 11), 6) = “124957” entonces. Rema (i) .EntireRow.Delete
    Después i
Extremo con

Submarino del extremo
Otras soluciones  
 
programming4us programming4us