Oprettelse Automatisk diagrammer for individuelle rækker i en datatabel

David har et regneark, som han bruger til at spore salg efter firma over flere måneder. De firmanavne er i kolonne A og op til femten måneder af salget er i kolonner B: P. David vil gerne oprette et diagram, der kunne dynamisk ændres for at vise salget for en enkelt virksomhed fra regnearket.

Der er flere måder, dette kan gøres; Jeg vil undersøge tre af dem i dette tip. Af hensyn til eksempel, lad os antage, at regnearket er opkaldt Mydata, og at den første række indeholder data overskrifter. De firmanavne er i området A2: A151, og salgsdata for de virksomheder i B2: P151.

En metode er at bruge Excels Autofilter kapaciteter. Opret dit diagram, som du plejer, og sørg for, at diagrammet er indstillet til at trække sin dataserier fra rækkerne i Mydata regneark. Du bør også placere diagrammet på eget ark.

Nu skal du vælge A1 på Mydata og anvende en Autofilter (Data | Filter | Autofilter). En lille drop-down pilen vises øverst i hver kolonne. Klik på drop-down pilen for kolonne A og vælg den virksomhed, du ønsker at se i diagrammet. Excel opdaterer diagrammet til kun at omfatte det enkelt selskab.

Den eneste potentielle ulempe til Autofilter tilgang er, at hvert selskab anses som uafhængigt dataserier, selv om kun en af ​​dem vises i diagrammet. Fordi de er uafhængige, er hvert selskab kortlagt i en anden farve. Hvis du vil have de samme kortlægning farver altid anvendes, så bliver du nødt til at bruge en af ​​de andre metoder.

En anden måde at nærme sig problemet er gennem brug af et "mellemliggende" datatabel-en, der er oprettet dynamisk, trækker kun de oplysninger, du ønsker fra de større datatabel. Kortet derefter baseret på den dynamiske mellemliggende bord. Følg disse trin:

  1. Opret et nyt regneark og kalder det noget lignende "ChartData".
  2. Kopier kolonneoverskrifterne fra Mydata regneark til den anden række på ChartData ark. (Med andre ord, kopiere Mydata A1: P1 til ChartData A2:!. P2 Dette efterlader den første række af ChartData ark midlertidigt tom.)
  3. Med Mydata regnearket vises, skal du vælge Vis | Værktøjslinjer | Formularer. Værktøjslinjen Formularer skal vises.
  4. Brug af værktøjslinjen Formularer, tegne en Combo Box kontrol sted på Mydata regnearket.
  5. Vis Format dialogboksen for den nyoprettede Combo Box. (Højreklik på Combo Box og vælge Format Control.)
  6. Brug af kontroller i dialogboksen Angiv Input Range som Mydata $ A $ 2:! $ A $ 151 angive Cell Link ChartData $ A $ 1, og angiv drop down Lines som 25 (eller hvad figur du vil)!. (Se figur 1.)

    Oprettelse Automatisk diagrammer for individuelle rækker i en datatabel

    Figur 1. Formater dialogboksen.

  7. Klik på OK for at lukke dialogboksen. Du har nu en velfungerende Combo Box, at når du bruger den til at vælge et firmanavn, vil lægge en værdi i celle A1 i ChartData regneark, der angiver, hvad du har valgt.
  8. Med vises ChartData regnearket, indtast følgende formel i celle A3:

    = INDEKS (Mydata A2: A151, $ A $ 1)

  9. Kopier indholdet af celle A3 til området B3: P3. Række 3 indeholder nu data uanset virksomheden udtages i Combo Box.
  10. I celle B1 indtaste følgende formel. (Resultatet af denne formel vil fungere som titel til din dynamiske diagram.)

    = "Data for" & A3
  11. Vælg kolonneoverskrifterne og data (B2: P3) og oprette et diagram baseret på disse data. Indstil diagrammet titel til nogle eksempeltekst; det er ligegyldigt, hvad det er lige nu.
  12. I den færdige diagram ved at vælge diagrammet titel.
  13. I Formel baren Indtast følgende formel:

    = ChartData! A $ 3 $

    Du har nu en fuldt fungerende dynamisk diagram. Du kan bruge Combo Box for at vælge en anden virksomhed, og diagrammet gentegnes anvende data for den virksomhed, du vælger. Hvis du vil, kan du flytte eller kopiere Combo Box til arket indeholder diagrammet, så du kan se den opdaterede diagram, hver gang du foretager et valg. Du kan også, hvis det ønskes, skjule ChartData regnearket.

    En tredje metode er at bruge en makro til at ændre det område, som et diagram er baseret på. For at forberede sig til denne fremgangsmåde, skal du oprette to navngivne områder i din projektmappe. Fornavnet skal være ChartTitle, og det bør henvise til formlen = OFFSET (Mydata! $ A $ 1,22,0,1,1) Klik på Tilføj, og derefter definere det andet navn. Denne ene bør kaldes ChartXRange, og det bør henvise til formlen = OFFSET (Mydata! $ A $ 1,22,0,1,15). (Se figur 2.)

    Oprettelse Automatisk diagrammer for individuelle rækker i en datatabel

    Figur 2. Definer navn dialogboksen.

    Med navne defineret, kan du markere området Mydata B1: P2 og oprette dit diagram. Du bør basere skemaet på denne simple interval, og sørg for, at du placerer nogle midlertidige tekst i diagrammet titel. Sørg for, at diagrammet er oprettet på eget ark, og at du navngive ark diagramark.

    Med diagrammet oprettet, skal du højreklikke på diagrammet og vælge Source data. Excel viser kildedata dialogboksen, og du bør vælge fanen Series. Da du bygger skemaet på sidehoved og en enkelt række af data, bør der være en enkelt dataserie i dialogboksen. Erstat hvad der er i kassen Værdier med følgende formel:

    = 'Bog1'! ChartXRange

    Sørg for at udskifte Bog1 med navnet på den projektmappe, hvor du arbejder. Klik på OK, og diagrammet er nu baseret på det navngivne område, du tidligere har angivet. Du kan nu vælge diagrammet titel og placere følgende i Formel bar for at gøre titlen dynamisk:

    = Mydata! ChartTitle

    Nu er du klar til at tilføje den makro, der gør det hele dynamisk. Vis VBA Editor og tilføje følgende makro til koden vinduet for Mydata regnearket. (Dobbeltklik på navnet på regnearket i Project Explorer-området.)

    Private Sub Worksheet_BeforeDoubleClick (ByVal destination som Excel.Range, Annuller Som Boolean)
    ActiveWorkbook.Names.Add Name: = "ChartXRange", _
    RefersToR1C1: = "! = FORSKYDNING (Mydata R1C1," & _
    ActiveCell.Row - 1 & ", 1,1,15)"
    ActiveWorkbook.Names.Add Name: = "ChartTitle", _
    RefersToR1C1: = "! = FORSKYDNING (Mydata R1C1," & _
    ActiveCell.Row - 1 & ", 0,1,1)"
    Aktiver Sheets ("diagramark").
    Cancel = True
    End Sub

    Nu kan du få vist Mydata regnearket og dobbeltklikke på en række. (Nå, skal du dobbeltklikke på i kolonne A for en række.) Makroen opdaterer derefter navngivne områder, så de peger på den række, hvor du dobbeltklikker klikkes, og viser derefter diagramark ark. Figuren (og titel) er gentegnes afspejler dataene i rækken, som du dobbeltklikker på.

    ExcelTips er din kilde til omkostningseffektiv Microsoft Excel træning. Dette tip (2377) gælder for Microsoft Excel 97, 2000, 2002, og 2003. Du kan finde en version af dette tip til båndet grænseflade Excel (Excel 2007 og nyere) her: Automatisk Oprette diagrammer for enkelte rækker i en datatabel .


© 2020 Zajacperrone.com | Contact us: webmaster# zajacperrone.com