thanks buat jawabannya dan rumusnya yg singkat. tp sy lg belajar dr buku... kl 
misalkan tetap pake rumus itu yg salah yg dimana? karena sy sedang belajar 
bertahap. biar lebih ngerti lg.. terlepas dr jumlah murid berapapun. 


________________________________
 Dari: Markonah <[email protected]>
Kepada: [email protected] 
Dikirim: Jumat, 22 Juni 2012 6:48
Judul: Re: [belajar-excel] help sepertinya ada yg salah dengan code ku
 

  
yg pendek saja mbak, karena nilai dropdwon itu adalah Bilangan 
(index baris range yg dirujuk), tidak seperti yg tampak di dropdownnya;
dan tabel juga punya index, jadi tinggal ambil berdasarkan alamat 
Cell(RowIdx,ColumnIdx) saja
tidak perlu membuat select case sebanyak data tabel yg ada
Kalau jml muridnya 1000, selec casenya tentu panjang sekali (1000 case)



Sub MengambilData()
   Dim RowIdx As Long, ShBt As Worksheet
   Set ShBt = Sheets("bantuan")
   RowIdx = Sheets("bantuan").Range("D1").Value + 1
   With Worksheets("Form")
      .Cells(5, 2).Value = ShBt.Cells(RowIdx, 1)
      .Cells(6, 2).Value = ShBt.Cells(RowIdx, 2)
      .Cells(7, 2).Value = ShBt.Cells(RowIdx, 3)
   End With
   ShBt.Cells(1, 4).ClearContents
End Sub




2012/6/22 Harumi Wanasita <[email protected]>

 
>help 
>
>apakah ada yg salah dengan kode ku di vb yah?
>kenapa saat pilih nama di combo box nya kok gak otomatis tertulis di worksheet 
>form?
>makasih...
 

Kirim email ke