Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
indeksmath: 'sa INDEX(MATCH) NEZNAM Dim a As Integer Dim b Set rngDatum = Sheets("List2").Range("B1:G1") red = Application.WorksheetFunction.Match(ime, Sheets("List2").Range("A:A"), 0) For Each datum In rngDatum If datum >= "2.1.2015." And datum <= "4.1.2015." Then broj = Val(Trim(Sheets("List2").Cells(red, datum.Column))) kolona2 = Application.Index(Sheets("List3").Range("b1:b7"), WorksheetFunction.Match(broj, Sheets("List3").Range("A1:A7"))) kolona3 = Application.Index(Sheets("List3").Range("c1:c7"), WorksheetFunction.Match(broj, Sheets("List3").Range("A1:A7"))) kolona4 = Application.Index(Sheets("List3").Range("d1:d7"), WorksheetFunction.Match(broj, Sheets("List3").Range("A1:A7"))) Sheets("List1").Select Cells(red1, 1) = datum Cells(red1, 2) = ime Cells(re