Cuando trabaja con otras personas que usan Excel, no es inusual copiar hojas de trabajo de sus libros en su propio libro. Cuando lo hace, la hoja de trabajo no es lo único que se copia; Excel también copia sus estilos de formato en su libro de trabajo. Eliminar manualmente los estilos no deseados puede ser complicado, dependiendo de la cantidad de estilos. Sin embargo, eliminar estilos definidos por el usuario es muy fácil si utiliza una macro. La siguiente macro eliminará rápidamente los estilos no deseados:

Sub StyleKill()

Dim styT As Style     Dim intRet As Integer

For Each styT In ActiveWorkbook.Styles         If Not styT.BuiltIn Then             intRet = MsgBox("Delete style '" & styT.Name & "'?", vbYesNo)

If intRet = vbYes Then styT.Delete         End If     Next styT End Sub

La macro solo necesita una pequeña entrada del usuario. Siempre que la macro detecta un estilo definido por el usuario, se le pregunta si desea eliminarlo. Al hacer clic en el botón Sí, el estilo se elimina del libro de trabajo.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (2135) se aplica a Microsoft Excel 97, 2000, 2002 y 2003. Puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y posterior) aquí:

link: / excelribbon-Deleting_Unwanted_Styles [Eliminando estilos no deseados].