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 <[email protected]>
To: XL-Mania <[email protected]> 
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



 

Kirim email ke