Kasus A
Rumus Nama Depan:
=LEFT(A2;SEARCH(" ";A2;1)-1)
Rumus Nama Belakang
=TRIM(RIGHT(SUBSTITUTE(A2;" ";REPT(" ";99));99))
Kasus B
Rumus Nama Depan:
=LEFT(A7;SEARCH(" ";A7;1)-1)
Rumus Nama Tengah:
=TRIM(MID(SUBSTITUTE(A7;" ";REPT(" ";99));100;99))
Rumus Nama Belakang:
=TRIM(RIGHT(SUBSTITUTE(A7;" ";REPT(" ";99));99))
Kasus C
Rumus menghilangkan sebutan atau gelar di depan nama:
=TRIM(RIGHT(A12;LEN(A12)-SEARCH(" ";A12)))
Kasus D
Rumus konversi:
=MID(A18;SEARCH(" ";A18)+1;50)&" "&LEFT(A18;SEARCH(" ";A18;1)-2)
Kasus E
Rumus konversi:
=TRIM(RIGHT(SUBSTITUTE(A24;" ";REPT(" ";99));99))&", "&LEFT(A24;(FIND("|";SUBSTITUTE(A24;" ";"|";2)))-1)
Kasus F
Rumus memisahkan teks nama yang tanpa spasi tetapi harus ada huruf kapitalnya pada setiap awal kata karena untuk penanda
=TRIM(MID($A30;(SMALL(FIND(0;SUBSTITUTE($A30;CHAR(ROW(INDIRECT("65:90")));0)&0);COLUMNS($A$1:A$1)));(SMALL(FIND(0;SUBSTITUTE($A30;CHAR(ROW(INDIRECT("65:90")));0)&0);COLUMNS($A$1:A$1)+1))-(SMALL(FIND(0;SUBSTITUTE($A30;CHAR(ROW(INDIRECT("65:90")));0)&0);COLUMNS($A$1:A2)))))
*rumus ini rumus array, you need to be sure press all together CTRL+SHIFT+ENTER button, ENTER alone don't works
Kasus G
Rumus menambahkan spasi pada teks nama yang tidak ada spasinya dan minimal harus ada huruf kapital setiap awal kata.
=TRIM(LEFT(A35;MIN(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))))))&" "&MID(A35;1+MIN(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1)))));SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2)-MIN(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))))))&" "&LEFT(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");MIN(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");2;255)&(CHAR(64+COLUMN($A$1:$W$1))))))&" "&SUBSTITUTE(SUBSTITUTE(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");LEFT(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");MIN(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");2;255)&(CHAR(64+COLUMN($A$1:$W$1))))));"");MID(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");MIN(FIND(ROW($1:$10)-1;REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"")&5^19));255);"")&" "&MID(REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"");MIN(FIND(ROW($1:$10)-1;REPLACE(A35;1;SMALL(FIND(CHAR(64+COLUMN($A$1:$W$1));MID(A35;2;255)&(CHAR(64+COLUMN($A$1:$W$1))));2);"")&5^19));255))
rumus terakhir ini juga rumus array, jangan lupa caranya yaaa...
FILE LATUHAN
Terima kasih pak.. sangat bermanfaat
BalasHapuskita mau menghilang gelar misal: Dr. dr. Karim menjadi Karim
Hapuskita mau menghilangkan gelar Misalnya: Dr. dr. Karim menjadi Karim
BalasHapusJika anda punya nama di cell A1, tempatkan rumus ini di B1
BalasHapus=MID(A1;1+FIND("~";SUBSTITUTE(A1;" ";"~";2));255)