Roni quiere borrar todo en una hoja de trabajo, excepto las celdas que pueden contener fórmulas. Esta tarea se puede completar manualmente o mediante el uso de una macro.

Si desea realizar la limpieza manualmente, puede seguir estos pasos:

  1. Presione F5. Excel muestra el cuadro de diálogo Ir a. (Ver figura 1)

  2. Haga clic en el botón Especial. Excel muestra el cuadro de diálogo Ir a especial.

(Ver figura 2)

  1. Seleccione el botón de opción Constantes. Las cuatro casillas de verificación de la opción Fórmulas estarán disponibles. (Esto puede ser un poco confuso. Por qué Microsoft hizo que el botón de opción Constantes controle algunas casillas de verificación debajo de un botón de opción diferente no está claro de inmediato).

  2. Asegúrese de que todas las casillas de verificación del botón de opción Fórmulas estén seleccionadas. (Deben seleccionarse de forma predeterminada.)

  3. Haga clic en Aceptar. Excel selecciona todas las constantes (celdas que no contienen fórmulas) en la hoja de trabajo.

  4. Presione la tecla Supr.

Esto funciona muy bien si solo necesita borrar los contenidos que no son fórmulas de una hoja de trabajo de vez en cuando. Si necesita hacerlo con más frecuencia, simplemente puede usar la grabadora de macros para grabar los pasos anteriores. O, si lo prefiere, puede crear su propia macro desde cero, como la siguiente:

Sub ClearAllButFormulas()

Dim wks As Worksheet

'ignore errors in case there is only formulas     On Error Resume Next     For Each wks In Worksheets         wks.Cells.SpecialCells(xlCellTypeConstants).ClearContents     Next     On Error GoTo 0     Set wks = Nothing End Sub

Esta macro es particularmente útil si necesita borrar todas las celdas que no son de fórmula en un libro completo. La razón es que realiza el borrado en todas las hojas de trabajo de todo el libro de trabajo, sin que usted tenga que realizar el borrado manualmente.

Debe tener cuidado al utilizar esta macro. Asegúrese de que realmente desea borrar todo, excepto las celdas que contienen fórmulas en la hoja de trabajo o el libro de trabajo antes de ejecutar esta macro. Sería una pena deshacerse accidentalmente del contenido de las celdas que realmente necesita conservar. Si es un poco escrupuloso acerca de tal posibilidad, es posible que desee utilizar la siguiente versión de la macro:

Sub ClearAllButFormulas2()

Dim wks As Worksheet     Dim sTemp As String     Dim iCheck As Integer

sTemp = "This macro deletes everything in the current "

sTemp = sTemp & "workbook except formulas. Once done, "

sTemp = sTemp & "it cannot be undone." & vbCrLf & vbCrLf     sTemp = sTemp & "Are you sure you want to continue?"



iCheck = MsgBox(sTemp, vbYesNo + vbExclamation, "Warning!")



If iCheck = vbYes Then         'ignore errors in case there is only formulas         On Error Resume Next         For Each wks In Worksheets             wks.Cells.SpecialCells(xlCellTypeConstants).ClearContents         Next         On Error GoTo 0     Else         MsgBox "Operation cancelled."

End If End Sub

Esta versión muestra un cuadro de mensaje que le pregunta si está seguro de que desea realizar la limpieza. El resultado es que tiene menos posibilidades de estropear su libro de trabajo por accidente.

_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 (9097) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

link: / excel-Clearing_Everything_Except_Formulas [Eliminando todo excepto las fórmulas].