В VBAspeak это было бы что-то вроде этого, предполагая ссылку на два слайда в oSldSource и oSldTarget:
Dim oSh as Shape
For Each oSh in oSldSource.Shapes
.Copy
oSldTarget.Shapes.Paste
Next
Вероятно, случится так, что любая фигура, заливке / линии / любому цвету которой назначен один из цветов темы в oSldSource, примет соответствующий цвет темы, когда она попадет в oSrcTarget. Поэтому вы можете выбрать цвет RGB фигуры перед копированием, а затем назначить его обратно после вставки. Это присвоит фигуре фиксированный цвет, а не гибкий цвет темы.