Tecnologia, programação e muito Visual FoxPro.

segunda-feira, 16 de dezembro de 2013

Re: ]] XL-mania [[ Menghilangkan dan menambah titik di ujung teks

 

Hai Aceu Setiawan,

Misal data di A1, maka pada B1 diberi formula :
* asumsi : data hanya boleh berisi 1 buah karakter titik. Seluruh karakter mulai titik kedua akan dibuang.
>> x.a.b.  -> .b. akan dibuang menjadi x.a
=Trim( Left( Substitute( a1 & ".." , "." , Rept( " " , 99 ) , 2 ) , 99 ) )

* asumsi : data minimal berisi 1 buah karakter titik dan karakter titik kedua dan seterusnya tidak boleh dikarakter terakhir
>> x.a.b. -> karakter titik terakhir dibuang menjadi x.a.b
=IF( CountIF( a1 , "*.*." ) , Left( a1 , Len( a1 ) - 1 ) , IF( CountIF( a1 , "*.*" ) , a1 , a1 & "." ) )

Wassalam,
Kid.



2013/12/5 aceu setiawan <setiawankartawidjaya@gmail.com>
 

dear para master xl yang saya banggakan..

saya punya kasus seperti ini bagaimana cara merubah menghilangkan
tanda titik diujung teks dan menambahkan tanda titik untuk kasus
tertentu
contoh kasus :

CAX8027.01. titik paling ujung hilang jadi CAX8027.01
CII5003P.04 TIDAK BERUBAH SUDAH BENAR CII5003P.04
CII5059P. TIDAK BERUBAH SUDAH BENAR CII5059P.
CI0R5447P.04. TITIK PALING UJUNG HILANG JADI C10R5447P.04
CII5059P TIDAK ADA TITIK HARUS ditambah titik jadi CII5059P.

terima kasih atas solusi yang telah diberikan dari teman teman semua

Best Regard,

Aceu Setiawan


__._,_.___
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (2)
Recent Activity:
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Maaf moderasi terlambat karena yahoogroups sering error           |
+-------------------------------------------------------------------+
| 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.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              |
+-------------------------------------------------------------------+
.

__,_._,___

Nenhum comentário:

Arquivo do blog