Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo ocultar la fórmula pero mostrar el resultado sin proteger la hoja de cálculo en Excel?

En algunos casos, es posible que necesite ocultar fórmulas en su hoja de trabajo para uso privado. Este artículo habla de ocultar fórmulas pero mostrar resultados sin proteger la hoja de cálculo en Excel.

Ocultar fórmula pero mostrar el resultado sin proteger la hoja de trabajo con el código VBA


Elimine fácilmente todas las fórmulas de las celdas pero solo conserve los resultados:

Las A real utilidad de Kutools for Excel puede ayudarlo a eliminar rápidamente todas las fórmulas del rango seleccionado pero solo mantener resultados en las celdas. Ver captura de pantalla:

Kutools for Excel incluye más de las útiles herramientas de Excel de 300. Gratis para probar sin limitaciones en los días 60. Descargue la versión de prueba gratuita ahora

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las características avanzadas de 300 a Excel y aumenta su productividad en 80%
  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Kutools funciona con Office 2007-2019 y 365. Es compatible con todos los idiomas y es muy fácil de instalar o implementar. Funciones completas de prueba gratuita de 60-day.

Ocultar fórmula pero mostrar el resultado sin proteger la hoja de trabajo con el código VBA


Para ocultar fórmulas pero mostrar resultados sin proteger una hoja de cálculo, haga lo siguiente.

1. En la hoja de trabajo necesita ocultar fórmulas pero visualizar los resultados, haga clic con el botón derecho en la pestaña de la hoja y seleccione Ver código desde el menú contextual.

2. En el Microsoft Visual Basic para aplicaciones ventana, copie y pegue el código VBA en la ventana Código.

Código de VBA: oculta la fórmula pero muestra el resultado sin proteger la hoja de trabajo

Dim xDic As New Dictionary
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim xCell As Range
    Dim xRg As Range
    Set xRg = Range("C1:C10")
    If xDic.Count <> xRg.Count Then
        For Each xCell In xRg
            xDic.Add xCell.Address, xCell.FormulaR1C1
        Next
    End If
    If (Target.Count = 1) And (Not Application.Intersect(xRg, Target) Is Nothing) And (Target.HasFormula) Then
        With Target
            .Value = .Value
        End With
    Else
        For Each xCell In xRg
            xCell.Formula = xDic.Item(xCell.Address)
        Next
    End If
End Sub

Nota: En el código, C1: C10 es el rango de celda en el que desea ocultar las fórmulas. Por favor, cámbielo según sus necesidades.

3. Luego haga clic Herramientas > Referencias .... Comprobar el Microsoft Script Runtime cuadro y haga clic en el OK botón en el Referencias - VBAProject ventana. Ver captura de pantalla:

4. presione el otro + Q teclas para cerrar el Microsoft Visual Basic para aplicaciones ventana.

A partir de ahora, cuando haga clic en la celda en el rango especificado, la fórmula se ocultará inmediatamente en la barra de fórmulas.


Artículos relacionados:


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    AH · 2 months ago
    If we press and hold the mouse left click to a cell, the formula shows until you release the left click. Otherwise this should work fine.
  • To post as a guest, your comment is unpublished.
    Ajay Bote · 3 months ago
    I tried using the VBA code but after applying this code my excel is getting slow and hanged.please help me in resolving this issue.
  • To post as a guest, your comment is unpublished.
    A.B. Mati · 10 months ago
    There is easy way as well.
    Select the cell or cells you want to hide the formula or data.
    Go to Home --> Format --> Format Cells --> Number --> Custom
    Under Type, Remove General and Enter """"
    The cell value or formula do not appear on the screen
    However it will appear in the Formula bar if you select the cell.
  • To post as a guest, your comment is unpublished.
    mreshane · 1 years ago
    It keep saying debugging and it refresh in every seconds...
  • To post as a guest, your comment is unpublished.
    Sandip · 1 years ago
    I was copied the whole world but still give error as user-defined type not defined so what can I do
  • To post as a guest, your comment is unpublished.
    Jenessy · 1 years ago
    I tried using the VBA code and I was given an error message stating that I needed to debug the following part of the code: " If xDic.Count <> xRg.Count Then"
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Jenessy,
      Which Office version do you use?
      • To post as a guest, your comment is unpublished.
        sabith · 1 years ago
        for me also same error
        office version 2013
        • To post as a guest, your comment is unpublished.
          crystal · 1 years ago
          Good Day,
          Please copy the whole script include the first line "Dim xDic As New Dictionary".
          Miss the first line in the code will cause this error.