Bagaimana cara menyembunyikan formula tetapi menampilkan hasilnya tanpa melindungi lembar kerja di Excel?
Dalam beberapa kasus, Anda mungkin perlu menyembunyikan rumus di lembar kerja Anda untuk pribadi. Artikel ini berbicara tentang menyembunyikan rumus tetapi menampilkan hasil tanpa melindungi lembar kerja di Excel.
Sembunyikan rumus tetapi tampilkan hasil tanpa melindungi lembar kerja dengan kode VBA
Sembunyikan rumus tetapi tampilkan hasil tanpa melindungi lembar kerja dengan kode VBA
Untuk menyembunyikan rumus tetapi menampilkan hasil tanpa melindungi lembar kerja, lakukan hal berikut.
1. Di lembar kerja Anda perlu menyembunyikan rumus tetapi menampilkan hasilnya, silakan klik kanan tab lembar, dan pilih Lihat kode dari menu klik kanan.
2. Dalam Microsoft Visual Basic untuk Aplikasi jendela, silakan salin dan tempel kode VBA ke jendela Kode.
Kode VBA: menyembunyikan formula tetapi menampilkan hasil tanpa melindungi lembar kerja
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
Note: Dalam kode, C1: C10 adalah rentang sel yang ingin Anda sembunyikan di dalamnya rumus. Silakan ubah sesuai kebutuhan Anda.
3. Lalu klik Tools > Referensi…. Periksalah Waktu Proses Skrip Microsoft kotak dan klik OK tombol di Referensi - VBAProject jendela. Lihat tangkapan layar:
4. tekan lain + Q kunci untuk menutup Microsoft Visual Basic untuk Aplikasi jendela.
Mulai sekarang, saat Anda mengklik sel dalam rentang yang ditentukan, rumus akan segera disembunyikan di Formula Bar.
Artikel terkait:
- Bagaimana cara mengunci sel tertentu tanpa melindungi seluruh lembar kerja di Excel?
- Bagaimana cara menghapus rumus dari lembar kerja tetapi menyimpan nilai / hasil di Excel?
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!