Kako shraniti vse delovne liste samo kot vrednosti?
Če imate delovni zvezek, ki vsebuje več formul, morate to datoteko distribuirati drugim uporabnikom, formul ne želite prikazati, ampak bodo prikazane samo vrednosti. Običajno lahko delovni list hitro shranimo kot vrednosti s kopiranjem in lepljenjem podatkov samo kot vrednosti. Toda kako lahko vse delovne liste shranite kot vrednosti samo brez kopiranja in lepljenja enega za drugim?
Vse delovne liste shranite kot vrednosti samo s kodo VBA
Vse delovne liste shranite kot vrednosti samo s kodo VBA
Naslednja koda VBA vam lahko pomaga hitro shraniti vse liste kot vrednosti (brez formul) in ohraniti vse oblikovanje celic. Naredite to:
1. Držite tipko ALT + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.
2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
Koda VBA: Shranite vse delovne liste samo kot vrednosti:
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. Nato pritisnite F5 ključ za zagon te kode in celoten delovni zvezek je bil shranjen samo kot vrednosti, vse formule so bile odstranjene hkrati, vrednosti pa ostanejo samo s formatiranjem celic.
Opombe: Preden uporabite kodo, lahko najprej shranite kopijo delovnega zvezka.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!