Re: ]] XL-mania [[ menjumlahkan otomatis

 

Pak Samsul,

Yang ini kayaknya terpaksa pake Macro, dengan memanfaatkan Event Worksheet Change.

Copas Prosedur ini pada VBE Sheet1:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Column = 6 Then

        If Target.Count = 1 Then

                Target.Offset(0, -1).Value = Target.Offset(0, -1).Value + Target.Value

                Target.Offset(0, -1).Font.Color = vbRed

        End If

    End If

    If Target.Column = 7 Then

        If Target.Count = 1 Then

                Target.Offset(0, -3).Value = Target.Value

                Target.Offset(0, -3).Font.Color = vbRed

        End If

    End If

End Sub

Sebelum menjalankan macro ini sebaiknya backup file terlebih dahulu.

Salam,

Hendrik Karnadi

---

From: Samsul Arifin <syemy88@yahoo.co.id>
To: XL-Mania <XL-mania@yahoogroups.com>
Sent: Tuesday, 2 July 2013, 16:55
Subject: ]] XL-mania [[ menjumlahkan otomatis

 

Dear Master Master Excel

Saya punya kesulitan untuk membuat rumus penjumlahan otomatis.

Mohon di bantu..

Contoh terlampir..

Terima kasih

 

Hormat Saya
Samsul Aripin

__._,_.___

Reply via web post

Reply to sender

Reply to group

Start a New Topic

Messages in this topic (5)

Recent Activity:

• New Members 38

Visit Your Group

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Maaf moderasi terlambat karena yahoogroups sering error           |
+-------------------------------------------------------------------+
| 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

.

__,_._,___