alo yokanan wahyono,
berikut ini script macronya (plus di-set format ke GENERAL) :
'-------------
Sub GeneralKosong()
Cells.Select
Selection.Delete Shift:=xlUp
Selection.NumberFormat = "General"
Range("A1").Select
End Subsemoga bisa membantu... regards, -suki- Info terbaru ttg Fujitsu; Kopdar Pertama di Jkt: kunjungi http://top31.net/fujitsu-fans-club/ Koleksi Semua Artikel Menarik: http://www.gsn-soeki.com/wouw/ .

