Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Dim cel as Range Dim rng As Range dim iSheet as integer With Excel.Worksheets("Sheet" & iSheet) Set rng = Range("A3" & .Rows.Count).End(xlUp) 'range od prvog do zadnjeg u kojem ima podataka For E