pak Hendrik, sedikit menambahkan keterangan dari Miss Jan Raisin,
untuk mendapatkan nilai baris terakhir sebaiknya menggunakan .UsedRange atau .End jika sebelumnya ada proses delete data, maka xlLastCell akan memunculkan hasil yang tepat *jika, dan hanya jika* telah dilakukan proses Save sebelumnya Salam, -Aji Mumpung- Pada 10 April 2013 13.30, hendrik karnadi <[email protected]>menulis: > ** > > > Rekan Be-Exceler, > > Dalam database kita sering dihadapkan pada dua hal, yaitu: > - Mencari baris baru untuk input data baru > - Mencari record tertentu dari data yang sudah ada, mis. untuk diedit > > Biasanya/sering kita gunakan Offset(Tabel.Rows.Count+1,.....) atau > .......End(xlUp) untuk mencari baris baru dan Find("xyz", Lookin=xlValues) > untuk mencari record tertentu yang sudah ada. > > Untuk mencari baris baru saya gunakan code: > Sub BarBar() > Columns("A:A").SpecialCells(xlLastCell).Offset(1, 0).Select > End Sub > > Untuk mencari record tertentu (mis "Sania") saya gunakan code: > Sub RekTtt() > Columns("A:A").Find("Sania").Activate > End Sub > > File terlampir. > > Pertanyaannya: > Apakah kedua code tsb mengandung kelemahan? > > Salam, > HK > > >
