¿Cómo ocultar fórmulas pero mostrar el resultado sin proteger la hoja de cálculo en Excel?
En algunos casos, puede que necesites ocultar las fórmulas en tu hoja de cálculo por privacidad. Este artículo trata sobre cómo ocultar fórmulas pero mostrar los resultados sin proteger la hoja de cálculo en Excel.
Ocultar fórmula pero mostrar el resultado sin proteger la hoja de cálculo con código VBA
Ocultar fórmula pero mostrar el resultado sin proteger la hoja de cálculo con código VBA
Para ocultar fórmulas pero mostrar los resultados sin proteger una hoja de cálculo, sigue los siguientes pasos.
1. En la hoja de cálculo donde necesitas ocultar las fórmulas pero mostrar los resultados, haz clic derecho en la pestaña de la hoja y selecciona Ver código desde 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 donde deseas ocultar las fórmulas. Cambia este rango según tus necesidades.
3. Luego haz clic en Herramientas > Referencias… Marca la casilla Microsoft Script Runtime y haz clic en el botón Aceptar en la ventana Referencias – VBAProject. Ver captura de pantalla:
4. Presiona las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic para Aplicaciones.
A partir de ahora, cuando hagas clic en una celda del rango especificado, la fórmula se ocultará inmediatamente en la Barra de fórmulas.
Artículos relacionados:
- ¿Cómo bloquear celdas específicas sin proteger toda la hoja de cálculo en Excel?
- ¿Cómo eliminar fórmulas de una hoja de cálculo pero mantener los valores/resultados en Excel?
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos