Dear XL Ronald,
Tanpa bermaksud menyalahkan solusi dari Pakar-Pakar XL yang lain.
Berikut solusi yang bisa dijadikan alternatif :
Sub HapusFormula()
With Worksheets("Sheet1")
.Cells.Copy
.Cells.PasteSpecial _
Paste:=xlPasteValues
End With
End Sub
Nama worksheetnya silahkan disesuaikan...
Atau bisa dengan cara manual juga:
1. Tekan Ctrl + A kemudian klik kanan --> copy
2. Click Kanan Lagi --> Paste Special --> Paste Values --> OK
Intinya adalah meng-copy seluruh sel pada worksheet yang dimaksud dan
mem-paste kembali dalam bentuk valuenya saja. Jangan khawatir dengan
formatnya, karena tidak akan berubah.
Dari pengalaman saya, waktu prosesnya lebih cepat dibanding harus
mencari satu persatu sel yang ada formulanya...
Mungkin para Pakar XL yg lain ada yang punya solusi yang lebih baik?
Boleh dishare supaya kita bisa sama-sama belajar...
Terima kasih
Salam Sukses,
Marly Lumenta
Klub Sukses Unilever Jakarta
________________________________
From: [email protected] [mailto:[email protected]] On
Behalf Of sh.ronald
Sent: Friday, August 21, 2009 4:31 PM
To: [email protected]
Subject: ]] XL-mania [[ Hapus Formula
Sore rekan rekan,
Beberapa tahun yang lalu ada VBA untuk menghapus seluruh formula/rumus
dlam satu worksheet secara singkat menggunakan VBA.
Kalo ada boleh donk di share.
Ronald
