Secara default tampilan status bar dari Microsoft Excel tampak seperti gambar berikut :
Akan tetapi mungkin sebagian pengguna excel ingin menggantinya dengan sebuah informasi letak dari file dokumen excel yang sedang aktif di buka. Seperti tampilan berikut :
untuk melakukan ini tinggal paste kode-kode berikut di ThisWorkbook
Akan tetapi mungkin sebagian pengguna excel ingin menggantinya dengan sebuah informasi letak dari file dokumen excel yang sedang aktif di buka. Seperti tampilan berikut :
untuk melakukan ini tinggal paste kode-kode berikut di ThisWorkbook
Private Sub Workbook_Activate()
Application.StatusBar = Application.ActiveWorkbook.Path
End Sub
Kode ini akan secara otomatis menampilkan informasi letak file ketika workbook dibuka atau diaktifkan
Application.StatusBar = Application.ActiveWorkbook.Path
End Sub
Private Sub Workbook_Deactivate()
Application.StatusBar = False
End Sub
Kode ini akan secara otomatis mengembalikan status bar sesuai dengan aslinyaApplication.StatusBar = False
End Sub
Lorem ipsum dolor sit amet, consectetur adipiscing elit. Etiam id libero non erat fermentum varius eget at elit. Suspendisse vel mattis diam. Ut sed dui in lectus hendrerit interdum nec ac neque. Praesent a metus eget augue lacinia accumsan ullamcorper sit amet tellus.
terima kasi
BalasHapus