Dear Agung, Berhubung mau cepat, langsung saja ya..
1. Validasi inputan No.Tag tidak ada masalah. Masalahnya ada di event ComboBox1_Change, karena Anda menggunakan kondisi If lIdxCbo <> -1 Then baru bisa menjalankan rumus offset. Saran : mungkin Anda dapat menghilangkan kondisi If diatas menggunakan rumus vlookup dengan lookup value = ComboBox1. Untuk hasil error dari vlookup dapat diakali dengan IsError(hasil). Untuk Row Source ComboBox1 bisa dihilangkan. 2. Tidak ada masalah dengan inputan Parts Code. Masalahnya ada di event TextBox1_AfterUpdate karena Anda kurang deklarasi Dim rngCode As Range dan Dim rngName As Range. Sebelum coding Set rngCode = shtRef.Range(sRefPartCode). 3. Section / Area tersimpan pada TextBox4. Setiap tombol Inputkan Data (data valid), maka akan menjalankan prosedur InitKomponen. Coding ini yang harus diganti TextBox4.Text = vbNullString, artinya mengganti Section / Area = "". Jika Anda tidak ingin direset, maka coding tersebut dapat dihapus. CMIIW Blessings, Fran'z On 5/28/11, [email protected] <[email protected]> wrote: > Rekan -rekan milis yang baik hati, > > Ada form hasil pengembangan dari para guru disini. > Namun beberapa propertiesnya perlu diperbaiki sesuai kebutuhan di lapangan > > Mohon lihat dalam lampiran agar lebih paham, > > Pada Form yang ada, > Tag No harus diisi lebih dahulu. > Tanya : Bagaimana agar Combo box No. Tag bisa diinput juga dengan keyboard / > tanpa harus dengan mengklik mouse? > > Pada Parts Code ada material diberi nama dengan angka(saja) tanpa huruf. > Tanya : Bagaimana agar Parts Code dengan nama berupa angka bisa juga dinput > dengan form tersebut.? > > Pada Form,Section / Area adalah salah satu kolom yang juga harus terisi. > Tanya : Bagaimana agar Data Section / Area terakhir yang diinput diform > tersebut tidak ikut hilang saat disave / mau diinput tag baru. > > Terimakasih sekali untuk jawaban yang lebih awal, berhubung beberapa orang > lagi nunggu solusi > > Ya Alloh, Ringankan beban hidup para pemberi solusi di milis ini, Amin > > Wassalam > Agung Widodo
