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:

  • Header : .LeftHeader, .CenterHeader, .RightHeader.

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

  • Footer : .LeftFooter, .CenterFooter, .RightFooter.

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 CodeKeterangan
&LText Rata Kiri
&CText Rata Tengah
&RText Rata Kanan
&EText Double Under Line On/Off
&XText SuperScript On/Of
&YText SubScript On/Of
&BText Bold On/Of
&IText Italic On/Of
&UText Underline On/Of
&SText Strikethrough  On/Of
&”nama font”Untuk Menentukan Menggunakan Nama Font tertentu
&nnUntuk Menentukan Ukuran Font
&colorMencetak dengan Warna Tertentu, Kode Warna menggunakan hexa
&”+”Mencetak karakter sesuai Heading pada Theme yang digunakan
&”-“Mencetak karakter sesuai Body pada Theme yang digunakan
&K xxS nnnMencetak karakter dengan warna yang sesuai dengan Theme yang digunakan
&DMencetak Tanggal Hari ini
&TMencetak Waktu saat ini
&FMencetak Nama Document
&AMencetak Nama Tab Workbook
&PMencetak Nomor Halaman
&P+numberMencetak Nomor halaman dengan menambahkan spesifik number
&P-numberMencetak Nomor halaman dengan menambahkan spesifik number
&&Mencetak & , & pertama adalah Escape Karekter
&NMencetak total halaman pada File Tersebut
&ZMencetak Lokasi File
&GMenambahkan 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
List Tutorial
Apa yang sedang kamu cari?

Temukan beberapa kata kunci yang diinginkan.

Search