Coba ganti formulanya menjadi : =IF((A2=A1)*(B2=B1),D1,TEXT(IFERROR(LEFT(D1,4)*1,0)+1,"0000")&"/KAR/ME/"&ROMAN(MONTH(A2))&"/"&YEAR(A2))
Syarat : pada tanggal yang sama, jika ada data nama yang sama, maka record
yang namanya sama haruslah berurutan.
Jangan lupa untuk mengubah petik (") menjadi dua buah petik ("") saat
dipasang dalam VBA.
Wassalam,
Kid.
2013/3/28 vincent Yoes <vince...@yahoo.com>
> Mantab mas jan raisin...ini yg saya mau...
>
> maap mas mau tanya lagi kalo kriterianya tanggal dan nama sama maka
> nomornya sama.(contoh terlampir)
>
> terima kasih pencerahannya mas jan raisin....
>
>
> ------------------------------
> *From:* Jan Raisin <miss.jan.rai...@gmail.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Wednesday, March 27, 2013 6:50 PM
>
> *Subject:* Re: [belajar-excel] penomoran dengan vba
>
>
> Pinjam solusi formulanya pak Zainul Ulum ya..
>
> script vba-nya menjadi seperti ini:
>
> Sub IdNumber()
> Dim lRow As Long
>
> lRow = Cells(Rows.Count, 1).End(xlUp).Row
> Range(Cells(2, 4), Cells(lRow, 4)).Formula =
> "=TEXT(ROWS($A$2:A2),""0000"")&"" / KAR / Me / ""&ROMAN(MONTH(A2))&"" /
> ""&YEAR(A2)"
> Range(Cells(2, 4), Cells(lRow, 4)).Value = Range(Cells(2, 4),
> Cells(lRow, 4)).Value
> End Sub
>
> Wassalam,
>
> -Miss Jan Raisin-
>
> Pada 28 Maret 2013 08.35, vincent Yoes <vince...@yahoo.com> menulis:
>
> siap bung zainul_ulum thanks buat rumusnya cuma kalo rumus itu di vba
> jadinya gimana ya...
> jadi nomor tersebut tadinya kosong setelah kita pencet cmd nomor, maka
> identitasnya langsung terisi dengan format tersebut.
> mohon pencerahannya terima kasih....
>
> ------------------------------
> *From:* zainul_ulum[at]yahoo[dot]com <zainul_u...@yahoo.com>
> *To:* belajar-excel@yahoogroups.com
> *Sent:* Wednesday, March 27, 2013 4:05 PM
> *Subject:* RE: [belajar-excel] penomoran dengan vba
>
>
> Coba membantu kalo Kalo pakai rumus
> =TEXT(ROWS($A$2:A2),"0000")&"/KAR/ME/"&ROMAN(MONTH(A2))&"/"&YEAR(A2)
>
> *From:* belajar-excel@yahoogroups.com [mailto:
> belajar-excel@yahoogroups.com] *On Behalf Of *vincent Yoes
> *Sent:* Wednesday, March 27, 2013 2:34 PM
> *To:* exel milis
> *Subject:* [belajar-excel] penomoran dengan vba
>
>
> Dear Rekan-rekan Exceller
>
> mohon pencerahannya untuk penomoran dengan menggunakan VBA.
> data terlampir.
>
>
> Terima Kasih atas pencerahannya
>
>
>
>
>
>
>
<<image002.jpg>>
<<image001.jpg>>
