Hoe kun je formules verbergen maar de resultaten weergeven zonder het werkblad in Excel te beveiligen?

In sommige gevallen moet je mogelijk formules in je werkblad verbergen voor privacy. Dit artikel gaat over het verbergen van formules terwijl de resultaten zichtbaar blijven, zonder het werkblad in Excel te beveiligen.

Formule verbergen maar resultaat weergeven zonder werkblad te beveiligen met VBA-code

Formule verbergen maar resultaat weergeven zonder werkblad te beveiligen met VBA-code

Om formules te verbergen maar de resultaten weer te geven zonder een werkblad te beveiligen, doe dan het volgende.

1. Klik in het werkblad waarin je de formules wilt verbergen maar de resultaten wilt weergeven met de rechtermuisknop op het tabblad van het werkblad en selecteer Weergave Code uit het rechtsklikmenu.

2. Plak in het venster Microsoft Visual Basic for Applications de VBA-code in het Code-venster.

VBA-code: formule verbergen maar resultaat weergeven zonder werkblad te beveiligen

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

Opmerking: In de code is C1:C10 het celbereik waarbinnen je de formules wilt verbergen. Pas dit aan op basis van je behoeften.

3. Klik vervolgens op Tools > References…. Vink het vakje Microsoft Script Runtime aan en klik op de OK-knop in het venster References – VBAProject. Zie screenshot:

4. Druk op de toetsen Alt + Q om het venster Microsoft Visual Basic for Applications te sluiten.

Vanaf nu zal, wanneer je op een cel in het opgegeven bereik klikt, de formule onmiddellijk verborgen worden in de Formulebalk.

Gerelateerde artikelen:

• Hoe kun je specifieke cellen vergrendelen zonder het hele werkblad in Excel te beveiligen?
• Hoe verwijder je formules uit een werkblad maar behoud je de waarden/resultaten in Excel?