WICHTIG: Der Betrieb von goMatlab.de wird privat finanziert fortgesetzt. - Mehr Infos...

Mein MATLAB Forum - goMatlab.de

Mein MATLAB Forum

 
Gast > Registrieren       Autologin?   

Partner:




Forum
      Option
[Erweitert]
  • Diese Seite per Mail weiterempfehlen
     


Gehe zu:  
Neues Thema eröffnen Neue Antwort erstellen

saveppt Error Clipboard empty

 

R0b1
Forum-Anfänger

Forum-Anfänger


Beiträge: 34
Anmeldedatum: 11.01.13
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 25.04.2014, 10:04     Titel: saveppt Error Clipboard empty
  Antworten mit Zitat      
Hallo Gemeinde,

ich habe hier einen nervigen Fehler, der manchmal auftritt. Ich möchte ein figure in eine ppt speichern und nutze dafür die Funktion saveppt. Bei manchen klappt das, bei anderen nicht.
Da ich nicht weiß, ob diese Standard ist oder nicht, poste ich sie ganz unten.

Folgender Fehler erscheint:
Code:
Error using Interface.91493475_5A91_11CF_8700_00AA0060263B/Paste
Invoke Error, Dispatch Exception:
Source: Microsoft PowerPoint 2010
Description: Shapes.Paste : Invalid request.  Clipboard is empty or contains data which may not be
pasted here.
Help File:
Help Context ID: 0

Error in saveppt (line 53)
pic1 = invoke(new_slide.Shapes,'Paste');

Error in auswertung (line 67)
    saveppt('D:\test.ppt', ['FZGM00' dateizahl num2str(i)])



Funktion saveppt:
Code:
function saveppt(filespec,titletext,prnopt)

% Establish valid file name:
if nargin<1 || isempty(filespec);
  [fname, fpath] = uiputfile('*.ppt');
  if fpath == 0; return; end
  filespec = fullfile(fpath,fname);
else
  [fpath,fname,fext] = fileparts(filespec);
  if isempty(fpath); fpath = pwd; end
  if isempty(fext); fext = '.ppt'; end
  filespec = fullfile(fpath,[fname,fext]);
end

% Default title text:
if nargin<2
  titletext = '';
end

% Start an ActiveX session with PowerPoint:
ppt = actxserver('PowerPoint.Application');

% Capture current figure/model into clipboard:
if nargin<3
  print -dmeta
else
  print('-dmeta',prnopt)
end

if ~exist(filespec,'file');
  % Create new presentation:
  op = invoke(ppt.Presentations,'Add');
else
  % Open existing presentation:
  op = invoke(ppt.Presentations,'Open',filespec,[],[],0);
end

% Get current number of slides:
slide_count = get(op.Slides,'Count');

% Add a new slide (with title object):
slide_count = int32(double(slide_count)+1);
new_slide = invoke(op.Slides,'Add',slide_count,11);

% Insert text into the title object:
set(new_slide.Shapes.Title.TextFrame.TextRange,'Text',titletext);

% Get height and width of slide:
slide_H = op.PageSetup.SlideHeight;
slide_W = op.PageSetup.SlideWidth;

% Paste the contents of the Clipboard:
pic1 = invoke(new_slide.Shapes,'Paste');

% Get height and width of picture:
pic_H = get(pic1,'Height');
pic_W = get(pic1,'Width');

% Center picture on page (below title area):
set(pic1,'Left',single((double(slide_W) - double(pic_W))/2));
set(pic1,'Top',single(double(slide_H) - double(pic_H)));

if ~exist(filespec,'file')
  % Save file as new:
  invoke(op,'SaveAs',filespec,1);
else
  % Save existing file:
  invoke(op,'Save');
end

% Close the presentation window:
invoke(op,'Close');

% Quit PowerPoint
invoke(ppt,'Quit');

return
Private Nachricht senden Benutzer-Profile anzeigen


Jan S
Moderator

Moderator


Beiträge: 11.057
Anmeldedatum: 08.07.10
Wohnort: Heidelberg
Version: 2009a, 2016b
     Beitrag Verfasst am: 25.04.2014, 20:43     Titel: Re: saveppt Error Clipboard empty
  Antworten mit Zitat      
Hallo R0b1,

Bei welchen Daten funktioniert es denn nicht und ist der Fehler reproduzierbar?

Gruß, Jan
Private Nachricht senden Benutzer-Profile anzeigen
 
R0b1
Themenstarter

Forum-Anfänger

Forum-Anfänger


Beiträge: 34
Anmeldedatum: 11.01.13
Wohnort: ---
Version: ---
     Beitrag Verfasst am: 28.04.2014, 10:00     Titel:
  Antworten mit Zitat      
Hallo Jan,

mir ist soeben aufgefallen, dass es nur der Fall ist, wenn ich etwas mit "stem" in ein figure geplottet habe. Nutze ich statt "stem" den "plot"-Befehl funktioniert alles.

Damit wäre die Sache eigentlich gegessen, es wäre natürlich trotzdem sehr interessant, wo das Problem liegt.
Private Nachricht senden Benutzer-Profile anzeigen
 
Jan S
Moderator

Moderator


Beiträge: 11.057
Anmeldedatum: 08.07.10
Wohnort: Heidelberg
Version: 2009a, 2016b
     Beitrag Verfasst am: 30.04.2014, 00:00     Titel:
  Antworten mit Zitat      
Hallo R0b1,

Und wird beim Aufruf von STEM automatisch der OpenGL-Renderer aktiviert?

Gruß, Jan
Private Nachricht senden Benutzer-Profile anzeigen
 
Neues Thema eröffnen Neue Antwort erstellen



Einstellungen und Berechtigungen
Beiträge der letzten Zeit anzeigen:

Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen
.





 Impressum  | Nutzungsbedingungen  | Datenschutz | FAQ | goMatlab RSS Button RSS

Hosted by:


Copyright © 2007 - 2025 goMatlab.de | Dies ist keine offizielle Website der Firma The Mathworks

MATLAB, Simulink, Stateflow, Handle Graphics, Real-Time Workshop, SimBiology, SimHydraulics, SimEvents, and xPC TargetBox are registered trademarks and The MathWorks, the L-shaped membrane logo, and Embedded MATLAB are trademarks of The MathWorks, Inc.