-
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
-
Gabriel_86
csendes tag
válasz
Fire/SOUL/CD
#12935
üzenetére
Ez a programkód és ide fel is raktam: [link]
A probléma még mindig az, hogy a makró direktbe beírja a rögzítéskori trendvonal képletét és mindig ugyanazt illeszti be, függetlenül attól, hogy a grafikon adatai változnak és így a trendvonal képlete is.
Lekerekítetttéglalap_Kattintás Makró
'
Range("C1").Select
ActiveCell.FormulaR1C1 = ""
Range("C2").Select
ActiveSheet.ChartObjects("Diagram 1").Activate
ActiveChart.SeriesCollection(1).Trendlines(1).Select
ActiveChart.SetElement (msoElementTrendlineNone)
ActiveChart.SeriesCollection(1).Trendlines.Add
ActiveSheet.ChartObjects("Diagram 1").Activate
ActiveChart.SeriesCollection(1).Trendlines(1).Select
With Selection
.Type = xlPolynomial
.Order = 2
End With
Selection.DisplayEquation = True
ActiveChart.SeriesCollection(1).Trendlines(1).DataLabel.Select
Range("C1").Select
ActiveCell.FormulaR1C1 = "y = 0,0421x2 - 3,4177x + 203,38"
Range("C2").Select
End SubVmi megoldás?
-
poffsoft
veterán
válasz
Fire/SOUL/CD
#12935
üzenetére
Mondjuk az engem is érdekelne, egy grafikonból hogyan tudod kiszedni a polinom képletét.
Ha jól értem, olyan makrót keres, ami magától lefut a grafikon adatainak változ(tat)ásakor, és az új adatokra illesztett polinom képletét mindjárt ki is másolja egy adott cellába...
Új hozzászólás Aktív témák
- MS SQL Server 2016, 2017, 2019
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Autodesk & CorelDRAW - Azonnal - Számlával - Garanciával
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- FarCry 4 Kyrat Edition eladó
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Akció! Csere-Beszámítás! Asus Zenbook 14 UM425IA! R7 4700U / 8GB / 512GB SSD!
- BESZÁMÍTÁS! ASRock H110M i5 6600K 8GB DDR4 120GB SSD 500GB HDD GTX 1050 Ti 4GB Zalman T3 Plus 400W
- ÁRGARANCIA! Épített KomPhone i5 10400F 16/32GB/64GB RAM RTX 5050 8GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! Részletfizetés 0% THM ÚJ GIGABYTE A16 3VH 16" notebook R7 260 16GB RTX 5060 3 év 27%
- LG 25GR75FG - E-Sport Monitor - FHD 360Hz 1ms - NVIDIA Reflex + G-sync - AMD FreeSync - HDR 400
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50