Vba: cara menyalin rentang ke lembar lain

Anda dapat menggunakan sintaks berikut di VBA untuk menyalin rentang sel ke lembar lain:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial

Application.CutCopyMode = False

End Sub

Makro khusus ini akan menyalin sel dalam rentang A1:C11 dari Sheet1 dan menempelkannya ke dalam rentang yang dimulai pada sel A1 dari Sheet2 .

Catatan : Baris Application.CutCopyMode = False menetapkan bahwa mode potong dan salin harus dinonaktifkan setelah makro dijalankan.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Salin Rentang ke Lembar Lain Menggunakan VBA

Katakanlah kita memiliki kumpulan data berikut dalam lembar bernama Sheet1 di Excel yang berisi informasi tentang berbagai pemain bola basket:

Anggaplah kita juga mempunyai sheet lain bernama Sheet2 yang saat ini kosong:

Katakanlah kita ingin menyalin semua nilai dalam rentang A1:C11 dari Sheet1 dan menempelkannya mulai dari sel A1 dari Sheet2 .

Kita dapat membuat makro berikut untuk melakukan ini:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial

Application.CutCopyMode = False

End Sub

Saat kami menjalankan makro ini, kami menerima output berikut di Sheet2 :

Perhatikan bahwa semua nilai dalam rentang A1:C11 dari Sheet1 disalin ke Sheet2 dari sel A1 .

Secara default, nilai ditempelkan dengan format sumbernya.

Misalnya, nilai baris header dicetak tebal.

Jika Anda hanya ingin menempelkan nilai tanpa format sumber, Anda dapat menentukan Tempel:=xlPasteValues sebagai berikut:

 Sub CopyRangeToSheet()

Worksheets(" Sheet1 ").Range(" A1:C11 ").Copy
Worksheets(" Sheet2 ").Range(" A1 ").PasteSpecial Paste=xlPasteValues

Application.CutCopyMode = False

End Sub

Saat kami menjalankan makro ini, kami menerima output berikut di Sheet2 :

Perhatikan bahwa hanya nilai (tanpa pemformatan) dari rentang A1:C11 dari Sheet1 yang disalin ke Sheet2 .

Catatan : Anda dapat menemukan dokumentasi lengkap untuk metode VBA PasteSpecial di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menempelkan nilai saja tanpa memformat
VBA: Cara menyalin garis yang terlihat ke lembar lain
VBA: menyalin baris ke lembar lain berdasarkan kriteria