VBA: Jak długo działa opcja On Error Resume Next?

Question

Przeczytałem, jak używać On Error Resume Next i staram się dowiedzieć, jak długo ta linia będzie miała zastosowanie do programu. Na stronie Microsoftu znalazłem to zdanie: "An On Error Resume Następna instrukcja staje się nieaktywna po wywołaniu innej procedury." Co to dokładnie oznacza? Co uważa się za procedurę?

Pytam, ponieważ używam wiersza w moim programie, ale nie chcę, aby to było Resume Next wszystkie błędy środowiska wykonawczego, które występują, po prostu oczywiste w następnym wierszu.

---

Kod: Dim zRange jako zakres

Call FilterTableFor(fieldNameColumn, Array("baseunitprice", "burden", "MTLBURRATE", "PurPoint", "Vendornum")) 

On Error Resume Next 
Set zRange = commentsColumnRange.SpecialCells(xlCellTypeVisible) 
zRange.Formula = "target" 

Call FilterTableFor(fieldNameColumn) 

---

Ja również znaleźć (i znane na chwilę), że On Error lub GoTo linie są uważane ubogich kodowania. Czy istnieje linia Try-Catch, której mogę użyć do takiej linii?

myślę tak:

Dim zRange As Range 

Call FilterTableFor(fieldNameColumn, Array("baseunitprice", "burden", "MTLBURRATE", "PurPoint", "Vendornum")) 

Try 
Set zRange = commentsColumnRange.SpecialCells(xlCellTypeVisible) 
zRange.Formula = "target" 
Catch() 

Call FilterTableFor(fieldNameColumn) 

Gdzie ja nawet nie robić nic z nim, bo nie czują takiej potrzeby.

Dzięki za poświęcony czas.

Answer 1

Chcesz tylko użyć "On Error Resume Next", kiedy

1. wiesz dlaczego wystąpił błąd.

2. Wiesz, że nie wpłynie to na inne części kodu.

3. Używasz "On Error Goto 0" natychmiast po kodzie, w którym wystąpił błąd.

Powiedziawszy to, powinieneś prawie NIGDY go nie używać. Powinieneś dowiedzieć się, dlaczego wystąpił błąd i kod do obsługi.

Na stronie internetowej jest napisane, że po wyjściu z podfolderu lub funkcji, która go nazwała, następne życiorysy nie będą już miały wpływu, a twoje błędy będą wzrastać tak, jak powinny.

Lepszą alternatywą jest użycie goto w ten sposób. Ale niektórzy ludzie patrzą na to prawie tak samo.

sub SomeSub() 
    On Error Goto TestFailed 

    'Some code 

    'Some code 

    'Some code 

Exit sub 

TestFailed: 
    'Some code here to alert you to and/or handle the fallout of the error. 
End sub 

Answer 2

Nie zawsze trzeba sporo kodu do obsługi błędu, ale naprawdę powinien zrobić coś z nim. Może po prostu twój kod zmień właściwość cells.font.color na vbRed. Po prostu zrobienie On Error Resume Next (a line of code that might error) On Error Goto 0 jest strasznie kiepską formą.

I podobnie jak inni zwrócili uwagę, On Error Goto Label jest zasadniczo wersję VBA z dnia Try ... Catch i używam go frequently

Answer 3

Aby odpowiedzieć na to pytanie „Jak długo trwa On Error Resume Next działa?"

Odpowiedź brzmi: do kolejnej definicji On error ...

Więc jeśli zdefiniować On error resume next będzie przeskoczyć każdy błąd, aż zostanie określony On error goto 0 lub On error goto label

Answer 4

ZAKRES ON ERROR... ZESTAWIENIE

Funkcja nr ON ERROR ... kończy się, gdy pojawi się jedno z poniższych:

1. Kolejna ON ERROR .... (Może w postaci ON ERROR RESUME x lub ON ERROR GOTO x)
2. Exit Sub/Exit Function w obrębie tej samej sub/funkcji, gdzie określono.
3. End Sub/End Function z sub/funkcji, gdzie określono.

jest źle KORZYSTAĆ ON ERROR RESUME NEXT?

Tak i Nie

powiedziałbym nie używać bez wiedząc, czego efektem byłoby to stwierdzenie. Unikaj, jeśli to możliwe. Zachowaj krótki zakres, gdy nie jest to możliwe.

zniweczyć efekt instrukcji ON ERROR RESUME NEXT można nazwać ON ERROR GOTO 0