Mis disculpas por volver a abrir este mensaje. He realizado algunas pruebas con esto, y mis hallazgos son los siguientes.
Supongamos que estamos utilizando la opción "Pegado especial - Todo usando el tema de origen", solo se conservarían los datos y el formato de la hoja de cálculo original, los objetos flotantes no se copiarían. Esta opción solo funcionará cuando no haya objetos flotantes (gráficos, diagramas, formas) en esa hoja de cálculo. VBA:
Cells.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=False, Transpose:=False
Para conservar todo el contenido relacionado con una hoja (incluidos los objetos flotantes) uno tendría que mover/copiar la hoja al libro de trabajo nuevo/destino. Al hacer esto, todos los colores cambiarían a un tema diferente, incluidos los colores de los gráficos. Esto ocurre incluso cuando las paletas de colores de ambos libros de trabajo son iguales.
He adjuntado un archivo para que juegues. Intenta copiar/mover la hoja a un nuevo libro de trabajo y ver qué sucede, este archivo proviene de una plataforma Office 2010. Estoy usando Office 365 en Win8, y estos colores estándar cambian a diferentes tonos de amarillo y gris.
Este problema no está presente cuando estás utilizando libros de trabajo creados desde cero en Office 365, pero en archivos creados con versiones anteriores de Office, el problema no se resuelve al utilizar una versión posterior de Office.
LA SOLUCIÓN: Diseño de página ---> Colores ---> Office 2007-2010
Y en VBA:
ActiveWorkbook.Theme.ThemeColorScheme.Load ( _
"C:\Program Files\Microsoft Office 15\Root\Document Themes 15\Theme Colors\Office 2007 - 2010.xml" _
)