ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   graph (https://www.excelbanter.com/excel-programming/311561-graph.html)

eli5m

graph
 

1. how do i delete graphs from worksheet


2. i create 2 graphs in one sheet - i need to move it to right side
used this code :

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).IncrementLeft 140.5
ActiveSheet.Shapes(ChartName).IncrementTop 100.25

but the problem is when i copy the excel file to a different compute
the location
is changing ... so how do i make it fit to all??

--
eli5
-----------------------------------------------------------------------
eli5m's Profile: http://www.excelforum.com/member.php...fo&userid=1475
View this thread: http://www.excelforum.com/showthread.php?threadid=26380


Tod[_4_]

graph
 
Try relating the chart's new position to the left and top
of the worksheet, like this:

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).Left = 300
ActiveSheet.Shapes(ChartName).Top = 200

Adjust these until the chart shows up where you want it.

You can also put the upper-left corner of the chart in a
certain cell like this:

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).Left = _
ActiveSheet.Range("J10").Left
ActiveSheet.Shapes(ChartName).Top = _
ActiveSheet.Range("J10").Top

tod


-----Original Message-----

1. how do i delete graphs from worksheet


2. i create 2 graphs in one sheet - i need to move it to

right side i
used this code :

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).IncrementLeft 140.5
ActiveSheet.Shapes(ChartName).IncrementTop 100.25

but the problem is when i copy the excel file to a

different computer
the location
is changing ... so how do i make it fit to all???


--
eli5m
---------------------------------------------------------

---------------
eli5m's Profile: http://www.excelforum.com/member.php?

action=getinfo&userid=14756
View this thread:

http://www.excelforum.com/showthread...hreadid=263803

.


Jon Peltier[_8_]

graph
 
Don't spend so much time selecting everything.

To get two charts side by side, try this:

With ActiveSheet
.ChartObjects(1).Left = 0
.ChartObjects(2).Left = .ChartObjects(1).Width
.ChartObjects(2).Top = .ChartObjects(1).Top
End With

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Peltier Technical Services
Tutorials and Custom Solutions
http://PeltierTech.com/
_______


Tod wrote:

Try relating the chart's new position to the left and top
of the worksheet, like this:

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).Left = 300
ActiveSheet.Shapes(ChartName).Top = 200

Adjust these until the chart shows up where you want it.

You can also put the upper-left corner of the chart in a
certain cell like this:

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).Left = _
ActiveSheet.Range("J10").Left
ActiveSheet.Shapes(ChartName).Top = _
ActiveSheet.Range("J10").Top

tod



-----Original Message-----

1. how do i delete graphs from worksheet


2. i create 2 graphs in one sheet - i need to move it to


right side i

used this code :

ActiveChart.ChartArea.Select
ActiveSheet.Shapes(ChartName).IncrementLeft 140.5
ActiveSheet.Shapes(ChartName).IncrementTop 100.25

but the problem is when i copy the excel file to a


different computer

the location
is changing ... so how do i make it fit to all???


--
eli5m
---------------------------------------------------------


---------------

eli5m's Profile: http://www.excelforum.com/member.php?


action=getinfo&userid=14756

View this thread:


http://www.excelforum.com/showthread...hreadid=263803

.




All times are GMT +1. The time now is 06:10 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com