728x90
셀레니움을 이용하여 Chrome으로 Web 문서를 조회할 때
갑자기 아래처럼 오류가 발생하며 더이상 진행을 할 수 없을 때 처리가 필요합니다.
에러코드 26에 UnexpectedAlertOpenError인데, 실제 웹페이지에서는 메시지 팝업이 되는 것입니다.
아래와 같이 Error 처리하고 다음 단계로 넘어갑니다.
On Error GoTo ERR_HD
For r = LBound(vD, 1) To UBound(vD, 1)
'// User code area
NEXT_ROW:
Next r
WD.Close
SEt WD = Nothing
Exit Sub
ERR_HD:
If InStr(1, Err.Description, "Alert") <> 0 Then
WD.SwitchToAlert.accept '// or WD.SwitchToAlert.dismiss
GoTo NEXT_ROW '// or Resume Next
End If
728x90
'Excel - VBA' 카테고리의 다른 글
DatePicker 만들기 - 1 (Calendar용 User Form 준비) (0) | 2023.05.05 |
---|---|
Excel에서 원숫자를 50번까지 입력하기 (feat. 자동고침옵션) (0) | 2023.04.17 |
표준시간을 얻어 오는 함수 (0) | 2023.03.27 |
샘플링 검사 (KS Q ISO 2859-1) 1회 샘플링 함수 만들기 (0) | 2023.03.20 |
Array로부터 1bit 단일색상 BMP 파일 만들기 (0) | 2023.03.11 |