Как импортировать изображения в определенный слайд презентации Powerpoint?

Question

Я пытался использовать batch впервые, я относительно новичок в сообществе программистов.

Я пытался найти решение, и мне действительно все равно, какой сценарий я должен использовать, но я не нашел решения для своей проблемы.Вот код, который у меня есть:

wscript "VBS\SC5.vbs";
timeout /T 2 /nobreak;
call screenCapture 5.png "[Tool]";

call "C:\Program Files (x86)\Microsoft Office\Office14\POWERPNT.EXE" /N PPT_Template.potx

#Needed Import of Pictures
#(Save of the Powerpoint) Found a solution for that

timeout /T 20 /nobreak
setlocal enableextensions 
set name=%DATE:/=_%
mkdir "%name%"
move *.png %name%
move *.pptx %name%

Код должен просто импортировать одно изображение за раз из папки «x» в презентацию PowerPoint, переключаться на следующий слайд и импортировать следующее изображение.Если возможно, было бы неплохо определить, насколько большим должно быть изображение и где его разместить на слайде, но это не так важно.Я просто хочу продолжить кодирование, и эта проблема застряла у меня надолго.

Answer 1

Вы пытались использовать Com Objects в Powershell?Это может быть удобнее, чем использование cmd.

$Powerpoint = New-Object -ComObject Powerpoint.Application
$yourFileName = "PPT_Template.potx" #Put here the path to your ppt file
$Presentation = $Powerpoint.Presentations.Open($YourFileName,0)
$slideNumber = 1 #The number of the slide where you want to import the picture
$Slide = $Presentation.Slides($slideNumber)
$yourImageName = "your_image.jpg" #The path to your picture
$Slide.Shapes.AddPicture($yourImageName, 0, 1, 10,10 )
$Presentation.Save()
$Powerpoint.Quit()

Размер и положение изображения можно определить, изменив параметры метода AddPicture, см. https://docs.microsoft.com/fr-fr/office/vba/api/powerpoint.shapes.addpicture

Iнадеюсь, это поможет!