Question

excel vba中if then语句中then后面加goto，高手们进！

程序如下：tjn = 1
For tjm = 16 To 45
For tjl = 6 To 230
If Sheets("sheet1").Cells(tjl, 2) = tjx(tjn) Then
Sheets("sheet1").Cells(5, tjm) = tjx(tjn),GoTo tjlifend

Next
tjlifend:
tjm = tjm + 1
tjn = tjn + 1
Next
我想if then 的then后面同时执行Sheets("sheet1").Cells(5, tjm) = tjx(tjn),
GoTo tjlifend，但是跟在后面的话不属于IF？逗号连接报错。高手们感激不尽

Answer 1

Sheets("sheet1").Cells(5, tjm) = tjx(tjn)
GoTo tjlifend
分两行就行

Answer 2

If Sheets("sheet1").Cells(tjl, 2) = tjx(tjn) Then
Sheets("sheet1").Cells(5, tjm) = tjx(tjn)
GoTo tjlifend
end if

Answer 3

如果执行到goto 的话就执行goto 语句