Terima kasih Pak Eira. Code-nya berjalan dengan baik dan memudahkan pekerjaan saya
On Wed, Nov 16, 2016 at 3:27 PM, Eira I Arie [email protected] [belajar-excel] <[email protected]> wrote: > > > Hi Asam Gatal : > > saya mencoba belajar menjawab , semoga sesuai dengan keinginan .. > > silakan masukkan code vba sbb : > > *Sub Button1_Click()* > *mulai = Range("j13").Value* > *sampai = Range("m13").Value* > > *For i = mulai To sampai* > > * Worksheets("SK").Range("h5").Value = Worksheets("DATA").Cells(1 + i, > 1).Value* > > * Worksheets("sk").PrintOut* > > *Next i* > > *End Sub* > > jangan lupa save as ke macro enabled .. > > file terlampir > > > On Wednesday, November 16, 2016 3:02 PM, "asam gatal [email protected] > [belajar-excel]" <[email protected]> wrote: > > > > Kepada para Master dan segenap anggota milis. > > Mohon saya dibantu kode VBA. Mohon dilihat pada sheet SK. Selama ini saya > mencetak secara satu per satu. Saya ingin ketika kolom J13 dan M13 diisi > angka dan tombol CETAK di-klik, maka yang dicetak adalah sesuai dengan > nomor yang dimasukkan pada kolom J13 dan M13 itu dan datanya sesuai dengan > apa yang ada pada sheet DATA. > > Misalnya pada cell J13 diisi dengan angka 1 dan pada cell M13 diisi angka > 4, maka ketika tombol CETAK di-klik, maka yang tercetak adalah SK-SK dari > pegawai nomor urut 1 sampai dengan nomor urut 4. Jadi saya tidak perlu lagi > mencetak satu per satu. Terima kasih > > > >
