¿Cómo ocultar una fórmula y mostrar solo su resultado en Excel sin proteger la hoja de cálculo?
En algunos casos, es posible que necesite ocultar las fórmulas de su hoja de cálculo por motivos de privacidad. Este artículo explica cómo ocultar las fórmulas y, al mismo tiempo, mostrar sus resultados sin proteger la hoja en Excel.
Ocultar fórmula pero mostrar el resultado sin proteger la hoja de cálculo mediante código VBA
Ocultar fórmula pero mostrar el resultado sin proteger la hoja de cálculo mediante código VBA
Para ocultar las fórmulas pero mostrar sus resultados sin proteger la hoja de cálculo, siga estos pasos.
1. En la hoja de cálculo en la que necesita ocultar fórmulas pero mostrar los resultados, haga clic con el botón derecho en la pestaña de la hoja y seleccione Ver código en el menú contextual.
2. En la ventana de Microsoft Visual Basic para Aplicaciones, copia y pega el código VBA en la ventana de código.
Código VBA: ocultar fórmula pero mostrar el resultado sin proteger la hoja de cálculo
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 SubNota: En el código, C1:C10 es el rango de celdas en el que desea ocultar fórmulas. Cámbielo según sus necesidades.
3. A continuación, haga clic en Herramientas > Referencias…. Active la casilla de Microsoft Script Runtime y haga clic en el botón Aceptar en la ventana de Referencias: VBAProject. Vea la captura de pantalla:
4. Pulse las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.
A partir de ahora, al hacer clic en una celda del rango limitado, la fórmula se ocultará automáticamente en la barra de fórmulas.
Artículos relacionados:
- ¿Cómo bloquear celdas específicas en Excel sin proteger toda la hoja de cálculo?
- ¿Cómo eliminar las fórmulas de la hoja de cálculo en Excel y conservar solo los valores o resultados?
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos