Alhamdulillah,pak suyono....
oya lantas apabila saya ingin menambahkan kriteria lagi,misal pada
colom G (tgl) dan saya coba setelah yang bapk buat:
DataExist = WorksheetFunction.CountIf(Range("C:C"), cboNama.Value)
If DataExist > 0 Then
MsgBox "Data sudah ada", vbInformation, "Data dobel"
Exit Sub
kemudian saya tambahkan dengan :
Else
Datatgl = WorksheetFunction.CountIfs(Range("C:C","G:G"), TxtTgl.Value)
If Datatgl > 0 Then
MsgBox "Data tgl sudah ada", vbInformation, "Data dobel"
Exit Sub
tapi kog tidak bisa ya pak.... apa salah dalam penempatannya atau
memang seharusnya tidak demikian sekripnya......
On 9/15/14, SUYONO [email protected] [belajar-excel]
<[email protected]> wrote:
> Assalamu'alaikum wr.wb.
>
> Pa supri, pake fungsi countif untuk menolak input data yang sama.
>
> Wassalamu'alaikum war.wb.
>
> From: [email protected] [mailto:[email protected]]
> Sent: Sunday, September 14, 2014 1:23 PM
> To: [email protected]
> Subject: [belajar-excel] menolak input data kembar pada comboBox userform [1
> Attachment]
>
>
>
> Assalamu'alaikum wr.wb.
>
> Alhamdulillah, berdasarkan ilmu-ilmu dari para suhu,saya bisa membuat
> input data menggunakan userform. Yang ingin saya tanyakan bagaimana
> supaya menolak input data yang sama pada ComboBox yang ada di
> userform.....(Filenya terlampir)
>
> Mohon bantuannya ya para Suhu Excel....
>
> Terima kasih banyak sebelumnya...
>
> Wassalamu'alaikum war.wb.
>
> salam
> supri
>
>