Copy ActiveChart properties to cell (from graphics)
Solved/Closed
Related:
- Copy ActiveChart properties to cell (from graphics)
- Nvidia graphics driver auto detect - Guide
- 4k graphics card - Guide
- Fifa 07 requires hardware graphics acceleration - Hardware Forum
- Excel formula to subtract one cell from another - Excel Forum
- Fifa 08 requires hardware graphics acceleration - Video Games Forum
2 responses
TrowaD
Posts
2921
Registration date
Sunday September 12, 2010
Status
Moderator
Last seen
December 27, 2022
552
Feb 2, 2017 at 11:37 AM
Feb 2, 2017 at 11:37 AM
Hi Mendokzeni,
When you put the below piece of code at the end of your code, then the Equation value will be put in H1 and the RSquared will be put in H2. Change those cell references to put the values in a place to your liking.
Here is the piece of code:
Best regards,
Trowa
When you put the below piece of code at the end of your code, then the Equation value will be put in H1 and the RSquared will be put in H2. Change those cell references to put the values in a place to your liking.
Here is the piece of code:
Dim myER As String Dim sNumb As Integer ActiveChart.FullSeriesCollection(1).Trendlines(1).Select myER = Selection.DataLabel.Text sNumb = InStr(myER, "") Range("H1").Value = Left(myER, sNumb - 1) Range("H2").Value = Right(myER, Len(myER) - sNumb)
Best regards,
Trowa