![...](/f/f713dfe4df2df3b47e51d8b8cf819e7f.jpg)
Microsoft Excel on yksi tehokkaimmista saatavilla olevista taulukkolaskentaohjelmista, ja se on hyödyllinen monenlaisissa toimissa talousanalyysistä tiedeprojekteihin. Useimmat ihmiset kuitenkin ajattelevat Excelin rajoittuvan kaavojen ruudukoiden, eli perinteisten laskentataulukkotoimintojen, manipulointiin. Mutta Excelin Visual Basic -komentosarjan avulla on helppo tehdä vielä enemmän. VB: n avulla voit piirtää laskentataulukkoon minkä tahansa muodon ja luoda niiden avulla piirustuksia, kaavioita ja muuta grafiikkaa laskentataulukon visualisoimiseksi.
Vaihe 1
Avaa Microsoft Excel. Jos sinulla on Excel 2007 tai uudempi, siirry nauhan "Näytä"-välilehteen ja napsauta "Makrot"; muussa tapauksessa napsauta "Työkalut"-valikkoa ja valitse "Makrot". Makro-valintaikkunan pitäisi ilmestyä.
Päivän video
Vaihe 2
Kirjoita makron nimi ja napsauta "Luo". Tämän pitäisi avata Visual Basic -sovelluseditori, jossa uusi tyhjä aliohjelma tulee näkyviin näytölle.
Vaihe 3
Määritä X- ja Y-koordinaatit, joita haluat käyttää vektorin alussa ja lopussa. Laskentataulukon vasen yläkulma on kohdassa (0, 0), ja X ja Y kasvavat, kun siirryt oikealle ja alaspäin. Laita nämä arvot muuttujiin seuraavasti:
alku_x = 0 alku_y = 0 loppu_x = 100 loppu_y = 100
Nämä arvot piirtävät vinoviivan laskentataulukon vasempaan yläkulmaan. Saatat joutua kokeilemaan eri numeroita saadaksesi rivin juuri haluamaasi kohtaan.
Vaihe 4
Lisää koodi piirtääksesi itse viivan:
rivi = Sheet1.Shapes. AddLine (alku_x, alku_y, loppu_x, loppu_y)
Vaihe 5
Lisää koodi lisätäksesi nuolenpään rivin loppuun, jotta se näyttää vektorilta:
linja. Linja. EndArrowheadStyle = MsoArrowheadStyle.msoArrowheadTriangle
Vaihe 6
Sulje Visual Basic -editori ja avaa Makro-valintaikkuna (katso Vaihe 1). Napsauta makroa ja napsauta "Suorita". Sinun pitäisi nähdä rivisi näkyviin.
Kärki
Voit käyttää vaiheessa 4 luotua "viiva"-muuttujaa muuttaaksesi vektorisi muita ominaisuuksia. Jos haluat esimerkiksi muuttaa viivan värin vihreäksi, voit kirjoittaa "line. Linja. ForeColor. RGB = RGB(0, 255, 0)"