<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Dim aktivniList As String
    aktivniList = ActiveSheet.Name
    Dim zadnjiRed As Long
    
    zadnjiRed = traziZadnjiRed(aktivniList)
    Dim red As Long
    Dim redTemp As Long
    Dim kuna As Double
    
    redTemp = 1
    Columns(5).NumberFormat = "0.00"
    For red = 1 To zadnjiRed Step 3
        Cells(redTemp, 3).Value = Cells(red, 1).Value
        Cells(redTemp, 4).Value = Cells(red + 1, 1).Value
        
        kuna = CDec(Application.Work