]] XL-mania [[ Re: Memberikan tanda titik

 

=SUBSTITUTE(TEXT(A3,"#,###"),",",".")
Ini untuk setting pemisah ribuannya adalah koma ","

Untuk yang setting ribuannya adalah titik = TEXT(A3,"#.###")

--- In XL-mania@yahoogroups.com, "nanwn2009" <nanwn2009@...> wrote:
>
>
> KETIK FUNGSI user defined sbb:
> (caranya tekan Alt-F11 -lalu- insert module )
>
> Function TITIKS(ANGKA)
> ANGKA = Int(Val(ANGKA))
> Dim NO As Integer
> For U = Len(ANGKA) To 1 Step -1
> NO = NO + 1
> TITIKS = Mid(ANGKA, U, 1) & TITIKS
> If NO Mod 3 = 0 Then TITIKS = "." & TITIKS
> Next
> If Left(TITIKS, 1) = "." Then TITIKS = Right(TITIKS, Len(TITIKS) - 1)
> End Function
> ----------------------------
> setelah selesai kembali ke worksheet
> lalu di cell kosong ketikkan:
> =TITIKS(A3)
> atau
> =TITIKS(49000)
>
> Lalu lihat hasilnya.
>
> nb: rumus diatas hanya berhasil utk angka (numerik)
> dan angka tsb tidak memiliki desimal
> atau angka bulat saja, nama rumusnya titiks berarti titik Sederhana

__._,_.___

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

Messages

+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Moderasi akan lambat minggu ini, momods pergi ke tempat jauh      |
| 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

•  92
  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.

.

__,_._,___