Automatic resizing of charts

[GJCV]

I am using MS Excell to make bar graphs which I then import into a Corel
Presentation WPG file. I am doing this using the clip board, inserting the
graph as an Excell chart, which then can be edited within Presentations. The
problem I have is that Presentations may or may not resize the chart or
parts of it (for example text font size, or making the graph wider or
taller). This can happen at the moment of inserting (but it does not always
do so, sometimes you have to try a couple of times), and it always happens
after saving and reopening the WPG file. If you have multiple graphs within
the WPG file, they may all look different and I end up re-making the WPG
file almost from scratch.

The only other solution I know is to make a screenshot in Excell, and import
it as a bitmap. But there the problem is resolution, I need to make a
publication quality figure out of it.

Anyone for a solution? Thanks! Gert Jan

Specifics:
Windows XP Pro with all patches and service packs
WordPerfect Office 2002 with all service packs
MS Excell 2002

 

[Ed Ferrero]

Hi Gert,

Save the chart as a gif file, then import that into the presentation. Use a
bit of VBA code like this

Dim myChart As Chart
ActiveSheet.ChartObjects(1).Activate
Set myChart = ActiveChart
myChart.Export "C:\My Documents\MyChart.gif", FilterName:="GIF"

Ed Ferrero

 

[GJCV]

Hi Ed,

Thanks for the suggestion. I tried it and it worked.

However the GIF file is at screen resolution. Is it possible to control the resolution of the GIF file (preferably 600 dpi)?

Gert
===

 

[Jon Peltier]

Gert -

Does Corel accept vector metafiles? Copy the chart as a picture from
Excel (hold shift while clicking on the Edit menu, and Copy turns to
Copy Picture, and select the on screen and as picture options), then
paste that into Corel. It's how I condition charts before their journey
into PowerPoint.

In VBA the copy picture method looks like this:

ActiveSheet.ChartObjects(1).Chart.CopyPicture _
Appearance:=xlScreen, Format:=xlPicture, size:=xlScreen

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

 

[Gert Jan C. Veenstra]

Yes this works quite well. In this way it shows exactly as it was in Excel,
and it does not resize upon closing and re-opening the file. In addition, I
can now export it from the Corel program as a high resolution publication
quality TIF image.

Thank you!

Gert

 

[Jon Peltier]

Glad to help. Thanks for saying it worked, so now I can speak with
confidence about Excel charts in Corel.

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