Pergunta : Por que este código precisa de recarregar?

Eu uni uma parte de código que trabalha, especialmente porque eu piso ele com sua seqüência.  Entretanto, quando eu pressiono para funcionar a tecla, continuará a trabalhar para algumas mais linhas, a seguir para.  Uma vez que eu a começo manualmente, o código continuará a trabalhar para algumas mais linhas no seus próprios.  É desconcertante a respeito de porque apenas parará.  Sim, o With Sheets poderia ser combinado, mas seus atrasado e eu apenas deixamo-lo como é.  Entretanto, eu não pensaria que que causaria o misfire.

Would qualquer um ter uma resposta?

Cook class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do 
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 " do class= " do id= " codeSnippet784385 do
class= do

Resposta : Por que este código precisa de recarregar?

Oops I faltou o erro óbvio - ver abaixo:

Se saido (. Pilhas (i, 11), 11) = “115528” então. Fileiras (i).EntireRow.Delete
Se saido (. Pilhas (i, 11), 11) = “124957” então. Fileiras (i).EntireRow.Delete

deve ter sido:

Se saido (. Pilhas (i, 11), 6) = “115528” então. Fileiras (i).EntireRow.Delete
Se saido (. Pilhas (i, 11), 6) = “124957” então. Fileiras (i).EntireRow.Delete
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

DelUnNeeded secundário ()
FinalRow não ofuscante tão por muito tempo, i quanto por muito tempo, lPos como por muito tempo

Com folhas (“PIDs”)
    FinalRow =. Pilhas (. Rows.Count, “H”). Extremidade (xlUp). Fileira
    Para i = lastrow 4 a etapa -1
        Se UCase (. Pilhas (i, 8)) = “POSIÇÃO VAGA” então. Fileiras (i).EntireRow.Delete
        Se saido (. Pilhas (i, 11), 6) = “115528” então. Fileiras (i).EntireRow.Delete
        Se saido (. Pilhas (i, 11), 6) = “124957” então. Fileiras (i).EntireRow.Delete
    Em seguida i
Extremidade com

Submarino da extremidade
Outras soluções  
 
programming4us programming4us