Alhamdulillah...
terima kasih atas tanggapannya pak Hendrik dan mba egi...

pak hendrik... Oya, saya lupa Headernya  kolom di A1 dan B1
    Range("A1:A"  saya coba ganti menjadi Range("A2:A" tapi malah restar...


mba egi... bagaimana jika ada Headernya di kolom A1 dan B1


On 11/20/14, egidia seftyanaputri [email protected]
[belajar-excel] <[email protected]> wrote:
> Wa'alaikumsalam wr. wb.,
>
> coba cekrip berikut ini:
>
> Private Sub Worksheet_Change(ByVal Target As Range)
>     With Target
>         If .Column = 2 Then
>             If Len(.Value) <> 0 Then
>                 .Offset(, -1).Value = .Row
>             End If
>         End If
>     End With
> End Sub
>
> Wassalamu'alaikum wr wb.
>
> Egi
>
> Pada 20 November 2014 11.02, supri anto [email protected]
> [belajar-excel] <[email protected]> menulis:
>
>>
>>
>> Assalamu'alaikum wr wb...
>> Para Master Excel....
>>
>> Mohon bantuannya,.
>> Bagaimana ya membuat no urut otomatis dengan macro.
>> jika kolom B terisi data maka kolom A akan otomatis No urutnya....
>>
>> Terima kasih
>> salam
>> supri
>>
>>
>

Kirim email ke