보고 할 여러 GIF 파일 추가여보세요,
나는 다른 테이블에서 다른 데이터를 모니터링하기 위해 실행되는 몇 가지 스크립트를 가지고있다.
모든 차트는 C : \ Customer \ Data에 GIF 파일로 저장됩니다.
제목 슬라이드 = Gif 파일 이름으로 슬라이드 당 하나의 GIF 파일로 ppt를 만들고 싶습니다.
아래의 스크립트는 3 개의 GIF만으로 ppt를 만들 수 있습니다.
NewReport= new window("New report",
V List Box(
Outline box(
"Gif1",
Picture Box( Open("C:\Customer\Data\Gif1.gif", gif ));
),
Outline box(
"Gif2",
Picture Box( Open("C:\Customer\Data\Gif2.gif", gif ));
),
Outline box(
"Gif3",
Picture Box( Open("C:\Customer\Data\Gif3.gif", gif ));
),
););
NewReport << Save Presentation( "C:\Customer\Report\NewReport.pptx", Insert(2), "GIF" );
아래의 스크립트를 수정하여 데이터 폴더의 모든 GIF 파일을 추가했지만 작동하지 않습니다.
mypath =("C:\Customer\Data\");
FileName = Files in Directory(mypath);
NewReport= new window("New report",
V List Box(
For (i=1, i<=N items(FileName), i++,
Outline box(
""||FileName[i]||"",
Picture Box( Open("C:\Customer\Data\"||FileName[i]||"", gif )),
),
);
););
NewReport << Save Presentation( "C:\Customer\Report\NewReport.pptx", Insert(2), "GIF" );
당신의 도움을 주셔서 감사합니다
Geof
다시 : 보고서에 여러 GIF 파일을 추가잘 작동합니다!
고맙습니다
같은 하위 사진이 아니지만 비율을 변경하지 않고도 ppt 슬라이드에서 가능한 한 큰 그림을 만들 수있는 설정은 무엇입니까? 자동 적합?다시 : 보고서에 여러 GIF 파일을 추가실제로 스크립트를 사용하지 않고 스크립트를 작성할 수는 없으므로 Mac에서 JMP를 사용하여 상황을 비웃었습니다. 따라서 조금 다를 것이지만 Windows로 번역 할 수는 있습니다.
current_directory = convert file path (".");
FileName = Files in Directory (Current_directory||"Pictures");
OB_Expr = Expr(
Outline Box( "" || dv_FileName || "", Picture Box( Open( current_directory||"pictures/" || dv_FileName || "", jpg ) ), )
);
NewReport = New Window( "New report" );
For( i = 1, i <= N Items( FileName ), i++,
NewReport << append( eval(Substitute( Name Expr( OB_Expr ), Expr( dv_filename ), FileName[i] ) ))
);
NewReport << Save Presentation( "C:\Customer\Report\NewReport.pptx", Insert( 2 ), "GIF" );
다시 : 보고서에 여러 GIF 파일을 추가Geoff - 한 가지는 스크립트에 쉼표를 두 개 더 추가해야하는데 필요하지 않은 것이지만 문제가 있는지 확실하지 않습니다.
이걸 보면서 - 다음과 같이 New Window를 설정했습니다.
NewReport = New Window( "New report");
루프를 자체적으로 추가하고 append를 사용합니다.
NewReport << Append ( Picture Box( Open( "C:\Customer\Data\" || FileName[i] || "", gif ) )
이제 OutlineBox가 빠져 있습니다. 따라서 Expr ()을 사용하여 좀 더 복잡하게 처리해야합니다. - 너는 그걸 잘 알고 있니?
네가 원한다면 너를 위해 뭔가 쓸 수있어.
