Power Point - Macro unir 2 power point

 
Vista:

Macro unir 2 power point

Publicado por diego (3 intervenciones) el 04/01/2022 22:28:03
Necesito crear una macro que copie todas las diapositivas de una presentación1 al final de una presentación2 que tiene un nº indefinido de diapositivas. ¿Podéis ayudarme con el código?

He visto por internet que el código podría ser:


Ejemplo
En este ejemplo se cortan las diapositivas números tres y cinco de la presentación Old Sales y se insertan antes de la cuarta diapositiva en la presentación activa.

Presentations("Old Sales").Slides.Range(Array(3, 5)).Cut
ActivePresentation.Slides.Paste 4

¿Como podría indicar en la 1º línea que quiero cortar todas las diapositivas? Si hay 5 las 5, pero si hay 10 las 10.
¿Como podría indicar en la2ª línea que tiene que pegar en la última diapositiva del power activo? Unas veces será en la diapositiva 4, y otras en la 20.

Gracias,
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder