di UserForm3
Baris yang berbunyi *TextBox7.Text =
UserForm4.ListBox1.Column(1)***dihapus saja,
Kemudian buka code untuk UserForm4 dan isikan code berikut
*Private Sub ListBox1_Click()**
** UserForm3.TextBox7.Text = ListBox1.List(ListBox1.ListIndex, 0)**
** UserForm3.TextBox8.Text = ListBox1.List(ListBox1.ListIndex, 1)**
** UserForm3.TextBox4.SetFocus**
**End Sub**
**
**Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)**
** Unload Me**
**End Sub**
*
Jadi disini yang form aktif yang ngirim ke form pemanggil, bukan form
pemanggil yang ngambil2 datanya di form yang dipanggil
Rgds,
[dp]
On 18/07/2013 14:12, Kusnadi Bin zain wrote:
------------------------------------------------------------------------
**
Dear : Exeller pakar
mohon bantuan koding ambil data dari UserForm lain, dan hasilnya
ditaruh di Current UserForm gimana ya kodingnya.
ini saya coba kok patchnya katanya erorr..... (gak mudeng2 nih awak)
terima kasih atas bagi2 ilmunya selama ini.....
kusnadi
