PILIHAN TERBAIK MUSLIMAH: Excel VBA Basic bag 3 (Modifikasi Redord Macro)

Rabu, 15 Desember 2010

Excel VBA Basic bag 3 (Modifikasi Redord Macro)

Excel VBA Basic bag 3 (Modifikasi Redord Macro) Cara pembacaan code Visual Basic dari hasil record macro artikel sebelumnya

Baris 1 Sub Macro1
Nama dari Sub tesebut adalah Macro1 dan harus diakhiri dengan End Sub (Baris ke 11)
Macro1 boleh diganti dengan selera dan sebaiknya yang berhubungan dengan hasil dari Sub tersebut, contoh : Sub doWarnai
Baris 1 s/d 5 adalah sekedar comment, catatan harus dimulai dengan tanda accent ( ' ), program tidak menjalankan perintah ini
Baris ke 6, Range("C4:D5").Select
Memerintahkan untuk memilih area C4:D5
Bisa dihapus dan kita memilih cellnya secara manual, cell yang terpilih akan diwarnai
Baris ke 7 sampai 10, bisa diganti dengan
1 2

Selection.Interior.ColorIndex = 41 Selection.Interior.Pattern = xlSolid
Karena Selection.Interior berulang - ulang ditulis dengan With Selection.Interior dan diakhiri dengan End With
Selection.Interior maksudnya cell yang sudah diselect (disorot) akan diberi dengan Color Index 41 (Light Blue) dan dengan Pattern xlSolid

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 5/21/2009 by Sapto Hartoko
'
    Range("C4:D5").Select
    With Selection.Interior
        .ColorIndex = 41
        .Pattern = xlSolid
    End With
End Sub

Jika line 6 sudah dibuang, maka cell yang dipilih harus secara manual, hal imi malah lebih fleksibel karena kita dapat memilih cell yang lain. Gambar 01 menunjukkan cell A2, B2 A4 dan D4 dipilih kemudian jalankan macro yang telah dimodifikasi, maka hasilnya akan seperti gambar 02.