Nhật Anh 9x
Thành viên chính thức
- Tham gia
- 21/10/22
- Bài viết
- 72
- Được thích
- 3
Thưa anh chị
Em có một vấn đề như sau muốn nhờ anh chị giúp ạ!
Sau khi em chạy xong một thẻ kho khoảng 2542 dòng để dữ liệu vào, em dùng 1 vòng lặp để kiểm tra tồn cuối (cột J) xem có bị âm thời điểm không ?
For i = 15 To 2542
If sh2.Range("J" & i).Value < 0 Then
Dim giatri As Integer
giatri = MsgBox("Phat hien am thoi diem. Neu tiep tuc chon Ok. Neu muon sua am thoi diem thi chon Cancel", vbInformation + vbOKCancel, _
"Kiem Tra Am Thoi Diem")
If giatri = vbOK Then
MsgBox " Tiep tuc"
Else
vị trí cần hỏi ?
Exit Sub
End If
End If
Next i
ý em ở đây là nếu phát hiện âm thời điểm mình sẽ có 2 phương án một là chọn ok để tiếp tục chạy, hai là chọn cancel để dừng lại đúng điểm bị âm
Với trường hợp em chọn cancel, em đang muốn là trỏ chuột sẽ chạy đúng vị trí bị âm đó dù chuột đang ở chỗ nào. Vậy anh chị nào biết thì chỉ giúp em với ạ
Em có một vấn đề như sau muốn nhờ anh chị giúp ạ!
Sau khi em chạy xong một thẻ kho khoảng 2542 dòng để dữ liệu vào, em dùng 1 vòng lặp để kiểm tra tồn cuối (cột J) xem có bị âm thời điểm không ?
For i = 15 To 2542
If sh2.Range("J" & i).Value < 0 Then
Dim giatri As Integer
giatri = MsgBox("Phat hien am thoi diem. Neu tiep tuc chon Ok. Neu muon sua am thoi diem thi chon Cancel", vbInformation + vbOKCancel, _
"Kiem Tra Am Thoi Diem")
If giatri = vbOK Then
MsgBox " Tiep tuc"
Else
vị trí cần hỏi ?
Exit Sub
End If
End If
Next i
ý em ở đây là nếu phát hiện âm thời điểm mình sẽ có 2 phương án một là chọn ok để tiếp tục chạy, hai là chọn cancel để dừng lại đúng điểm bị âm
Với trường hợp em chọn cancel, em đang muốn là trỏ chuột sẽ chạy đúng vị trí bị âm đó dù chuột đang ở chỗ nào. Vậy anh chị nào biết thì chỉ giúp em với ạ