22 Januari 2014

Mempersingkat Nama Depan, Tengah dan Nama Belakang

Ass.Wr.Wb.

Selamat siang para pembaca, hari ini saya akan posting rumus untuk memodifikasi teks, kebetulan ada kasus mempersingkat nama. Nah biasanya yang lazim yang disingkat adalah nama depan, nama tengah, tapi nama belakang disingkat juga lazim sih....

Joko Santoso Mulyono disingkat menjadiJ. Santoso Mulyono atau Joko S. Mulyono atau Joko Santoso M.


Solusi Mempersingkat Nama Depan:

=LEFT(A1;1)&". "&MID(A1;FIND(" ";A1)+1;255)

atau

=REPLACE(A1;2;FIND(" ";A1)-2;".")

Solusi Mempersingkat Nama Tengah:

=REPLACE(A1;FIND(" ";A1)+2;FIND(" ";A1;FIND(" ";A1)+1)-FIND(" ";A1)-2;".")

atau

=CHOOSE(LEN(A1)-LEN(SUBSTITUTE(A1;" ";""));A1;SUBSTITUTE(A1;MID(A1;SEARCH(" ";A1)+1;SEARCH(" ";A1;SEARCH(" ";A1)+1)-SEARCH(" ";A1));MID(A1;SEARCH(" ";A1)+1;1)&". "))


Solusi Mempersingkat Nama Belakang:

=TRIM(LEFT(A1;SEARCH(" ";A1;SEARCH(" ";A1;1)+1)))&" "&MID(A1;FIND(" ";A1;FIND(" ";A1;1)+1)+1;1)&"."

atau

=LEFT(TRIM(A1);FIND("~";SUBSTITUTE(A1;" ";"~";LEN(TRIM(A1))-LEN(SUBSTITUTE(TRIM(A1);" ";""))))-1)&" "&MID(A1;FIND("~";SUBSTITUTE(A1;" ";"~";LEN(A1)-LEN(SUBSTITUTE(A1;" ";""))))+1;1)&"."

 Solusi Mempersingkat 2 Nama Depan:

=LEFT(A1;1)&"."&(MID(A1;FIND(" ";A1;1)+1;1))&". "&TRIM(RIGHT(SUBSTITUTE(A1;" ";REPT(" ";256));256))


Solusi Membuat Inisial:

Misalkan dari contoh nama diatas kita ingin membuat inisialnya, dari Joko Santosa Mulyono menjadi JSM, nah rumusnya.....

=IFERROR(LEFT(A1;1)&(MID(A1;FIND(" ";A1;1)+1;1))&MID(A1;FIND(" ";A1;FIND(" ";A1)+1)+1;1);LEFT(A1;1)&(MID(A1;FIND(" ";A1;1)+1;1)))

atau

=IF(LEN(A1)-LEN(SUBSTITUTE(A1;" ";""))=0;LEFT(A1;1);IF(LEN(A1)-LEN(SUBSTITUTE(A1;" ";""))=1;LEFT(A1;1)&MID(A1;FIND(" ";A1)+1;1);LEFT(A1;1)&MID(A1;FIND(" ";A1)+1;1)&MID(A1;FIND(" ";A1;FIND(" ";A1)+1)+1;1)))

Dicoba ya.....matursuwun

Rizky

Download File Latihan