LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 12
Default getting the active chart/chartobject's name

How about this?


With .ActiveWorkbook
.Sheets("Sheet1").Select
.ActiveSheet.ChartObjects("Chart 1").Activate
.ActiveChart.ChartArea.Copy
End With


On Dec 21, 11:26*am, Stanley wrote:
Given the code below, does anyone have any suggestions on how to
obtain the active chart/chartobject's name so that I can address
Shape(name) properly when I try ot move the shape?

Code:
 Sub LT(wbname As String, wsname As String) * ' Graphing Lifetime
 Results
 * * Dim normalgraph As Chart * * * * * * * *' normal graph variable
 * * Dim regressgraph As Chart * * * * * * * ' regression graph
 variable
 * * Dim twoGraphs As ChartObjects * * * * * * *'Chartobjects for
 embedded charts

 * * Dim ngName As String * * * * * * * *'normal graph name for moving
 the chart
 * * Dim rgName As String * * * * * * * *'regression graph name for
 moving the chart

 * * Dim i As Long * * * * * * * * * * * * * ' loop counter
 * * Dim colEnd As Long * * * * * * * * * * * * ' end of a column

 * * Workbooks(wbname).Sheets(wsname).Activate * * * 'activate
 worksheet of interest

 * * Let colEnd = Range("c2").End(xlDown).Row

 * * ' Select data range
 * * Range(Cells(2, 2), Cells(colEnd, 6)).Select

 * * ' insert new graph for showing Fuel cell voltage, flow,
 temperature,
 * * ' and fuel cell current
 * * Set normalgraph = Charts.Add
 * * Set normalgraph = normalgraph.Location(whe=xlLocationAsObject,
 Name:=wsname)
 * * ngName = normalgraph.Name

 * * 'more code

Thanks!


 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
can't active chart [email protected] Charts and Charting in Excel 0 September 15th 07 07:05 PM
Chart & Active Sheet Ardy Excel Programming 2 February 9th 07 01:00 PM
active chart- please help Rob Charts and Charting in Excel 1 April 27th 05 03:08 AM
Dynamically chart active row Patti Charts and Charting in Excel 7 April 4th 05 03:39 PM
How to embed chart in active worksheet with VBA? deko[_2_] Excel Programming 9 March 4th 05 05:39 AM


All times are GMT +1. The time now is 09:19 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"