Solved

Error when exporting from excel to powerpoint

Posted on 2014-01-06
10
401 Views
Last Modified: 2014-01-09
I have used this same code countless times, but all of a sudden I'm getting errors.  In fact, I execute the same code multiple times in the same macro, but I only seem to have a problem on this one slide.  For simplicity, I've extracted just the snippet I'm having trouble with and attached it here.  I'm certainly confused why I'm having a problem pasting here, but that is where it is getting hung up.  

This was working when I copied just the chart, but when I changed it to copy a range of cells, I started getting this error (I do it both ways for different slides, depending on whether or not I need data that is in a cell outside of the chart).

Also, it seems to be taking an inordinate amount of time to get through the copy step.  Again, I've run similar code for years but it's never taken so long to execute.  The entire macro exports data to a presentation with 15 slides, and on some computers it has taken upwards of 30-45 seconds to run, which seems ridiculous (that was before I started getting this error).  Is there a way I can make this execute more quickly?

As always, your help is appreciated!
0
Comment
Question by:Rich5150
  • 5
  • 3
  • 2
10 Comments
 

Author Comment

by:Rich5150
Comment Utility
Here are the files for your testing.
Excel-example.xlsm
powerpoint-example.pptx
0
 
LVL 65

Expert Comment

by:RobSampson
Comment Utility
Hi, under
    Set pptApp = CreateObject("PowerPoint.Application")

Try adding
    pptApp.Visible = True

Regards,

Rob.
0
 

Author Comment

by:Rich5150
Comment Utility
That won't have any impact whatsoever on resolving this issue.  I did it anyway, and it still takes forever to execute and I still get the error.  

As I said before, the chart in the example file is actually the fifth item to be exported in my main file, and the first four work just great using the same code, which is what has me so perplexed.

FYI - I also tried running code cleaner on it but it had no effect.
0
 
LVL 65

Expert Comment

by:RobSampson
Comment Utility
I can't reproduce the error. Can you please post details of the error and the debug line?
0
 

Author Comment

by:Rich5150
Comment Utility
You bet.  I know I'm stating the obvious, but I'm running the CreatePresentation macro which exports the chart on the Timeline worksheet to the PowerPoint file called powerpoint example, so you have to save both files to your hard drive before running that macro.  I have a button in my main file that executes that macro but I didn't think it that was necessary here.

Here is the error message:
error message
and the debug line:
debug line
0
6 Surprising Benefits of Threat Intelligence

All sorts of threat intelligence is available on the web. Intelligence you can learn from, and use to anticipate and prepare for future attacks.

 
LVL 23

Accepted Solution

by:
JSRWilson earned 500 total points
Comment Utility
Hi Rich

You have the name of the Presentation wrong in the download I have - there's a hyphen missing. I guess this is a typo though.

When I step through your code

This line
Worksheets("timeline").Range("a1:k37").CopyPicture Appearance:=xlPrinter, Format:=xlPicture

Does not copy the range and the clipboard is empty.

Try using Appearance:=xlScreen instead of xlPrinter see if that helps.
0
 

Author Comment

by:Rich5150
Comment Utility
I don't know where the hyphen came from.  There is no hyphen in the file name that I uploaded.  Anyhow, I've done a few more tests on those files.  If I don't have the chart there, everything executes well.  If I have the chart there with no data (ie, nothing graphed and no links to data), then it executes well.  However, with the data linked to the chart, it will not execute.  I'm assuming this is why Rob was unable to see the error, since when I opened the file that I had uploaded, it broke the links to the data in the original file.  That's my fault, but I wasn't considering that the data links could be the problem.

I've never run into this before.  This is a very complex graph that is created by another macro, but why would that make any difference if I'm simply copying a range of cells as a picture and then exporting that picture to PowerPoint?

This did work when I referenced the actual chart (as opposed to a range of cells) and copied that into PowerPoint as a picture, but as I mentioned before, this macro runs very slowly, and now I'm thinking that that also has something to do with the complexity of the graph.  Unfortunately I don't have any ideas on what to do about it.
0
 
LVL 23

Expert Comment

by:JSRWilson
Comment Utility
Using the default xlScreen it ran much faster for me and no error. No idea why though!
0
 

Author Comment

by:Rich5150
Comment Utility
JSRwilson,
Just tried your suggestion and it worked.  Also sped things up a bit.  Like you, I don't really know why.  Maybe some Microsoft engineer out there does.  Thanks for your suggestion!
0
 
LVL 65

Expert Comment

by:RobSampson
Comment Utility
Here is the documentation for the CopyPicture method:
http://msdn.microsoft.com/en-us/library/office/ff821596.aspx

xlPrinter appears to copy the picture as it would be printed.  I assume this puts the picture object through the printing process and renders it differently according to the print driver, and this may slow things down.   The default value is xlScreen anyway, so it would be best to leave it that way.

Regards,

Rob.
0

Featured Post

Free Trending Threat Insights Every Day

Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.

Join & Write a Comment

Background   Certain code in VBA requires initialization, such as application events. The app initialization is often triggered by the Auto_Open sub which is a special procedure that runs when an add-in loads. More significantly, this sub does n…
Preface: When I started this series, I used the term CommandBars because that is the Office Object class that it discusses. Unfortunately, when Microsoft introduced Office 2007, they replaced the standard Commandbar menus with "The Ribbon" and rem…
This Micro Tutorial will demonstrate in Google Sheets how to use the HYPERLINK function to create live links inside your spreadsheet.
This Micro Tutorial will demonstrate how to use a scrolling table in Microsoft Excel using the INDEX function.

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now