Cara Menyembunyikan Formula Bar dengan Macro VBA

Untuk Aplikasi yang dibuat dengan Excel selalu saja ada keinginan untuk menyembunyikan identitas asli dari Aplikasi tersebut. Salah satunya dengan menyembunyikan Formula Bar. Yap!, Formula bar adalah tempat untuk kita memasukan dan mengedit rumus. Mungkin oleh pembuat Aplikasi, tidak ingin rumus yang sudah dibuat terlihat begitu saja oleh pengguna. untuk itu oleh pembuat Formula Bar ini ingin disembunyikan.

Sebenarnya untuk menyembunyikan Formula Bar ini kita bisa lakukan melalui Menu di Ribbon tanpa Macro-macroan, Pilihan untuk memunculkan dan menyembunyikan Formula Bar bisa di lihat di Tab View.

Namun banyak juga yang ingin menyembunyikan Formula bar dengan cara Macro. Untuk menyembuyikan Formula Bar dengan Macro, Script yang dibutuhkan juga cukup Simple , kode VBA nya hanya seperti ini

 Visual Basic Editor 

Application.DisplayFormulaBar = False

DisplayFormulaBar bertype data Boolean. artinya hanya bisa menerima TRUE untuk menampilkan Formula Bar dan FALSE untuk menyembunyikan Formula Bar. jadi hanya berisi TRUE/FALSE

Menyembunyikan Formula Bar Saat Excel Dibuka

untuk menyembunyikan Formula Bar saat Excel Dibuka bisa memanfaatkan Event Workbook Open atau Auto Open. Untuk memahami perbedaan keduanya bisa dibaca di Workbook Open VS Auto Open . Pada contoh kali ini kita gunakan Workbook open. sehingga script pada Module Workbook akan terlihat seperti ini

 Visual Basic Editor 

Private Sub Workbook_Open()
Application.DisplayFormulaBar = False
End Sub

Menyembunyikan Formula Bar di Sheet Tertentu

Jika kita ingin formula bar ini menghilang di sheet tertentu, kita juga bisa melakukan hal ini dengan Macro. Formula Bar akan Tampil di sebagian sheet dan pada Sheet lain akan di sembunyikan. Untuk bisa melakukan hal ini, kita tempatkan script pada Event SheetActivate, penulisan kode lengkapnya bisa dilihat dibawah ini.

 Visual Basic Editor 

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Sheet1" Then
    Application.DisplayFormulaBar = True
Else
    Application.DisplayFormulaBar = False
End If
End Sub

pada Script diatas, Formula Bar hanya akan tampil di “Sheet1” saja sedangkan sisanya akan di Hide atau di Sembunyikan