Re: ]] XL-mania [[ menjalankan macro dengan rumus

 

Oh iya terima kasih atas koreksinya mas Paijo

Untuk mengantisipasi hal seperti yang mas Paijo katakan, kita bisa menggunakan fasilitas buffering yang kita gunakan setiap terjadi rekalkulasi untuk memverifikasi apakah data di Cell B10 berubah atau tidak. Kalau nilainya berubah dari nilai sebelumnya yang terseimpan di buffer dan memenuhi syarat diatas diatas 90 atau dibawah -90 maka kita eksekusi pengiriman emailnya

Pada makro sheet tersebut kita isikan sbb:

Private Sub Worksheet_Change(ByVal Target As Range)
    If (Abs(Range("B10")) > 90 And Not LastChange = Range("B10")) Then
        LastChange = Range("B10") 'Simpan nilai terakhir di cell B10
        MsgBox "Prosedur Kirim Email Ditemukan"
    End If
End Sub

Kemudian, setelah itu, kita tambahkan sebuah modul, dari menu Insert -> Module
Pada modul baru tersebut kita isikan sebaris puisi sbb:
   
    Public LastChange

Dengan cara seperti tersebut diatas, jikalau andaikata seumpama di cell B10 nya sendiri yang diubah atau Cell tersebut adalah sebuah Rumus kalkulasi misalkan saja Penjumlahan dari B8+B9, kalaupun B8 diubah maka vba akan dapat mengirim email (tentunya jika syarat kondisi diatas 90 dan dibawah -90 terpenuhi) karena Nilai LastChange berubah. :-D     

Demikain disampaikan, terima kasih.

Rgds,
De Premor

Pada 11/04/2013 17:29, Paijo Iseng menulis:

 

Menurut saya hal seperti yang dimaksud (otomatis mengirim email saat nilai suatu cell memenuhi syarat) adalah sangat tidak bagus.

Setiap kali terjadi perubahan isi sebuah cell, excell akan mengkalkulasi ulang seluruh cell yang ada di sheet, dan juga cell di sheet lain yang memiliki ketergantungan dengan cell yang berubah tersebut.

Pada saat itu juga jika nilai cell memenuhi syarat, maka makro akan dijalankan. Coba bayangkan berapa banyak email yang dikirim kalau dalam semenit menekan 5 kali tombol enter...

Sebaiknya tetap dilakukan dengan cara manual (menge-click tombol tertentu).

Kalau ingin yang otomatis kirim tetapi cukup pintar untuk mendeteksi ada email yang sudah terkirim, sebaiknya menggunakan aplikasi terpisah.

Iseng

---

From: Kang Abdillah <kang_abdillah@yahoo.co.id>
To: "XL-mania@yahoogroups.com" <XL-mania@yahoogroups.com>
Sent: Wednesday, April 10, 2013 11:22 AM
Subject: ]] XL-mania [[ menjalankan macro dengan rumus

 

Dear Master…
Saya nubie nih, mau tanya :
Apakah Excel bisa menjalankan macro menggunakan rumus secara otomatis..?? (tanpa klik Run pada macro dialog box)
Misalkan : Jika Cell B10 berisi angka <-90, atau Cell B10 berisi angka >90 ---> maka File excel akan otomatis send email ke alamat email yg telah ditentukan
Bagaimana penulisan macro nya..??
Mudah-mudahan para Master dapat membantu saya..
Terima kasih..

Salam,
Abdillah

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (5)

Recent Activity:

• New Members 52

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Merry Christmas. May God bless you and your family...             |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di :                                            |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Switch to: Text-Only, Daily Digest • Unsubscribe • Terms of Use • Send us Feedback

.

__,_._,___