Wew, Excel-Id ada ada ajah. Kalo memang di pemberitaan dan medsos maupun Youtube membahas penggandaan uang oleh Kanjeng Dimas maka saya coba menciptakan cara cepat meniru Worksheet atau lembar kerja pada Ms. Excel memakai pemberian coding / script VBA. Tidak sulit menciptakan penggandaan worksheet saya kira daripada meniru uang ibarat Kanjeng Dimas itu. Mau tahu caranya?
Neh, sebelum saya buatkan bagaimana cara meniru worksheet terlebih dahulu saya uraikan klarifikasi singkat kenapa perlu penggandaan worksheet? yah, bagi Anda yang sudah terbiasa memakai Ms. Excel sebagai pengolahan kata tentunya hal tersebut sering dilakukan atau minimalnya pernah melaksanakan penambahan worksheet. Penambahan disini bukan berarti menambahkan sheet gres tapi meniru atau menduplikasi worksheet yang sudah ada menjadi beberapa sheet sesuai dengan jumlah yang telah ditentukan oleh anda sendiri.
Conotoh jelasnya misalkan saya akan meniru worksheet1 dengan nama "Sheet1" maka jikalau saya gandakan menjadi 4 maka akan terdapat nama worksheet "sheet1(1), Sheet1(2), sheet1(3)" dan seterusnya hingga dengan jumlah yang digandakannya.
Baiklah berikut coding / sript VBA Excelnya
Sub Gandakan()
On Error Resume Next
Dim JmlGanda As Integer
JmlGanda = InputBox("Tuliskan jumlah yang akan digandakan")
For numtimes = 1 To JmlGanda
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub
Code tersebut dibentuk pada Module jadi Anda harus menambahkan module tersebih dahulu untuk cara menambahkan module sudah pernah saya bahas pada artikel sebelumnya silakan cari dengan memakai kemudahan pencarian yang ada di blog excel-ID ini.
Setelah Anda menciptakan coding diatas dengan benar langkah berikutnya kita panggil module nya dengan memakai tombol. Saya akan menciptakan tombol dengan CommandButton yang disisipkan ke Worksheet
Pada jendela Assign Macro silakan Anda pilih Macro Name "Gandakan" lalu klik OK dan coba Anda jalankan dengan mengklik tombol "Gandakan worksheet" dan lihat hasilnya.
Sudah mencoba tutorial ini, apakah Anda mengalami problem dalam berguru cara meniru worksheet? silakan berkomentar pada kolom komentar dibawah.
Selamat Mencoba. Sumber http://www.excel-id.com/