Hoe alle werkbladen opslaan als alleen waarden?

Als u een werkboek heeft dat meerdere formules bevat, en u moet dit bestand nu distribueren aan andere gebruikers, wilt u de formules niet tonen maar alleen de waarden weergeven. Normaal gesproken kunnen we snel een werkblad opslaan als waarden door de gegevens te kopiëren en te plakken als alleen waarden. Maar hoe kunt u alle werkbladen opslaan als alleen waarden zonder ze één voor één te kopiëren en plakken?

Alle werkbladen opslaan als alleen waarden met VBA-code

Alle werkbladen opslaan als alleen waarden met VBA-code

De volgende VBA-code kan u helpen om snel alle bladen op te slaan als waarden (geen formules) en alle celopmaak te behouden. Volg deze stappen:

1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.

2. Klik op Invoegen > Module, en plak de volgende code in het Modulevenster.

VBA-code: Alle werkbladen opslaan als alleen waarden:

Sub Saveasvalue()
'Updateby Extendoffice
    Dim wsh As Worksheet
    For Each wsh In ThisWorkbook.Worksheets
        wsh.Cells.Copy
        wsh.Cells.PasteSpecial xlPasteValues
    Next
    Application.CutCopyMode = False
End Sub

3. Druk vervolgens op de F5-toets om deze code uit te voeren, en het hele werkboek is opgeslagen als alleen waarden, alle formules zijn in één keer verwijderd, alleen waarden met celopmaak blijven over.

Opmerking: Voordat u de code toepast, kunt u eerst een kopie van het werkboek opslaan.

Ontdek de Magie van Excel met Kutools AI

• Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
• Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
• VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
• Formule-uitleg: Begrijp complexe formules gemakkelijk.
• Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.

Verhoog uw Excel-mogelijkheden met AI-aangedreven tools. Download Nu en ervaar een ongekende efficiëntie!