Передать объект Slide по значению. Создать шаблон слайда

Question

У меня возникли некоторые проблемы с передачей объектов-слайдов по значению вместо ссылки. Цель состоит в том, чтобы сделать "копию" слайда, а не копию адреса памяти, где находится слайд.

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

Я имею:

Call create_slide_template(slide_holder, myPresentation.Slides(1))

ub create_slide_template(by_ref As Slide, ByVal ref_slide As Slide)
    Set by_ref = ref_slide
End Sub

Что я хочу сделать, так это сделать "slide_holder" оригинальную копию myPresentation.Slides(1).

Позже я изменил Slide1, но я не хочу, чтобы "slide_holder" был изменен. Следовательно, мне нужна копия, а не ссылка.

Любая помощь будет оценена.

Благодарю.