Range ("A1")= NowFungsinya mengisikan kolom A1 dengan waktu sekarang.
Hasil:
baris = ActiveCell.RowFungsinya mendeklarasikan variable untuk mengetahui baris yang aktif,
kolom = ActiveCell.ColumnFungsinya 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.ClearContentsFungsinya untuk menghapus Cell yang aktif.
Hasil:
ActiveWorkbook.SendMail recipients:= "excel@gmail.com"Fungsinya untuk Mengirimkan Workbook melalui e-mail.
Hasil:
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").SelectFungsinya untuk menuju cell yang telah diberi nama sebelumnya. (E.q: JOHN)
Application.ScreenUpdating = FalseFungsinya menghilangkan kedipan layar pada saat macro dijalankan.
Sheet1.Select
Sheet("JOHN").SelectFungsinya menuju sheet tertentu. (E.q: Sheet1, JOHN)
0 comments:
Post a Comment