251539_de-DE

liliconcom

Betreff: Kopieren von PNG-Bildern aus einer JMP-Datei nach Excel

Hallo @Jackie_ ,

 

Dies ist eine wirklich gute Frage, und ich habe etwas gesucht, konnte aber keine Skriptmethode finden, um den Blob (der in die Excel-Zelle geschrieben wird) in ein Bild auszuwerten, da die Datentabelle als Excel-Datei gespeichert wird . Stattdessen können Sie jedes einzelne Bild im Ausgabeverzeichnis speichern und dann einzeln mit Excel einfügen. Ich habe das mit der Big Class Families.jmp-Datei versucht und folgendes bekommen:

 Möglicherweise können Sie eine Powershell-Datei oder einen anderen Nicht-JMP-Code schreiben, der die Anzahl der Zeilen in der Excel-Datei durchläuft, um Bilder in die entsprechende Zelle einzufügen.

 

Hier ist der Code, mit dem ich gespielt habe, um Ihnen zumindest den Einstieg zu erleichtern - basierend auf Ihrem ursprünglichen Codeabschnitt:

dt = Open( "$Sample_Data/big class families.jmp" );  
OutputFolder = "\Desktop\test"; //or wherever you are saving things

ColNames = dt << Get Column Names("String"); 

DesColumnsList = {"pics"}; 
for(i = 1, i <= N Cols(dt), i++,
  If(Contains(DesColumnsList,ColNames[i]),
    Col = Column(dt,i); // Get Reference for Column 
    Col << Set Selected(1); 
    );
   );
   
dt_New = dt << Subset(Selected Rows(0),Selected Columns(1));  

Close(dt_New,Save(OutputFolder || "\Test.xlsx"));

For (k=1, k<=N Rows(dt), k++,
dt:picture[k]<<SAVE image=""></SAVE>

Es ist wirklich die letzte For-Schleife, die etwas Neues für Sie tut.

 

Ich weiß nicht, wie ich die Bilder in Excel automatisieren kann.

 

Hoffentlich ist das ein Anfang!,

DS

Kopieren von PNG-Bildern aus einer JMP-Datei nach Excel

Ich versuche, die Daten aus der JMP-Datei in Excel zu kopieren.

Hier ist mein Skript:

Wenn ich das Skript ausführe, werden die Daten in Excel kopiert, aber wenn ich die Excel-Datei öffne, werden einige fehlerhafte Werte angezeigt

 

Kann mir jemand dabei helfen?

 

 

dt = Open( "C:\Jay\JMP\JMP data\Images.jmp" );  
OutputFolder = "C:\Jay\JMP\JMP data\Test.xlsx";

ColNames = dt << Get Column Names("String"); 

DesColumnsList = {"pics"}; 
<BR />for(i = 1, i <= N Cols(dt), i++,
  If(Contains(DesColumnsList,ColNames[i]),
    Col = Column(dt,i); // Get Reference for Column 
    Col << Set Selected(1); 
    );
   );
   
dt_New = dt << Subset(Selected Rows(0),Selected Columns(1));  

Close(dt_New,Save(OutputFolder || "Test.xlsx"));

 

Datenzugriff