BookmarkSubscribe
Choose Language Hide Translation Bar
almighty22
Occasional Contributor

How to save final data table in PowerPoint?

I wish to save the summary data table and show in PowerPoint, so how can I do? Thank you.

0 Kudos
1 ACCEPTED SOLUTION

Accepted Solutions
txnelson
Super User

Re: How to save final data table in PowerPoint?

dt1 = New Table( "Frequency Range",
	New Column( "Frequency Range",
		Character,
		"Nominal",
		Set Values( {"A", "B", "C", "D", "E", "F"} )
	)
) << Update( With( Data Table( "Final table" ) ) );

j1 = dt1 << journal;

j1 << save presentation( "$TEMP/awaw.pptx" );

j1 << close window;

Open( "$TEMP/awaw.pptx" );
Jim
9 REPLIES 9
txnelson
Super User

Re: How to save final data table in PowerPoint?

You need to first place the data table into a JMP Journal and then save it.
The easy way to do this is to use the key stroke Shift / CNTL / J to create a new journal, then click on the data table you want to save, and use the key stroke CNTL / J and it will copy the data table to the journal.
If you have any rows or columns selected, the copy to the journal will copy only the selected rows and columns
Jim
almighty22
Occasional Contributor

Re: How to save final data table in PowerPoint?

Any example scripts for that? How to convert to journal and show in pptx format?

0 Kudos
txnelson
Super User

Re: How to save final data table in PowerPoint?

dt1 = New Table( "Frequency Range",
	New Column( "Frequency Range",
		Character,
		"Nominal",
		Set Values( {"A", "B", "C", "D", "E", "F"} )
	)
) << Update( With( Data Table( "Final table" ) ) );

j1 = dt1 << journal;

j1 << save presentation( "$TEMP/awaw.pptx" );

j1 << close window;

Open( "$TEMP/awaw.pptx" );
Jim
Highlighted
almighty22
Occasional Contributor

Re: How to save final data table in PowerPoint?

I got it. Thanks a lot nelson.
0 Kudos
almighty22
Occasional Contributor

Re: How to save final data table in PowerPoint?

One more question here, after that I want to save this table in the same pptx file with the graph that I have saved before, how can I do that?

myhlb = H List Box();

myhlb << append( Report( gb1 ) );
myhlb << append( Report( gb2 ) );
myhlb << append( Report( gb3 ) );

myhlb2 = H List Box();
myhlb2 << append( myhlb << get picture );
myhlb2 << save presentation( "gbgb.pptx" );
Open( "gbgb.pptx" );


This is the scripts that I used to save my graph in pptx format.

0 Kudos
txnelson
Super User

Re: How to save final data table in PowerPoint?

You will need to restructure your code, to place the H List Box() and/or the picture into the Journal where you have the data table, and then save the Journal.
You also might look into using a New Data Box() to handle it.  Here is the example taken from the Scripting Index on the New Data Box() 

Names Default To Here( 1 );
dtA = Open( "$SAMPLE_DATA/Big Class.jmp", invisible );
New Window( "school",
	H List Box(
		dtA << New Data Box(),
		Text Box(),
		dtA << Distribution(
			ContinuousDistribution( Column( :weight ) ),
			NominalDistribution( Column( :age ) )
		)
	)
);
dtA = 0;
Jim
0 Kudos
almighty22
Occasional Contributor

Re: How to save final data table in PowerPoint?

it I preferred the first method, any example scripts?
0 Kudos
txnelson
Super User

Re: How to save final data table in PowerPoint?

It appears that you need to do some reading.........the Scripting Guide is a must if you are going to be getting into JSL to any extent.  It will really help in seeing all of the objects and functions that are available and how to piece them together.

     Help==>Books==>Scripting Guide

Here is a very simple script that builds a journal

Names Default To Here( 1 );

dt = Open( "$SAMPLE_DATA/big class.jmp" );

nw = New Window( "Example", <<journal );

biv = bivariate( invisible, x( :height ), y( :weight ) );

nw << append( Report( biv ) );

dt << journal;
Jim
almighty22
Occasional Contributor

Re: How to save final data table in PowerPoint?

Thank you so much.
0 Kudos