Pak Dwint,

Di komputer saya koq Ok2 saja Pak ?
File terlampir.

Salam,
Hendrk Karnadi


________________________________
 From: dwint ruswanto <[email protected]>
To: [email protected] 
Sent: Thursday, 30 August 2012, 14:49
Subject: [belajar-excel] Over Flow - Run time Error -6-
 

  
assalamu'alaikum,

para master yang saya hormati,

saya membuat event change terhadap suatu cell, pada saat cell taget hanya 1 
tidak timbul masalah, tetapi saat saya menambah 1 cell target lagi maka timbul 
Error,

berikut codingnya

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count = 1 Then
        If Target.Row = 19 And Target.Column = 2 Then
            If Target.Value = "Hard Cover" Then
                Range("B22:B23").Value = "Ya"
                Else
                Range("B22:B23").Value = "Tidak"
            End If
        End If
    End If
    
    If Target.Cells.Count = 1 Then
        If Target.Row = 20 And Target.Column = 2 Then
            If Target.Value = "Ya" Then
                Range("B24").Value = "Ya"
                Else
                Range("B24").Value = "Tidak"
            End If
        End If
    End If
End Sub

di mana letak kesalahan yang harus saya perbaiki?

wassalam,

-dwint-
 

Attachment: Kasus Pak Dwint.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Kirim email ke