{"text_format":"1","workbook":"xlsx","n_sheets":3,"sheets":["Ylesanne","Tehtud","Värvid"],"not_rendered":{"charts":0,"images":0,"macros":1,"external_links":2,"defined_names":4,"comments":0,"pivot_tables":0},"unopened":[],"bounds":{"document_bytes":16777216,"sheet_cells":100000,"rows_first":2000,"rows_last":500,"rows_between":2000,"halvings":0,"cell_chars":16384,"cell_head_chars":4096},"cells_cut":0,"cells_raw":0,"read":"whole","date_system":"1900"}

{"sheet":"Ylesanne","index":0,"n_rows":19,"n_cols":2,"rows_kept":19,"cut":false,"hidden":false,"merged":[]}
[]
[]
[null,"1. Koostada VBA protseduur, mis genereerib töölehele alates lahtrist nimega „algus“ m x n juhuslikku arvu vahemikus [-100, 100]."]
[null,"rnd() – juhuslik reaalarv vahemikus [0, 1). "]
[null,"Juhusliku täisarvu saamiseks vahemikus [alg, lõpp] sobib avaldis alg + int(rnd()*(lõpp-alg+1)). "]
[null,"NB! Sarnase protseduuri saab võtta loengu failist."]
[]
[null,"2. Koostada VBA protseduur, mis värvib juhuslikult umbes pooled lahtri \"algus\" ümbruses olevatest arvudest mingit värvi."]
[null,"Vt objekti Range omadus Interior.ColorIndex), näiteks kollane (6), punane (3). "]
[null,"Värvitava piirkonna määramiseks kasutada lahtri omadust CurrentRegion: "]
[null,"Range(\"algus\").CurrentRegion"]
[null,"NB! Sarnase protseduuri saab võtta loengu failist."]
[]
[null,"3. Koostada VBA funktsioon, mis leiab parameetrina antud piirkonnas olevate värvitud lahtrite väärtuste aritmeetilise keskmise. Arvestada võimalusega, et värvitud lahtrid puuduvad."]
[]
[null,"4. Koostada VBA funktsioon, mis leiab parameetrina antud arvude hulgast absoluutväärtuselt suurima paarisarvu. Arvestada võimalusega, et paarisarvud puuduvad või et ainus paarisarv on 0."]
[]
[null,"5. Koostada VBA protseduur, mis kopeerib lahtri \"algus\" ümbruses (vt lahtriploki omadus CurrentRegion) olevate värvitud lahtrite hulgast need, mille väärtus jagub kolmega, ühte veergu, mis paikneb"]
[null," andmete piirkonnast kaks veergu paremal. Protseduur peab kõigepealt kustutama võimalikku tulemuspiirkonda jäävad väärtused."]

{"sheet":"Tehtud","index":1,"n_rows":2,"n_cols":9,"rows_kept":2,"cut":false,"hidden":false,"merged":[]}
[null,null,null,null,null,null,null,null,"Värvi kood"]
[null,null,null,null,null,null,null,null,17]

{"sheet":"Värvid","index":2,"n_rows":60,"n_cols":5,"rows_kept":60,"cut":false,"hidden":false,"merged":[]}
[]
[null,"Näide: \"Värvid\""]
[]
[null,"Kood","Värv",null,"Koostada makro, mis väljastab töölehele"]
[null,1,null,null,"värvide koodid ja värvide näidised"]
[null,2]
[null,3,null,null,"Värvide koodid on vahemikus 1 ... 56"]
[null,4]
[null,5,null,null,"Lahtri kirja värvi saab määrata korraldusega"]
[null,6,null,null,"lahter.Font.ColorIndex = kood"]
[null,7]
[null,8,null,null,"Lahtri põhja (interjööri) värvi saab määrata korraldusega"]
[null,9,null,null,"lahter.Interior.ColorIndex = kood"]
[null,10]
[null,11]
[null,12]
[null,13]
[null,14]
[null,15]
[null,16]
[null,17]
[null,18]
[null,19]
[null,20]
[null,21]
[null,22]
[null,23]
[null,24]
[null,25]
[null,26]
[null,27]
[null,28]
[null,29]
[null,30]
[null,31]
[null,32]
[null,33]
[null,34]
[null,35]
[null,36]
[null,37]
[null,38]
[null,39]
[null,40]
[null,41]
[null,42]
[null,43]
[null,44]
[null,45]
[null,46]
[null,47]
[null,48]
[null,49]
[null,50]
[null,51]
[null,52]
[null,53]
[null,54]
[null,55]
[null,56]