Note: The other languages of the website are Google-translated. Back to English

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

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

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


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

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

1. En la hoja de trabajo necesita ocultar las fórmulas pero mostrar los resultados, haga clic 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: ocultar la fórmula pero mostrar 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 celdas en el que desea ocultar las fórmulas. Cámbielo según sus necesidades.

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

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

De ahora en adelante, 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:


Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

  • Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas 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 Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
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

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Comentarios (20)
5 clasificado de 5 · 1 calificaciones
Este comentario fue minimizado por el moderador en el sitio
Intenté usar el código VBA y recibí un mensaje de error que indicaba que necesitaba depurar la siguiente parte del código: " If xDic.Count <> xRg.Count Then"
Este comentario fue minimizado por el moderador en el sitio
Estimado cliente,
¿Qué versión de Office usas?
Este comentario fue minimizado por el moderador en el sitio
para mi tambien el mismo error
versión ofimática 2013
Este comentario fue minimizado por el moderador en el sitio
Buenos días,
Copie todo el script e incluya la primera línea "Dim xDic As New Dictionary".
Omitir la primera línea en el código causará este error.
Este comentario fue minimizado por el moderador en el sitio
a mi tambien me sale el mismo error
Este comentario fue minimizado por el moderador en el sitio
Me copiaron todo el mundo, pero sigo dando un error como tipo definido por el usuario no definido, entonces, ¿qué puedo hacer?
Este comentario fue minimizado por el moderador en el sitio
Marque una referencia a una biblioteca de objetos de datos Active X de Microsoft en el editor de VBA.


1. Abra el editor de VBA y vaya a Herramientas | Referencias.


2. Desplácese hacia abajo hasta que vea la biblioteca de objetos de datos de Microsoft Active X.


3. Si tiene varias versiones, use la última versión. Las versiones corresponderán a las versiones de MDAC. La única vez que no querrá usar la última versión es si está distribuyendo el Proyecto a una máquina que tiene una versión anterior. Por lo tanto, si las máquinas que está distribuyendo solo tienen instalado MDAC 2.6 y usted tiene MDAC 2.7, verifique la referencia a la versión 2.6 de Microsoft Active X Data Object Library para asegurarse de que el Proyecto funcionará en las máquinas a las que lo está distribuyendo.
MÁS
Tiempo de ejecución de secuencias de comandos de Microsoft
Este comentario fue minimizado por el moderador en el sitio
Sigue diciendo depuración y se actualiza cada segundo ...
Este comentario fue minimizado por el moderador en el sitio
Hay una manera fácil también.
Seleccione la celda o celdas en las que desea ocultar la fórmula o los datos.
Vaya a Inicio --> Formato --> Formato de celdas --> Número --> Personalizado
En Tipo, Quitar General e Ingresar """"
El valor de la celda o la fórmula no aparecen en la pantalla
Sin embargo, aparecerá en la barra de fórmulas si selecciona la celda.
Este comentario fue minimizado por el moderador en el sitio
Intenté usar el código VBA, pero después de aplicar este código, mi Excel se está volviendo lento y bloqueado. Por favor, ayúdenme a resolver este problema.
Este comentario fue minimizado por el moderador en el sitio
Si presionamos y mantenemos presionado el clic izquierdo del mouse en una celda, la fórmula se muestra hasta que suelte el clic izquierdo. De lo contrario, esto debería funcionar bien.
Este comentario fue minimizado por el moderador en el sitio
después de que este código vba aplique el nuevo resultado de la fórmula de suma que no se muestra en la celda, por favor ayuda....
Este comentario fue minimizado por el moderador en el sitio
Gracias. Fórmula trabajada.
Este comentario fue minimizado por el moderador en el sitio
Hola, soy Gracy, estoy tratando de ocultar la fórmula en una columna en particular sin contraseña que proteja la hoja. Copié, pegué todo el código y cambié las celdas, pero aún no puedo ocultar la fórmula. ¿Puedes ayudarme?

Este comentario fue minimizado por el moderador en el sitio
la fórmula funcionó, pero el problema es que cuando cerramos la hoja y la volvemos a abrir, VBA no funcionó ...
Este comentario fue minimizado por el moderador en el sitio
Hola, para continuar usando este VBA en el futuro, después de agregar el código, guarde el libro de trabajo como un libro de trabajo habilitado para macros de Excel. Haga clic en Declarar impuestos > Guardar como. En el cuadro de diálogo Guardar como, seleccione Libro de Excel habilitado para macros de Guardar como escriba la lista desplegable, luego haga clic en el a Salvar botón. Y luego use este libro de Excel habilitado para macros en el futuro.
Este comentario fue minimizado por el moderador en el sitio
Gracias por este código, realmente necesitaba algo como esto.
5 clasificado de 5
Este comentario fue minimizado por el moderador en el sitio
dia tetap cargando ya ko ?
Este comentario fue minimizado por el moderador en el sitio
saya da coba sesuai codificación nya, bisa berjalan, tetapi di layar ketika saya klik ke tempat yang dimaksud ada keluar tanda loading, (tanda bulat berkedip). Archivo saya mmg 18 MB, bagaimana caranya agar tidak keluar tanda kedip tersebut ?
Este comentario fue minimizado por el moderador en el sitio
Hola akkia,
El problema que mencionas no se reproduce en mi caso. ¿Puedo preguntar qué versión de Excel está utilizando?
No hay comentarios publicados aquí todavía
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL