Hot Fox: Re: ]] XL-mania [[ mengambil karakternya saja

quarta-feira, 26 de agosto de 2009

Re: ]] XL-mania [[ mengambil karakternya saja

harusnya bisa diselesaikan dengan JURUS# 40 <menghilangkan tahun dari Kalimat>
pada "kitab 50 jurus rahasia XL" yg termasyhur itu..;
tetapi jika angkanya lebihbesar daripada jumlah row di sheet excel yg dipakai....
(coba saja sendiri..)

mungkin ada cara lain, kita tunggu dari para pakar dan para empu..

sementara itu, apa boleh pakai UDF VBA ???

Function TolakAngka(S As String) As String
'--------------------------
' siti Vi / UDF TolakAngka
' "pengganti Tolak Angin"
' bluewater, 26 agu 2009
'--------------------------
Dim i As Integer, k As String, kal As String
S = Trim(S)
For i = 1 To Len(S)
k = Mid(S, i, 1)
If IsNumeric(k) Or k = "." Or k = "," Or k = "Rp " Then k = ""
kal = kal & k
Next
TolakAngka = Trim(kal)
End Function
'--------------------------

2009/8/25 Rahmat Basuki <bzxrahmat@gmail.com>
>
> Dear all friends
> Mohon bantuannya untuk memecahkan kasus terlampir.
> Karena dari referensi yang lama Hanya mengambil angkanya saja.
> Terima kasih
>
> Best Rgds
> Basuki

__._,_.___

Messages in this topic (5) 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              |
+-------------------------------------------------------------------+

MARKETPLACE

Mom Power: Discover the community of moms doing more for their families, for the world and for each other