Menyisipkan Baris Kosong Pada Excel 2007, 2010

Cara Menyisipkan baris kosong pada excel 2007, 2010 - Pada kesempatan ini saya akan mengulas sedikit tentang serba-serbi Microsoft Excel, Kali ini saya akan membahas bagaimana sih cara menyisipkan row kosong di tiap row pada Microsoft Excel yang sebelumnya telah kita buat. Bayangkan jika row yang kita sisipkan ratusan bahkan ribuan, tentu kita akan kewalahan untuk insert row satu-satu secara manual, Untuk menyisipkan row kosong secara terprogram kali ini kita menggunakan aplikasi Macro VB yang telah ada pada Microsoft excel.

1.   Langkah pertama yang harus kita lakukan adalah, membuka file excel yang telah berisi data tersebut seperti Gambar 1dibawah

Gambar 1

2.      Kemudian tekan ALT+F11 untuk menampilkan macro editor pada excel seperti gambar 2 dibawah ini

Gambar 2

3.      Pada VBAProject Klik kanan lalu pilih Insert > Module

 Gambar 3

4.      Lalu Pastekan Script dibawah ini pada Module yang telah dibuat tadi.

Sub Masukkan_Baris_Kosong()

   'Memilih Baris Akhir Worksheet.

   Selection.end(xldown).select

   Do Until ActiveCell.row = 1

      'Menyisipkan Row Kosong.

      ActiveCell.EntireRow.Insert shift := xldown

      'Pindah ke atas satu baris.

      ActiveCell.Offset(-1,0).Select

   Loop

End Sub

 

Gambar 4

5.      Kemudian simpan VBAProject anda, tekan yes untuk melanjutkan penyimpanan . Jika sudah Macro editornya sudah bisa di tutup / close.

 

Gambar5

6.      Kembali ke file excel nya, letakkan cursor pada kolom pertama dan row pertama pada shell, tekan tombol ALT+F8 kemudian pilih macro tadi lalu klik run seperti gambar 6 dibawah ini.

Gambar 6

7.      Nah hasil akhirnya akan terlihat pada Gambar 7 dibawah ini.

 Gambar7

Nah, Sekian dulu tutorial Menyisipkan Baris kosong di setiap row pada Microsoft Excel, Semoga bermanfaat, Salam