Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Function Provjera() Dim red As Long Dim tmp Dim Dat As Date For red = 2 To Cells(Rows.Count, "A").End(xlUp).Row tmp = Range("A" & red).Value On Error Resume Next Dat = tmp If Err.Number = 0 Then