How to save final data table in PowerPoint?

[#1]

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

[#2]

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

[#3]

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

[#4 · Accepted solution]

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" );

[#5]

I got it. Thanks a lot nelson.

[#6]

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.

[#7]

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;

[#8]

it I preferred the first method, any example scripts?

[#9]

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;

[#10]

Thank you so much.