Kako narisati vektorje v Excelu

1. korak

Odprite Microsoft Excel Če imate Excel 2007 ali novejšo različico, pojdite na zavihek »Pogled« na traku in kliknite »Makroni«, sicer kliknite meni »Orodja« in izberite »Makroni«. Pojavi se pogovorno okno makra.

2. korak

Vnesite ime makra in kliknite »Ustvari«. To bi moralo odpreti urejevalnik programov Visual Basic z novo prazno podprogramo, ki je prikazana na zaslonu.

3. korak

Določite koordinate "X" in "Y", ki jih želite uporabiti za začetek in konec vektorja. Zgornji levi kot preglednice je na (0, 0), "X" in "Y" pa se bosta povečevala, če greste v desno oz. Te vrednosti postavite v spremenljivke, kot je ta:

start_x = 0 start_y = 0 end_x = 100 konec_y = 100

Te vrednosti bodo v zgornjem levem kotu preglednice narisale diagonalno črto. Morda boste morali eksperimentirati z različnimi številkami, če želite črto doseči točno tam, kjer jo želite.

4. korak

Dodajte kodo za risanje same črte:

vrstica = Sheet1.Shapes.AddLine (start_x, start_y, end_x, end_y)

5. korak

Vnesite kodo, da dodate puščico na konec vrstice, tako da je videti kot vektor:

line.Line.EndArrowheadStyle = MsoArrowheadStyle.msoArrowheadTriangle

6. korak

Zaprite urejevalnik Visual Basic in odprite pogovorno okno makra (glejte 1. korak). Kliknite makro in kliknite »Zaženi«. Morali bi videti svojo črto.

Zanimivi Članki