Re: ]] XL-mania [[ Hapus Formula

 

Kita biking yang baru saja..

Cari semua cell yg berisi FORMULA
Jika ketemu di HAPUS formulanya (jadi blank dech..)
Sub hapusSemuahFormulah()
Dim xCel As Range
For Each xCel In ActiveSheet.UsedRange
If xCel.HasFormula = True Then xCel.ClearContents
Next
End Sub

Cari semua cell yg berisi FORMULA
Jika ketemu formula diganti dengan VALUE (hasil) formula tsb
Sub ValueSemuahFormulah()
Dim xCel As Range
For Each xCel In ActiveSheet.UsedRange
If xCel.HasFormula = True Then xCel = xCel.Value
Next
End Sub


2009/8/21 sh.ronald <sh.ronald@yahoo.co.id>
>
> 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

__._,_.___

Messages in this topic (2) Reply (via web post) | Start a new topic

Messages

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Selamat menjalankan ibadah puasa...                               |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+

Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch format to Traditional
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

Recent Activity

•  66
  New Members

Visit Your Group

Give Back

Yahoo! for Good

Get inspired

by a good cause.

Y! Toolbar

Get it Free!

easy 1-click access

to your groups.

Yahoo! Groups

Start a group

in 3 easy steps.

Connect with others.

.

__,_._,___