Contoh :
With lst_Barang
.ColumnCount = 3
.ColumnHeads = True
.ColumnWidths = "40;140"
.RowSource = Worksheets("db_Barang").Range(area).Address(external:=True)
End With
_
Kalau bisa 1 menit kenapa harus 1 harian...!!!