Hỗ trợ sửa dùm câu điều kiện IF

[Tình nghĩa giang hồ]

Em chào anh chị, em có 1 đoạn code VBA trong SAP bị lỗi ở câu điều kiện If
Dim dong_cuoi As Long
dong_cuoi = Sheet1.Range("A" & Rows.Count).End(xlUp).Row

For i = 2 To dong_cuoi
session.findById("wnd[0]").maximize
session.findById("wnd[0]/tbar[0]/okcd").Text = "/nva02"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/usr/ctxtVBAK-VBELN").Text = Sheet1.Rows(i).Cells(1)
session.findById("wnd[0]").sendVKey 0

If LCase(session.findById("wnd[1]/usr/txtMESSTXT1").Text) Like LCase("*Consider the subsequent documents") Then
session.findById("wnd[0]").sendVKey 0
Sheet1.Rows(i).Cells(2) = session.findById("wnd[0]/usr/tabsTAXI_TABSTRIP_OVERVIEW/tabpT\01/ssubSUBSCREEN_BODY:SAPMV45A:4402/subSUBSCREEN_TC:SAPMV45A:4900/tblSAPMV45ATCTRL_U_ERF_AUFTRAG/txtVBAP-ARKTX[2,1]").Text
Else
Sheet1.Rows(i).Cells(2) = session.findById("wnd[0]/usr/tabsTAXI_TABSTRIP_OVERVIEW/tabpT\01/ssubSUBSCREEN_BODY:SAPMV45A:4402/subSUBSCREEN_TC:SAPMV45A:4900/tblSAPMV45ATCTRL_U_ERF_AUFTRAG/txtVBAP-ARKTX[2,1]").Text
End If
Next

Trong câu điều kiện If này, ý tưởng của em là chỉ cần có hiện dòng chữ thông báo: Consider the subsequent documents thì nó nhấn Enter rồi chạy câu lệnh bên dưới, ngược lại thì không nhấn Enter mà chạy câu lệnh luôn. Nhưng nó bị lỗi. Giờ có cách nào sửa câu If này không anh chị? Giả dụ như là chỉ cần có xuất hiện thông báo thì Enter rồi .....thực hiện điều kiện đó, còn không xuất hiện thông báo thì thưc hiện luôn ( khỏi Enter).
Em cảm ơn anh chị.

 

[VetMini]

...

Trong câu điều kiện If này, ý tưởng của em là chỉ cần có hiện dòng chữ thông báo: Consider the subsequent documents thì nó nhấn Enter rồi chạy câu lệnh bên dưới, ngược lại thì không nhấn Enter mà chạy câu lệnh luôn. Nhưng nó bị lỗi. Giờ có cách nào sửa câu If này không anh chị? Giả dụ như là chỉ cần có xuất hiện thông báo thì Enter rồi .....thực hiện điều kiện đó, còn không xuất hiện thông báo thì thưc hiện luôn ( khỏi Enter).
Em cảm ơn anh chị.

Trời hỡi, viết code đến mức này còn nói câu "Nhưng nó bị lỗi" tỉnh bơ vậy sao?
Lỗi gì? Lỗi ngữ pháp (syntax), lỗi không chạy được (crash at run time), lỗi vẫn chạy nhưng kết quả sai (calculation errors)

Chú:
- Viết cả cụm code đặc sệt mà bôi đậm đọc mỏi mắt bỏ bố.
- LCase("*Consider the subsequent documents") tương đương với "*consider the subsequent documents".

 

[Tình nghĩa giang hồ]

Nó báo lỗi ở chỗ Else, không tìm thấy cái thông báo đó bác Việt, chứ không phải chỗ LCase

Bài đã được tự động gộp: 18/4/22

session.findById("wnd[1]/usr/txtMESSTXT1
đây là câu thông báo nè bác Việt, mà không biết, giờ em muốn viết. Nếu xuất hiện thông báo thì....thực thi câu lệnh.
Else ngược lại không xuất hiện thông báo, thì thực thi câu lệnh....... Mà ngôn ngữ này của SAP không biết viết sau mới phải, nếu là Excel thì đở khổ rùi.........