-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
bagira82
csendes tag
Sziasztok!
Excel makró írásban szeretném a segítségeteket kérni.
Négy integer típusú változóban lévő egész számokat szeretnék kördiagramban ábrázolni.
Mivel nem vagyok excel expert, ezért makró rögzítéssel próbáltam elindulni, hogy mégis milyen parancsok kellenek (ezt láthatjátok lentébb)A kérdésem pedig az lenne, hogy hogyan tudok az ActiveChart.SeriesCollection(1).Values függvény után változókat megadni, ha egyáltalán meg lehet ezt így oldani. Ha van más ötlet, azt is szívesen veszem
.ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xl3DPieExploded
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Name = "='Munka5'!$B$1"
ActiveChart.SeriesCollection(1).Values = "='Munka5'!$B$2:$B$7" 'itt szeretnék változókban tárolt számokat megadni
ActiveChart.SeriesCollection(1).XValues = "='Munka5'!$A$2:$A$7" ' itt pedig tengelyfeliratotkat szeretnék szövegesen megdani
ActiveChart.SeriesCollection(1).Select
ActiveChart.SeriesCollection(1).ApplyDataLabelsKöszi szépen előre is!
Üdv
Jani
Új hozzászólás Aktív témák
- Alien Deathstorm: új belső nézetes akció-horrort készít a Rebellion
- Samsung Galaxy S26 Ultra - fontossági sorrend
- Luck Dragon: Asszociációs játék. :)
- Fejhallgató erősítő és DAC topik
- Mibe tegyem a megtakarításaimat?
- Kerékpárosok, bringások ide!
- Last Epoch
- Renault, Dacia topik
- Raspberry Pi
- Tőzsde és gazdaság
- További aktív témák...
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- PC Játékok (Márc 26. UP!) Olvass...
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- 236 - Lenovo Legion Pro 7 (16IRX9H) - Intel Core i9-14900HX, RTX 4090
- AKCIÓ! Gigabyte G1.Sniper Z97 chipset alaplap garanciával hibátlan működéssel
- Új MSI 15 Katana FHD IPS 144Hz i7-13620H 10mag 16GB DDR5 1TB SSD Nvidia RTX 4060 8GB Win11 Garancia
- Lenovo ThinkPad L13 Gen 3 13,3" - i5 1235U, 16GB RAM, SSD, jó akku, magyar bill. - számla, 6 hó gar
- Telefon felvásárlás!! Apple Watch Series 6/Apple Watch Series 7/Apple Watch Series 8
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
.
Fferi50