kirimpertanyaan

 

Belajar dan konsultasi masalah Excel      

Macro & VBA, Hits: 44, Comments: 2, Bookmarked: 0, Followers: 5

Saya sudah mencoba membuat script untuk membuat penomoran otomatis hasil search dari berbagai sumber, tetapi saya butuh penomoran itu dimulai dari angka 001, berikut script macro saya publikasikan : 

inilah scriptnya :

Dim BarisAwal As Range, BarisAkhir As Long, x As Long 

Set BarisAwal = Worksheets("DATA UMUM").Range("A5").CurrentRegion 

BarisAkhir = BarisAwal.Rows.Count 

x = BarisAkhir - 1 

Me.TxtItemNo.Value = x - 1 

Hasilnya memang bisa membuat penomoran otomatis, tetapi tidak bisa memulai penomoran dengan diawali dari angka 001 sd 099 sedangkan untuk 100 keatas tidak menggunakan angka 0 diawal, 

Saya sangat berharap ada yang dapat membantu saya !!!

Last Modified: Saturday, December 24, 2016


sulung
Monday, December 19, 2016
0% of 0 votes

Tambahkan code number format

Selection.NumberFormat = "000"

 

Semoga membantu


dawala
24 Dec 2016
0

Jika saya menggunakan :

Selection.NumberFormat = "000"

Hasilnya tidak tampil pada userform yang saya buat,  Jika saya klik tombol "NEW" di userform seharusnya tampil nomor surat dengan urutan nomor dimulai dari hitungan 001 sd 099, sedangkan untuk 100 dst, tidak menggunakan angka NOL, atau bila tepatnya bisakan format number tersebut digabungkan pada script yang saya buat, bila bisa bagaimana perubahan pada scriptnya, mohon petunjuknya ?1


sulung
24 Dec 2016
0

Kitab VBA Excel Level Satu

Buat pemula yang serius pengen belajar MACRO VBA Excel, silahkan baca buku berikut:

Kitab VBA Excel Level Satu edisi 2 sEDISI 2 : Rp. 60.000

BELI VERSI CETAK KLIK DI SINI

BELI VERSI DIGITAL KLIK DI SINI

LIHAT PREVIEW KLIK DI SINI

 523952 342835842418972 309765083 n

EDISI 1 : DISKON 50% - Rp. 30.000

UNTUK PEMBELIAN KONTAK :

Call/SMS/ whatsapplogo : 0812 1283 1148

Partners

logo baru local1news

Newsletter

Daftarkan email anda untuk mendapatkan update dari Klinik Excel