Tecnologia, programação e muito Visual FoxPro.

terça-feira, 1 de setembro de 2009

Re: ]] XL-mania [[ Fungsi F2 dalam VBA

 

barangkali dengan makro lebih otomatis
misal untuk sheet yg sedang aktif

Sub UbahBilanganToFormulaNol()
Dim x As Range
For Each x In ActiveSheet.UsedRange
If x <> "" And IsNumeric(x.Value) Then
x.Formula = "=" & x.Value & "*0"
End If
Next x
End Sub



2009/8/31 onidj_82 <onidj_82@yahoo.co.id>
 

Selamat sore....

Saya bekerja sebagai accounting di salah satau perusahaan, sekarang ini saya sedang melakukan pekerjaan mengedit data angka menjadi 0, contohnya angka 200 dikalikan 0, hasilnya 0. dan angka tersebut diharuskan pakai rumus =200*0 tidak bisa langsung di ganti 0 supaya dilain waktu kita ambil kembali angka tsb jika dibutuhkan, sekarang ini saya lakukan secara manual, sedangkan jumlah angka sekitar seribuan baris, coba anda bayangkan jika dilakukan manual harus menekan F2 lalu Home lalu pakai = dan di kali 0,bukannya saya malas untuk mengerjakan tetapi siapa tau Anda yg selaku mahir dalam VBA bisa membuat satu listing macro yang mana jika di klik tombol tersebut maka secara otomatis angka tersebut dari angka sebelumnya 200 menjadi =200*0 sehingga hasilnya 0.
Terima kasih atas bantuannya.

Terima kasih

Wassalam


__._,_.___
+-:: 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              |
+-------------------------------------------------------------------+
Recent Activity
Visit Your Group
Yahoo! Finance

It's Now Personal

Guides, news,

advice & more.

Yahoo! Groups

Mom Power

Discover doing more

for your family

Yahoo! Groups

Small Business Group

Share experiences

with owners like you

.

__,_._,___

Nenhum comentário:

Arquivo do blog