Jak uložit všechny listy pouze jako hodnoty?
Pokud máte sešit, který obsahuje více vzorců, musíte tento soubor distribuovat dalším uživatelům, nechcete zobrazovat vzorce, ale zobrazovat pouze hodnoty. Normálně můžeme list rychle uložit jako hodnoty kopírováním a vložením dat pouze jako hodnoty. Jak ale můžete uložit všechny listy jako hodnoty pouze bez kopírování a vkládání jeden po druhém?
Uložte všechny listy jako hodnoty pouze s kódem VBA
Uložte všechny listy jako hodnoty pouze s kódem VBA
Následující kód VBA vám pomůže rychle uložit všechny listy jako hodnoty (bez vzorců) a zachovat celé formátování buněk. Udělejte prosím toto:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: Uložte všechny listy pouze jako hodnoty:
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. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a celý sešit byl uložen pouze jako hodnoty, všechny vzorce byly odstraněny najednou, ponechají hodnoty pouze s formátováním buňky.
Poznámka: Před použitím kódu můžete nejprve uložit kopii sešitu.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!