Header dan Footer

Header dan footer adalah bagian penting dalam sebuah lembar kerja Excel yang menyediakan informasi tambahan seperti judul, nomor halaman, tanggal, dan lainnya.

Dengan menggunakan VBA (Visual Basic for Applications), kita juga bisa mengotomatiskan pembuatan dan pengaturan header dan footer di lembar kerja Excel.

Dalam VBA, terdapat beberapa fungsi yang digunakan untuk mengatur header dan footer pada lembar kerja.

Fungsi-fungsi ini memungkinkan pengguna untuk menetapkan teks, nomor halaman, tanggal, dan informasi lainnya ke dalam bagian header dan footer lembar kerja.

Berikut beberapa fungsi utamanya:

Fungsi ini digunakan untuk menetapkan teks pada bagian kiri, tengah, dan kanan dari header.

Fungsi ini serupa dengan header, tetapi digunakan untuk menetapkan teks pada bagian kiri, tengah, dan kanan dari footer

Selain fungsi utama diatas, dalam Header dan Footer juga terdapat Special Formating yang bisa digunakan.

Berikut ini adalah Special Formating yang bisa digunakan

Format Code	Keterangan
&L	Text Rata Kiri
&C	Text Rata Tengah
&R	Text Rata Kanan
&E	Text Double Under Line On/Off
&X	Text SuperScript On/Of
&Y	Text SubScript On/Of
&B	Text Bold On/Of
&I	Text Italic On/Of
&U	Text Underline On/Of
&S	Text Strikethrough  On/Of
&”nama font”	Untuk Menentukan Menggunakan Nama Font tertentu
&nn	Untuk Menentukan Ukuran Font
&color	Mencetak dengan Warna Tertentu, Kode Warna menggunakan hexa
&”+”	Mencetak karakter sesuai Heading pada Theme yang digunakan
&”-“	Mencetak karakter sesuai Body pada Theme yang digunakan
&K xx. S nnn	Mencetak karakter dengan warna yang sesuai dengan Theme yang digunakan
&D	Mencetak Tanggal Hari ini
&T	Mencetak Waktu saat ini
&F	Mencetak Nama Document
&A	Mencetak Nama Tab Workbook
&P	Mencetak Nomor Halaman
&P+number	Mencetak Nomor halaman dengan menambahkan spesifik number
&P-number	Mencetak Nomor halaman dengan menambahkan spesifik number
&&	Mencetak & , & pertama adalah Escape Karekter
&N	Mencetak total halaman pada File Tersebut
&Z	Mencetak Lokasi File
&G	Menambahkan Gambar

Membuat Header dan Footer dengan VBA

Untuk membuat header dan footer menggunakan VBA di Excel, ikuti langkah-langkah berikut:

Sebagai contoh : misalnya jika ingin membuat sebuah Text di tengah Footer dengan isi Footer adalah nomor halaman dan sampai halaman.

Maka scriptnya bisa dibuat seperti dibawah ini

Sub TambahFooter()
    ActiveSheet.PageSetup.CenterFooter = "Nomor Halaman: &P dari &N"
End Sub

Script Footer diatas masih sangat standard, Misalnya jika ingin Nomor menjadi Bold sedangkan Halaman ingin menjadi Underline, maka bisa ditambahkan Format Code kedalam Scriptnya.

Menjadi seperti dibawah ini

Sub TambahFooter()
    ActiveSheet.PageSetup.CenterFooter = "&BNomor&B &UHalaman&U: &P dari &N"
End Sub

Jika Bold atau Underline diatas tidak ditutup, maka Bold atau Underline ini akan diteruskan sampai akhir text Footer.

Contoh lainnya misalnya, ingin membuat text yang ada di A1 di Kiri Footer dengan Menggunakan Font Time new Roman Bold dengan Ukuran Font 14.

Maka Script bisa dibuat seperti dibawah ini

Sub TambahFooter()
    ActiveSheet.PageSetup.LeftFooter = "&""Times New Roman,Bold""&14" & Range("A1").Value
End Sub