Lag et teppe Her er du utfordret til å lage ditt eget teppemønstre på Excel. Det skal bli et ganske intrikat mønstre -- fakstisk et helt tilfeldig mønstre. Start med å legge tilfeldige tall -- enten -1, 0, og 1 -- i cellene fra A1 til K20: Finner du ikke funksjonen TILFELDIGMELLOM()? Dette kan du gjøre ved å legge inn en formel i celle A1, og deretter kopiere formelen til de andre cellene. Nå skal vi lage en makro som fargelegger alle cellene automatisk, etter det tilfeldige tallet som står der. Vi vil da trenge en løkke og if-tester. Først trenger vi litt utstyr: Tre nesten like makroer, som farger en celle. Du kan lage disse makroer ved hjelp av makro-opptakeren: Hver av de 3 makro må kunne veldig lite: bare sette fargen til cellens bakgrunn. De bør se ut som dette her: Nå har vi alle verktøy på plass for å lage en makro som setter fargene til cellene. Denne makroen består av en løkke over alle celler fra A1 til K20: For Each cell in Range("A1:K20") 'Utvelg denne cellen cell.select ... Next cell Inni selve løkken trenger vi if-tester for å kunne avgjøre hvilken farge som skal brukes for cellen som blir behandlet i denne gjennomgang av løkken: If (cell.Value = 1) Then settCelleOrange End If If (cell.Value = 0) Then settCelleBlå End If If (cell.Value = -11) Then settCelleGrønn End If Denne makroen er litt mer kompleks, og du kan ikke registrere den med makro-opptakeren. Du må legge den inn manuelt! Gå i makro-redigislengsmodus og skriv ned en makro som er omtrent som denne her: Skjønner du strukturen av denne kode-biten? Prøv å lage teppemønstre! Du kan gjøre ditt regneark litt mer avansert med følgende utbyggingstrinn: Bruk flere forskjellige tall og farger Legg til elegante knapper for å styre makroen Skjul tallene (ved å bruke samme skriftfarge som bakgrunnsfarge) Fortsett å velge tallene dine helt tilfeldig, men legg til korrelasjoner. Da har du sjans for å få finere mønstere

Tilbake til index