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