Hvordan lage et vektordiagram i Excel. 3 trinn å følge

En stund nå har vi etterforsket godt hvordan lage et vektordiagram i excel. Vi synes det er en interessant utfordring og kan være nyttig for mange brukere. Med Excel-verktøy kan du lage vektorgrafer i svart-hvitt eller farger. Prosessen er litt kjedelig, men vi vil forklare det trinn for trinn, slik at du kan gjøre det ved å følge veiledningen.

Du må ta hensyn til at dette er kommandoer, så du må jobbe med total nøyaktighet. Hvis du gjør en feil i bare ett element, vil ikke prosedyren bli utført riktig og du vil ikke kunne få den ønskede grafen. Uten videre, fortsett å lese for å begynne å lage grafen din.

Kanskje du kanskje er interessert: Tegn en ligning i et Excel-diagram

Hvordan lage et vektordiagram i Excel

Det er flere prosedyrer involvert når du lager et vektordiagram i Excel, nedenfor vil vi forklare alt i detalj:

1. Lag vektordataene hvis du ikke har det

I vårt tilfelle hadde vi ikke vektordata for hånden, så vi måtte finne opp noen. For denne øvelsen vil vektorfeltet vårt bli definert av følgende:

Det første trinnet er å definere rutenettet for vektorfeltet. Vi velger et rutenett med jevn avstand med dimensjoner på 0,3 x 0,3. Vi bestemte oss også for enkelhets skyld å plassere halene til hver vektor, i stedet for midtpunktet, på rutenettet. Så det første trinnet var å lage to kolonner for verdiene "x1" og "y1", eller posisjonen til halene til hver vektor.

I kolonnene rett ved siden av "x1" og "y1", lager vi kolonnene "x2" og "y2". Disse punktene vil være slutten av hodet eller pilen til vektorene. Vektorhodet må være plassert på posisjonen x1+fx og y1+fy. Men denne absolutte posisjonen gjør vektorene veldig store i forhold til rutenettavstanden.

Vanligvis, i en vektorgraf, er det vi bryr oss om den relative størrelsen på vektorene sammenlignet med hverandre. For å løse dette legger vi til en skaleringsfaktor i beregningen av "x2" og "y2". En verdi på 0,1 fungerte bra i dette tilfellet. Formelen for x2 er vist nedenfor.

Hvis vi prøvde å lage en vektorgraf fra eksisterende data, kunne vi legge til en annen kolonne for å multiplisere dataene med en skaleringsfaktor. Nå som vi har fire kolonner med verdier som fullstendig definerer vektorene, kan vi lage en vektorgraf i Excel.

2. Lage et vektordiagram i Excel

Vektordiagrammet er laget av spredningsdiagramtypen i Excel. Så vi starter med å sette inn en tom en i regnearket.

Hver vektor vil bli representert av en serie data. For å begynne å fullføre grafen, høyreklikker vi på den og velger «Velg data» i menyen. Deretter legger vi til den nye serien ved å velge den første raden med verdier "x1" og "x2" som «Serial X-verdier» og den første raden med verdier «y1» og «y2» som «Serie Y-verdier".

Deretter legger vi til en pilspiss til vektoren ved å endre formatet. Vi velger først dataserien, deretter navigerer vi til fanen Kartverktøy > Format for å legge til pilspissen.

Nå har vi noe som ser ut som en vektor på grafen vår. Vi gjorde også tomtearealet firkantet slik at det ikke skjevvrider vektorene.

Alt som gjenstår er å gjenta denne prosessen for hver vektor. Enkelt, ikke sant? Vi har bedre ting å gjøre enn å klikke på knappene hele dagen for å legge til alle de individuelle vektorene til denne grafen. Det tror vi du også gjør! Så la oss gjøre det litt smartere, skal vi?

3. Bruke VBA til å legge til dataserier til et Excel-spredningsdiagram

I stedet for å legge til hver vektor manuelt ved å klikke på Excel-knappene, kan vi lage en subrutine for å legge til hver serie. VBA for subrutinen er nedenfor:

Dette er hva subrutinen gjør:

1. Aktiver diagrammet (vårt ble kalt "Chart7") og velg plottområdet.
2. Start en syklus «Til» for å gå gjennom hver av de 49 radene med verdier.
3. Definerer x-verdiene som cellene i gjeldende rad og kolonnene C og D som en streng som kan legges inn i spredningsplottet.
4. Definerer verdiene og cellene i gjeldende rad og kolonner E og F.
5. Legg til en ny serie i diagrammet ved å bruke x-verdiene og y-verdiene
6. Formater deretter den nylig lagt til serien.
7. Legg til pilspissen.
8. Til slutt, gå til neste rad, til alle 49 er ferdige.

Resultatet, etter å ha fjernet akseetikettene og justert grensene, er dette:

Det ser ut som et vektorplott, ikke sant? Hver rad med "x" og "y" verdier i tabellen er representert som en vektor, med halen til hver vektor justert til det forhåndsdefinerte rutenettet. Til lage en vektorgraf slik at midtpunktet til vektoren er på rutenettet, må vi utvilsomt definere et tredje punkt for hver vektor.

HVA BLIR DET NESTE?

Vi ønsker å forbedre vektorgrafen ved å legge til en fargeskala slik at fargen på vektorene endres med størrelsen. I utgangspunktet vil de mindre vektorene være blå og de større vil være røde. Dette vil innebære lineær interpolasjon med RGB-verdier, som vist nedenfor:

MERK:

Denne metoden vil kun fungere for vektordiagrammer der antallet vektorer er mindre enn 255 på grunn av begrensningene i Excels diagramserier. Bare 255 dataserier er tillatt per diagram.

Kanskje du vil vite: 6 beste programmer for å løse ligninger

Hvordan lage et farget vektordiagram i Excel

Tidligere viste vi hvordan du bruker VBA til å lage et vektordiagram i Excel. Det plottet var bare et enkelt svart-hvitt vektorplott. Så i denne delen vil vi vise deg hvordan ta det diagrammet til neste nivå med en fargeskala for å indikere størrelsen på vektorene, som følgende:

Det grunnleggende konseptet for å lage vektorgrafen i Excel som har forskjellig farge er dette:

• Trinn 1: definerer en gradient som skal brukes til å fargelegge vektorene.
• Trinn 2: Bestem størrelsen på hver av vektorene.
• Trinn 3: Finn minimums- og maksimumsstørrelser.
• Trinn 4: beregner den relative prosentvise størrelsen til hver vektor (minimum = 0 %, maksimum = 100 %)
• Trinn 5: iInterpoler på gradienten for å finne prosentandelen rødt, grønt og blått for vektoren.
• Trinn 6: Plott vektoren på grafen.
• Trinn 7: bruker formatering på vektoren, inkludert farge.

Som du sikkert har gjettet, ble alle disse trinnene (unntatt 1) ​​utført i VBA. Vi vil vurdere hver enkelt nedenfor.

Definisjon av gradient

Excel gjør det enkelt å leke med gradienter og finne den du liker. Vi har nettopp laget et rektangel i regnearket, og deretter fylt det med en tilpasset gradient med stopp på 0% (rød), 33% (gul), 66% (grønn) og 100% (blå).

Deretter konverterer vi det til en tabell over RGB vs. prosentdel. Vi ønsket at 0 % (eller de minste verdiene) skulle være blå og 100 % (eller de største verdiene) skulle være røde. RGB-verdier er heltall mellom 0 og 255.

Senere interpolerte vi i VBA basert på den relative størrelsen på vektoren (0 til 100%), så vi ga også navn til hver kolonne ("legendx", "legendr", "legendg", "legendb") for å gjøre interpolering enklere. Med gradienten definert, la oss komme inn på VBA:

Beregning av vektormengder, minimum, maksimum i vba

Etter å ha definert det totale antallet vektorer (numvect) og initialisert variablene, "minvmag" og "maxvmag", går følgende kode gjennom dataradene for å beregne størrelsen på hver vektor, "vmag". Den lagrer også hver av størrelsene i en matrise. Denne matrisen vil bli brukt senere når vi farger vektoren med passende nyanse basert på gradienten vi definerte. Til slutt sammenlignes gjeldende verdi av vmag med maxvmag og minvmag. Hvis den er større enn maxvmag, oppdateres verdien av maxvmag. Hvis den er mindre enn minvmag, oppdateres verdien av minvmag.

numvect = 196

minvmag = 1000000

maxvmag = 0

ReDim vmagarray(1 til numvect)

For j = 1 For å tallfeste

x1 = Celler(4 + j, 2)

x2 = Celler(4 + j, 3)

y1 = Celler(4 + j, 5)

y2 = Celler(4 + j, 6)

vmag = Sqr((x1 – x2) ^ 2 + (y1 – y2) ^ 2)

vmagarray(j) = vmag

Hvis vmag > maxvmag Da

maxvmag = vmag

ElseIf vmag < minvmag Da

minvmag = vmag

End If

Neste j

Beregn den relative prosentvise størrelsen til hver vektor

Med størrelsen på hver vektor, samt minimum og maksimum definert, kan du gå videre til plott hver vektor med en løkke Til (For i = 1 til numvect). Innenfor loopen måtte vi normalisere vektorene mellom 0 og 1, for å bruke gradienten definert ovenfor. Følgende ligning sørger for det:

relvmag = (vmagarray(i) – minvmag) / (maxvmag – minvmag)

Interpolering for å få fargen til hver vektor

Den relative størrelsen på vektoren kan være en hvilken som helst verdi mellom 0 og 1, så vi trengte å interpolere fra tabellen ovenfor for å finne den riktige fargen som skal brukes på vektoren. Vi bruker en funksjon av interpole enkel lineær (LinInterp) som vi opprettet tidligere for å håndtere dette. Og siden RGB-verdier er heltall, måtte vi runde av interpolasjonsresultatet for å få den endelige verdien.

red = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendr»)))

grn = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendg»)))

blu = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendb»)))

Plott vektoren

VBA for å plotte vektoren som en serie og formatere den som en pil er den samme som før:

xvalues ​​​​= «=Ark1!$B$» & i + 4 & «:$C$» & i + 4

yvalues ​​​​= «=Ark1!$E$» & i + 4 & «:$F$» & i + 4

'legg til serien i diagrammet

ActiveChart.SeriesCollection.NewSeries

ActiveChart.FullSeriesCollection(i).xvalues ​​= xvalues

ActiveChart.FullSeriesCollection(i).Values ​​= yvalues

Med Selection.Format.Line

.EndArrowheadLength = msoArrowheadLengthMedium

.EndArrowheadWidth = msoArrowheadWidthMedium

.EndArrowheadStyle = msoArrowheadTriangle

Bruk en farge på vektoren

Til slutt bruker vi de interpolerte RGB-verdiene ("røde", "grn", "blu" variablene) i With-løkken for å farge vektorene:

.ForeColor.RGB = RGB(rød, grn, blå)

Den komplette vba-subrutinen for å lage en farget vektorgrafikk

Nedenfor er den komplette subrutinen for å lage det fargede vektordiagrammet i Excel. Du må følge den nøyaktig (uten å hoppe over noen detaljer), for å unngå feil i prosessen:

Sub add_vector()

Dim xverdier som streng

Dim yvalues ​​As String

Dim numvect Som heltall

Dim vmagarray() Som dobbel

Dim minvmag As Double

Dim maxvmag As Double

Dim nettverk som heltall

Dim grn Som heltall

Dim blu Som heltall

numvect = 196

'finn minimum og maksimum vektorstørrelser

'(disse må defineres før plotting)

'lagre vektorstørrelsene i en matrise for senere bruk

minvmag = 1000000

maxvmag = 0

ReDim vmagarray(1 til numvect)

For j = 1 For å tallfeste

x1 = Celler(4 + j, 2)

x2 = Celler(4 + j, 3)

y1 = Celler(4 + j, 5)

y2 = Celler(4 + j, 6)

vmag = Sqr((x1 – x2) ^ 2 + (y1 – y2) ^ 2)

vmagarray(j) = vmag

Hvis vmag > maxvmag Da

maxvmag = vmag

ElseIf vmag < minvmag Da

minvmag = vmag

End If

Neste j

'aktiver kartet og velg plottområdet

ActiveSheet.ChartObjects("Chart 7").Aktiver

ActiveChart.PlotArea.Select

For i = 1 For å numvektere

'bestem den relative prosentstørrelsen til vektoren

'(skriv inn minimums- og maksimumsvektorene)

relvmag = (vmagarray(i) – minvmag) / (maxvmag – minvmag)

'interpoler for å finne % av rødt, grønt og blått

red = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendr»)))

grn = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendg»)))

blu = Round(LinInterp(relvmag, Range(«legendx»), Range(«legendb»)))

'definer xverdiene og yverdiene for diagrammet

xvalues ​​​​= «=Ark1!$B$» & i + 4 & «:$C$» & i + 4

yvalues ​​​​= «=Ark1!$E$» & i + 4 & «:$F$» & i + 4

'legg til serien i diagrammet

ActiveChart.SeriesCollection.NewSeries

ActiveChart.FullSeriesCollection(i).xvalues ​​= xvalues

ActiveChart.FullSeriesCollection(i).Values ​​= yvalues

ActiveChart.FullSeriesCollection(i).Velg

'bruk format på serien

Med Selection.Format.Line

.EndArrowheadLength = msoArrowheadLengthMedium

.EndArrowheadWidth = msoArrowheadWidthMedium

.EndArrowheadStyle = msoArrowheadTriangle

.ForeColor.RGB = RGB(rød, grn, blå)

Slutt med

ActiveChart.ChartType = xlXYScatterLinesNoMarkers

Neste jeg

End Sub

Se på: De 7 beste programmene for grafer.

Siste tanker

Å lage en vektorgraf i Excel er litt komplisert, enten det er i svart-hvitt eller farger, siden det er mange faktorer involvert, og starter med beregningen. Det er imidlertid alltid morsomt å se hvordan vi kan flytte grensene til Excel for å gjøre noe nytt. Vi håper du likte veiledningen og kunne bruke den på jobben du hadde i tankene. Du kan alltid uttrykke dine meninger gjennom kommentarfeltet. Vi vil alltid være her for å fortsette å fjerne emnene dine angående Excel og andre viktige verktøy, så besøk oss snart.