Case 1 = Saya memiliki 1 tabel yang bernama Transaksi, dan pada tabel tersebut terdapat Total Row yang berada paling bawah. Permasalahannya adalah, saya tidak bisa mengisi di dalam tabel, karena terdapat Total Row tersebut.Bagaimana caranya agar dapat mengisi di dalam tabel, jika saya menggunakan rumus seperti di bawah ini? Dim irow As LongDim ws As WorksheetSet ws = Worksheets("Sheet1") irow = ws.Cells.Find(What:="*", searchorder:=xlRows, searchdirection:=xlPrevious, LookIn:=xlValues).Row + 1ws.Cells(irow, 3).Value = Me.Barang.Valuews.Cells(irow, 5).Value = Me.Harga.Valuews.Cells(irow, 6).Value = Me.Satuan.Value End Sub
Terima kasih.