Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub Worksheet_Change(ByVal Target As Range) Dim Celija As Object Dim I As Integer Dim Red As Integer, Kolona As Integer Dim Vrijednost Set Celija = Application.ActiveCell Kolona = Celija.Column If Kolona <> 3 Then GoTo kraj ' 3 je broj kolone Red = Celija.Row For I = 1 To Red - 2 Set Celija = Application.Cells(I, Kolona) Vrijedn