Proses pencetakan label yang biasa dari Microsoft Excel melibatkan penggabungan spreadsheet dengan Microsoft Word. Tetapi beberapa orang lebih suka menyelesaikan semua tugas di dalam Excel. Untungnya, ada cara untuk mencetak label di Excel tanpa terlibat dengan Word. Tutorial ini akan fokus pada bagaimana cara menyelesaikannya.

Unduh Buku Kerja Praktik

Anda dapat mengunduh buku kerja dengan dataset dan makro yang digunakan untuk demonstrasi dari tautan di bawah ini dan menggunakannya sebagai templat Anda.

Cetak Label Tanpa Word.xlsm

Ini adalah file yang berisi label yang dapat dicetak.

Cetak Label Tanpa Word.pdf

Prosedur Langkah-demi-Langkah untuk Mencetak Label di Excel Tanpa Word

Untuk mencetak label langsung dari Excel tanpa menggunakan Microsoft word, kita hanya perlu mencetak spreadsheet Excel dengan ukuran label yang sesuai. Kita bisa mengubah ukuran cell yang sesuai dengan ukuran label tersebut. Kita akan menggunakan kode VBA untuk melakukan tugas tersebut untuk kita.

Pertama, mari kita asumsikan kita memiliki dataset berikut ini.

Pertama-tama kita akan mengubah setiap data menjadi label dan kemudian mencetaknya di Excel tanpa menggunakan bantuan dari Word.

Untuk tujuan menggunakan Microsoft Visual Basic for Applications (VBA) di Excel, pertama-tama Anda memerlukan Pengembang Klik di sini untuk melihat bagaimana Anda dapat menampilkan tab Developer pada pita Anda Setelah Anda memilikinya, terus ikuti langkah-langkah yang telah kami tunjukkan untuk mencetak label ini di Excel tanpa Word.

Langkah 1: Salin Data ke Sheet Baru

Pemilihan kode VBA di sini hanya bisa berfungsi dengan baik jika entri sel dimulai dari sel A1 Jadi, pertama-tama kita harus mengatur dataset kita yang berisi semua label sedemikian rupa. Jika dataset Anda dimulai di mana saja selain cell A1 seperti kami, yang dimulai dari sel B5 Pertama-tama, salin dulu ke dalam spreadsheet baru dan letakkan di bagian paling awal. Seharusnya terlihat seperti ini.

Sekarang seharusnya sudah siap untuk bekerja dengan kode VBA.

Langkah 2: Masukkan Kode VBA

Selanjutnya, kita perlu menyisipkan kode VBA untuk menyesuaikan label dengan ukuran dan bentuk yang kita inginkan. Untuk menyisipkan kode VBA-

• Pertama, pergi ke Pengembang pada pita Anda.
• Kemudian pilih Visual Basic dari Kode kelompok.

• Hasilnya, jendela VBA akan terbuka. Sekarang pilih Sisipkan di dalamnya dan pilih Modul dari menu drop-down.

• Setelah itu, buka modul dan tuliskan kode berikut.

 'Kode Ini Akan Membuat Label di Excel Sub Createlabels() Application.Run "AskForColumn" Cells.Select Selection.RowHeight = 75.75 Selection.ColumnWidth = 34.14 With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With Selection.HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With End Sub Sub AskForColumn() Dim refrg As Range Dim vrb As Long Dim dat As Long Set refrg = Cells(Rows.Count, 1).End(xlUp) dat = 1 On Error Resume Next incolno = InputBox("Enter Number ofColumns Desired") For vrb = 1 To refrg.Row Step incolno Cells(dat, "A").Resize(1, incolno).Value = _ Application.Transpose(Cells(vrb, "A").Resize(incolno, 1))) dat = dat + 1 Next Range(Cells(dat, "A"), Cells(refrg.Row, "A")).ClearContents End Sub 

🔎 Penjelasan Kode

Ada dua bagian atau sub-bagian dalam kode VBA ini- bagian BuatLabel sub dan AskForColumn Pertama, kita akan menjelaskan apa yang terjadi di sub AskForColumn dan kemudian beralih ke sub CreateLabel untuk menjelaskan bagaimana kode bekerja.

Bagian 1:

Untuk pemahaman yang lebih baik, kami telah membagi porsi menjadi beberapa bagian yang berbeda. Lihatlah gambar di akhir diskusi.

👉 Bagian 1: Bagian ini mendeklarasikan nama sub AskForColumn .

👉 Bagian 2: Kita telah menggunakan bagian ini untuk mendeklarasikan tiga variabel- refrg, vrb, dan data.

👉 Bagian 3: Pada bagian ini, kami telah menetapkan nilai untuk refrg dan data.

👉 Bagian 4: Pada titik ini, kode menunjukkan kotak input pada spreadsheet.

👉 Bagian 5: Pada bagian ini, a Untuk loop dijalankan untuk nomor yang dimasukkan dalam kotak input.

👉 Bagian 6: Bagian kode ini sekarang mengubah ukuran sel.

👉 Bagian 7: Terakhir, bagian ini membersihkan isi ekstra.

Bagian 2:

Mirip dengan bagian sebelumnya, kami juga telah membagi sub ini ke dalam beberapa bagian yang berbeda. Ikuti gambar di akhir pembahasan untuk bagian visual.

👉 Bagian 1: Bagian kode ini mendeklarasikan nama sub Createlabels .

👉 Bagian 2: Perintah ini menjalankan sub sebelumnya pada titik kode ini.

👉 Bagian 3: Bagian ini memformat setiap sel menggunakan VBA Sel properti.

Langkah 3: Jalankan Kode VBA

Setelah Anda memasukkan kode, tutup jendela VBA. Untuk menjalankan kode sekarang ikuti langkah-langkah berikut.

• Pertama, pergi ke Pengembang pada pita Anda.
• Kedua, pilih Makro dari Kode kelompok.

• Sekarang di Makro kotak, pilih Createlables di bawah Nama makro .

• Kemudian klik pada Lari .
• Selanjutnya, pilih jumlah kolom yang Anda inginkan. Kami memilih 3 untuk demonstrasi. Kemudian klik pada OK .

Spreadsheet sekarang akan terlihat seperti ini secara otomatis.

Label sekarang siap dicetak di Excel tanpa menggunakan Word.

Baca selengkapnya: Cara Mencetak Label dari Excel di Word (dengan Langkah Mudah)

Langkah 4: Tetapkan Margin Khusus

Untuk mencetak label, kita perlu mengatur margin yang benar untuk halaman yang dicetak. Untuk itu, kita harus memilih ukuran yang tepat sedemikian rupa sehingga tidak mempengaruhi posisi label atau mengorbankan label apa pun pada lembar. Untuk mengatur margin khusus, ikuti langkah-langkah berikut.

• Pertama-tama, pergi ke Tata Letak Halaman pada pita Anda.
• Kemudian pilih Pengaturan Halaman Anda bisa menemukannya di kanan bawah setiap grup.

• Sebagai hasilnya, yang Pengaturan Halaman akan muncul. Sekarang pergi ke kotak Margin tab di dalamnya.
• Kemudian pilih panjang margin yang diinginkan untuk halaman cetak Anda. Kami telah memilih yang berikut ini.

• Setelah Anda selesai, klik pada OK .

Langkah 5: Pilih Opsi Penskalaan untuk Pencetakan

Penskalaan yang tepat juga penting untuk mencetak label. Misalnya, apa yang telah kita lakukan sampai sekarang akan mencetak halaman seperti ini.

Yang tentu saja bukan tujuan kita. Jadi kita perlu menyesuaikan lembaran pada satu halaman. Untuk melakukan itu-

• Pertama, masuk ke bagian pratinjau cetak dengan menekan Ctrl + P pada keyboard Anda.
• Di kiri bawah tampilan, Anda bisa menemukan Pengaturan Di bawah itu, Anda akan menemukan Penskalaan opsi di bagian akhir.

• Sekarang klik pada opsi penskalaan dan pilih Lembar Kecocokan pada Satu Halaman dari menu drop-down.

Penskalaan untuk label akan selesai pada titik ini.

Baca selengkapnya: Cara Mencetak Label Alamat di Excel (2 Cara Cepat)

Langkah 6: Cetak Spreadsheet

Sewaktu Anda masih berada pada layar pratinjau cetak, klik pada Cetak di kiri atas tampilan.

Klik di atasnya dan ini akan mencetak semua label di Excel tanpa bantuan dari Word.

Hal-hal yang Perlu Diingat

👉 Sebelum menjalankan kode VBA, pastikan semua label Anda dimulai dari sel A1 .

👉 Pilih margin dan penskalaan yang tepat sebelum mencetak sehingga semua label muat pada halaman. Jika tidak, beberapa label mungkin akan terpotong.

👉 Tindakan kode VBA tidak dapat diubah. Jadi pastikan Anda memiliki data yang diperlukan yang dicadangkan sebelum menjalankannya.

Kesimpulan

Ini adalah langkah-langkah yang harus diikuti untuk mencetak label di Excel tanpa menggunakan atau menggabungkan Microsoft Word. Mudah-mudahan, Anda sekarang dapat mencetak label di Excel tanpa Word. Saya harap panduan ini bermanfaat dan informatif bagi Anda. Jika Anda memiliki pertanyaan atau saran, beri tahu kami di komentar di bawah.

Untuk panduan lainnya seperti ini, kunjungi Exceldemy.com .