Tôi có kịch bản phim. Cột đầu tiên là mã thời gian, cột thứ hai là loa, cột thứ ba là hộp thoại.
Tôi muốn lặp qua toàn bộ tập lệnh, nhưng chỉ làm một cái gì đó cho cột thứ ba (hộp thoại).
Tôi đã có một macro cho những gì tôi làm cho cột thứ ba. Tôi chỉ cần nó để:
- bắt đầu ở hàng 1 cột 1
- tab để hàng 1 cột 2
- tab một lần nữa vào hàng 1 cột 3 (sau đó thực hiện macro dựng sẵn của tôi)
- sau đó tab lại đưa tôi trở lại r2 c1
Nhưng nó phải dừng lại khi chạm vào một ô trống. Các macro của tôi tiếp tục nhấn các vòng lặp vô hạn, tiếp tục tạo các ô mới vì phím tab được kiểm tra theo chương trình mặc dù có nhiều kiểm tra khác nhau về phần cuối của tài liệu. Tất cả các giải pháp ngoài kia đều cho rằng đó là một tài liệu thông thường, không có thẻ và mã, chẳng hạn như:
Do Until ActiveDocument.Bookmarks("\Sel") = ActiveDocument.Bookmarks("\EndOfDoc")
'(Do something)
Loop
thất bại
Sub looper () 'một ví dụ về vba thất bại của tôi: Với ActiveDocument.Content.Find Do While .Execute (Forward: = True, Format: = True) = True Selection.MoveLeft Unit: = wdCell Lựa chọn Đơn vị .MoveLeft: = wdCell Application.Run MacroName: = "FixPar Đoạn2" Kết thúc vòng lặp với kết thúc phụ
—
chris G