Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Sub proba()
Dim red As Long
For red = 2 To Cells(Rows.Count, "A").End(xlUp).Row
If IsTime(Range("A" & red)) Then
Cells(red, 2) = "vrijeme"
Else
Cells(red, 2) = "nije vrijeme"
End If
Next red
End Sub
Function IsTime(rng As Range) As Boolean
Dim