Pak Dwint,
Coba hilangkan data validasi pada sel B3 dan ganti code :
If Range("b3").Value Mod 4 <> 0 And Len(Range("b2")) = 0 Then
dengan
If Range("b3").Value Mod 4 <> 0 Or Range("b2") <> "Ya" Then
File terlampir.
Salam,
Hendrik Karnadi
________________________________
From: dwint ruswanto <[email protected]>
To: [email protected]
Sent: Tuesday, 11 September 2012, 11:57
Subject: [belajar-excel] Validasi input berdasarkan 2 kondisi
Assalamu'alaikum,
para master & member millis yang saya hormati,
bagaimana cara membuat validasi inputan berdaraskan 2 kondisi? boleh
menggunakan data validasi ataupun makro,
syarat: kondisi 2 hanya boleh diisi dengan kelipatan 4 hanya jika kondisi 1 =
Ya dan kondisi 1 tidak kosong
data validasi yang sudah saya buat
=IF(($B$2="Ya")*($B$2<>"");MOD($B$3;4)=0;0) >> jika kondisi 1 kosong maka tidak
berhasil
dan macro yang sudah saya buat
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Row = 3 And .Column = 2 Then
If Range("b3").Value Mod 4 <> 0 And Len(Range("b2")) = 0 Then
Range("b3").Select
MsgBox "Bla bla bla bla", vbOKOnly
End If
End If
End With
End Sub
tetapi keduanya tidak berhasil..
tolong dikoreksi letak kesalahannya.
wassalam,
-dwint-
Tanya input dengan 2 kondisi.xlsb
Description: application/vnd.ms-excel.sheet.binary.macroenabled.12
