879825_zh-TW

liliconcom

匯出到 Powerpoint

我一直在尋找更好的方法，將一系列 JMP 圖表匯出到 PowerPoint 或 Word。原生匯出功能非常乏味，如果有人成功操作過，我希望能夠以某種方式進行操作。我可以在 PowerPoint 中錄製和修改巨集來完成這項工作，但我希望有比這更好的方法。

自動化和腳本回覆：匯出至 Powerpoint

我開始使用 python-pptx 進行示範。它功能強大，但文件略顯不足。我喜歡建立 PowerPoint 佈局，然後將其儲存為通用演示文稿，然後使用 JMP 視窗結合使用者輸入來建立我的 Python 程式碼。

我的 PowerPoint 簡報腳本第一部分的範例：

pycode = Eval Insert(
	"\[from pptx import Presentation
from PIL import Image, ImageEnhance
import io
p = Presentation(r'^template_path^')
slid = p.slides[0]
mom = slid.shapes[1]
slid.shapes.title.text = '^pres^'
mom.text = '^name^'
for x in range(^Char( total_items )^):
	print("""adding placeholder slides....
    """ + str(x + 1) + ' out of ^Char( total_items )^')
	p.slides.add_slide(p.slide_layouts[6])
]\"
);

之後，它會循環遍歷我保存的樣本檢查圖像資料夾。您可以建立圖表並將其儲存為 jpg 檔案。以下程式碼會從條件表中添加信息，從資料夾中僅提取 jpg 文件，並在將圖像放入幻燈片之前增強一些較暗的圖片。選項幾乎無窮無盡。

For Each( {v, i}, sub_folders,
	condition = Left( Right( v, 4 ), 2 );
	pycode ||= Eval Insert(
		"slid = p.slides[^Char( i )^]
slid1 = slid.placeholders[10]
slid2 = slid.placeholders[11]
slid3 = slid.placeholders[12]
slid4 = slid.placeholders[13]
slid5 = slid.placeholders[14]
slid6 = slid.placeholders[15]
slid7 = slid.placeholders[16]
slid8 = slid.placeholders[17]
slid.shapes.title.text = \!"\!"\!"^v || Try( \!":  \!" || cond_array[condition], \!"\!" )^\!"\!"\!"\!N"
	);
	pics = Filter Each( {value, index}, Files In Directory( thefolder || v ),
		And( Ends With( Lowercase( value ), "jpg" ), !Contains( value, "_APA_" ) )
	);
	pycode ||= Eval Insert(
		"slid1.insert_picture(r'^thefolder || v || \!"/\!" || pics[1]^')
slid2.insert_picture(r'^thefolder || v || \!"/\!" || pics[3]^')
img = Image.open(r'^thefolder || v || \!"/\!" || pics[5]^')
enh = ImageEnhance.Brightness(img)
img = enh.enhance(3)
img2 = io.BytesIO()
img.save(img2, 'JPEG')
slid3.insert_picture(img2)
img = Image.open(r'^thefolder || v || \!"/\!" || pics[7]^')
enh = ImageEnhance.Brightness(img)
img = enh.enhance(2)
img2 = io.BytesIO()
img.save(img2, 'JPEG')
slid4.insert_picture(img2)
slid5.insert_picture(r'^thefolder || v || \!"/\!" || pics[2]^')
slid6.insert_picture(r'^thefolder || v || \!"/\!" || pics[4]^')
img = Image.open(r'^thefolder || v || \!"/\!" || pics[6]^')
enh = ImageEnhance.Brightness(img)
img = enh.enhance(3)
img2 = io.BytesIO()
img.save(img2, 'JPEG')
slid7.insert_picture(img2)
img = Image.open(r'^thefolder || v || \!"/\!" || pics[8]^')
enh = ImageEnhance.Brightness(img)
img = enh.enhance(2)
img2 = io.BytesIO()
img.save(img2, 'JPEG')
slid8.insert_picture(img2)
print('^Char( i )^ of ^Char( Length( sub_folders ) )^ complete....')\!N"
	);
);
pycode ||= Eval Insert( "\[p.slides.add_slide(p.slide_layouts[4])
p.save(r'^pptx_savefile^')
]\" );

我使用佔位符來簡化圖像插入，但您可以直接添加圖像並指定大小和位置。