Friday 20 June 2014

Mengenal fungsi fungsi VBA 2


Range ("A1")= Now
Fungsinya mengisikan kolom A1 dengan waktu sekarang.

Hasil:
baris = ActiveCell.Row
Fungsinya mendeklarasikan variable untuk mengetahui baris yang aktif,
kolom = ActiveCell.Column
Fungsinya mendeklarasikan variable untuk mengetahui kolom yang aktif,

Biasanya diantara ketiga rumus diatas digabungkan dengan fungsi Messagebox. menjadi :
baris = ActiveCell.Row
kolom = ActiveCell.Column
MsgBox "Baris ke " & baris & " Kolom ke " & kolom
Hasil:
Selection.ClearContents
 Fungsinya untuk menghapus Cell yang aktif.

Hasil:
ActiveWorkbook.SendMail recipients:= "excel@gmail.com"
Fungsinya untuk Mengirimkan Workbook melalui e-mail.
Hasil:
Sebelumnya Setting email pada komputer, dan setting outlook.
ActiveCell.FormulaR1C1 = "=SUM(R[-7]C:R[-1]C)"
Fungsinya untuk menuliskan fungsi bawaan excel pada cell yang aktif. Fungsi diatas adalah menjumlahkan 7 baris keatas dan 1 kolom.
Hasil:
Selection.Name = "JOHN"
Fungsinya untuk memberi nama cell yang aktif. (E.q: JOHN)
Range("JOHN").Select
Fungsinya untuk menuju cell yang telah  diberi nama sebelumnya. (E.q: JOHN)
Application.ScreenUpdating = False
Fungsinya menghilangkan kedipan layar pada saat macro dijalankan.
Sheet1.Select
Sheet("JOHN").Select 
Fungsinya menuju sheet tertentu. (E.q: Sheet1, JOHN)

0 comments:

Post a Comment