Tarkoitus oli tehdä yksinkertainen if-lause koodin keskelle:
On Error Resume Next
If ActiveSheet.Range("B22") = "" Then
GoTo LN 254
On Error GoTo 0
End If
Eli jos solu B22 on tyhjä, hyppää systeemi koodissa riville 254. Muuten koodi tulee jatkua normaalisti. Miksi tulee "Syntax error"?
On Error Resume Next
If ActiveSheet.Range("B22") = "" Then
GoTo LN 254
On Error GoTo 0
End If
Eli jos solu B22 on tyhjä, hyppää systeemi koodissa riville 254. Muuten koodi tulee jatkua normaalisti. Miksi tulee "Syntax error"?
Vastaukset 2
Vanhimmat
et ole määritellyt LN254 labelia, johon viittaat GoTo rivillä...
On Error Resume Next
If ActiveSheet.Range("B22") = "" Then
GoTo LN254 'tästä hyppy
On Error GoTo 0
End If
'koodia...
LN254:
' tänne tullaan GoTo LN254 riviltä
MsgBox "tänne tultiin!"
Ai se täytyy erikseen vielä määrittää...
Taas oppi uutta! Kiitos