19. juli 2004 - 12:24Der er
3 kommentarer og 1 løsning
Macro, create customized pie chart
Hej, Jeg ønsker at kunne oprette et customized pie chart som viser top x største værdier i én serie, men møder vanskeligheder på 2 punkter:
det tilpassede i chart'et skal vise top x værdier individuelt med procent-angivelse, de resterende skal grupperes i en "other" kategori med en aggregeret procent.
Jeg forestiller mig at angive 3 range til grafen: RangeName: celleref (b2) til navn på serien ValueRange: celleref (c2:k2) LabelRange: celleref (c1:k1) ShowTopX: Integer der fortæller hvor mange individuelle værdier der skal vises.
Hjælpen jeg søger er tofold: Hvis det skal laves som sub uden parametre, hvor man beder brugeren give oplysninger løbende: Hvordan laver jeg input-box, der beder brugeren markere et range, som vi kender det fra indbyggede funktioner, hvor man kan markere et område? (Jeg ved godt at jeg kan bruge inputbox og lade brugeren skrive adresserne, men det er ikke særlig brugervenligt...)
Er der nogen der kan lave det som en funktion, hvor man fx med: =CreatePieTopX(B2;C2:K2;C1:K1;5) ovenstående skulle gerne lave et pie-chart som viser de 5 største værdier særskilt, og grupperer de resterende 4 som en Other. (Og evt. afslutte med at skifte formlen i activecell ud med status: "Pie Chart Created" hvis succes.
Lige et hurtigt svar på en af dine spm. Der findes to slags inputbokse i vba. x=inputbox("indtast her" og dim x as range set x=Application.InputBox(prompt:="Marker område", Title:="Min inputboks", Type:=8)
bemærk at type skal være 8 for at man kan bruge markering, men slå den lige op i hjælpen for den kan andre ting også.
en bemærkning mere: Du kan ikke lave det som en regnearkfunktion. En sådan funktion vil ikke kunne ændre noget som helst på et regneark. Hverken farver, kanter eller diagrammer. Så du er nok nødt til at lave det som en sub uden parametre.
hej bak, jeg var lige ved at rydde op, og så at ovenstående spm ikke er lukket. Jeg ønskede jo egentlig en funktion som kunne oprette et pie-chart, men iflg dit svar kan det ikke lade sig gøre. Dermed kan man jo sige at du (Desværre) gav det svar som spørgsmålet måtte resultere i. Dermed er pointene dine, selv om det ikke fik mig i mål - lægger du et svar...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
