-
GAMEPOD.hu
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
-
Delila_1
Topikgazda
válasz
bagira82 #21784 üzenetére
Sub diagram()
ertekek = Array(103, 405, 349, 532)
tengely = Array("Anna", "Teri", "Emil", "Ida")
ActiveSheet.Shapes.AddChart.Select
With ActiveChart
.ChartType = xl3DPieExploded
.SeriesCollection.NewSeries
With .SeriesCollection(1)
.Name = "='Munka5'!$B$1"
.Values = ertekek
.XValues = tengely
.ApplyDataLabels
End With
End With
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
- Cégek számára kedvezmény! Irodai programok: Office, Word, Excel
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows 10/11 Home/Pro , Office OEM/Retail kulcsok
- Autómatricák a legjobb minőségben, több ezer minta! PH tagoknak 30% kedvezmény!