Note: The other languages of the website are Google-translated. Back to English
Masuk  \/ 
x
or
x
Daftar  \/ 
x

or

Bagaimana cara menyalin beberapa pilihan atau rentang di Excel?

Misalnya, Anda memiliki lembar kerja yang besar, dan sekarang Anda hanya ingin menyalin beberapa rentang yang dipilih dan mendistribusikan ke lembar kerja lain. Tetapi ketika Anda memilih beberapa rentang dan mengklik salin, akan ada kotak dialog prompt untuk mengingatkan Anda "Perintah itu tidak dapat digunakan pada banyak pilihan." Dalam kondisi ini, bagaimana Anda dengan cepat menyalin beberapa rentang yang dipilih? Berikut beberapa trik bagi Anda untuk menyelesaikan tugas ini.


Salin beberapa rentang yang dipilih dengan Clipboard

Dengan bantuan dari clipboard, Anda bisa menempelkan semua rentang yang dipilih ke rentang atau lembar kerja lain sekaligus. Harap lakukan sebagai berikut:

1. Klik Home > doc menyalin beberapa rentang 09 dalam clipboard grup untuk menampilkan clipboard Pane.. Lihat tangkapan layar:

2. Dan kemudian salin rentang yang dipilih yang Anda butuhkan satu per satu. Pada saat yang sama, rentang yang disalin telah muncul di clipboard Pane. lihat tangkapan layar di atas:

3. Pilih sel pertama dari rentang tujuan yang akan Anda tempelkan semua rentang yang disalin, dan klik Tempel Semua tombol di clipboard Panel.

Dan kemudian semua rentang yang disalin telah ditempelkan ke rentang tujuan yang ditentukan.

Gabungkan beberapa pilihan dengan mudah dari banyak lembar kerja / buku kerja ke dalam satu lembar kerja / buku kerja

Mungkin membosankan untuk menggabungkan lusinan lembar dari workbook yang berbeda menjadi satu lembar. Tetapi dengan Kutools for Excel's Gabungkan (lembar kerja dan buku kerja) utilitas, Anda dapat menyelesaikannya hanya dengan beberapa klik! Uji Coba Gratis Fitur Lengkap 30 hari!
iklan menggabungkan lembar buku 1

Kutools untuk Excel - Termasuk lebih dari 300 alat praktis untuk Excel. Uji coba gratis fitur lengkap 30 hari, tidak perlu kartu kredit! Get It Now

Salin beberapa rentang yang dipilih dengan kode VBA

Dengan kode VBA, Anda juga dapat menyalin beberapa rentang yang dipilih dan menempelkannya ke lembar kerja lainnya.

1. Memegangnya Ctrl kunci dan pilih beberapa rentang yang tidak berdekatan yang ingin Anda gunakan.

2. tekan lain + F11 tombol secara bersamaan untuk membuka Microsoft Visual Basic untuk aplikasi window, klik Menyisipkan > Modul, dan masukkan kode berikut ke dalam Modul:

Opsi Explicit Sub CopyMultipleSelection () Dim SelAreas () As Range Dim PasteRange As Range Dim UpperLeft As Range Dim NumAreas As Integer, i As Integer Dim TopRow As Long, LeftCol As Integer Dim RowOffset As Long, ColOffset As Integer Dim NonEmptyCellCount As Integer 'Exit jika kisaran tidak dipilih Jika TypeName (Pilihan) <> "Range" Kemudian MsgBox "Pilih kisaran yang akan disalin. Pilihan ganda diperbolehkan." Keluar dari Sub End Jika 'Simpan area sebagai objek Jarak terpisah NumAreas = Seleksi.Areas.Count ReDim SelAreas (1 Ke NumAreas) Untuk i = 1 Ke NumAreas Atur SelAreas (i) = Seleksi Area (i) Berikutnya' Tentukan kiri atas sel dalam beberapa pilihan TopRow = ActiveSheet.Rows.Count LeftCol = ActiveSheet.Columns.Count For i = 1 To NumAreas If SelAreas (i) .Row <TopRow Then TopRow = SelAreas (i) .Row If SelAreas (i) .Column <LeftCol Lalu LeftCol = SelAreas (i) .Column Berikutnya Set UpperLeft = Sel (TopRow, LeftCol) 'Dapatkan alamat tempel Pada Kesalahan Lanjutkan Berikutnya Set PasteRange = Application.InputBox _ (Prompt: = "Tentukan sel kiri atas untuk menempelkan range: ", _ Title: =" Copy Mutliple Selection ", _ Type: = 8) On Error GoTo 0 'Keluar jika dibatalkan Jika TypeName (PasteRange) <>" Range "Lalu Keluar dari Sub' Pastikan hanya sel kiri atas yang digunakan Set PasteRange = PasteRange.Range ("A1") 'Periksa rentang tempel untuk data yang ada NonEmptyCellCount = 0 Untuk i = 1 Ke NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = Sel Area (i) .Column - LeftCol NonEmptyCellCount = NonEmptyCellCount + _ Application.CountA (Range (PasteRange.Offset (RowOffset, ColOffset), _ PasteRange.Offset (RowOffset + SelAreas (i) .Rows.Count - 1, _ ColOffset + SelAreas) (i) .Columns.Count - 1))) Selanjutnya i 'Jika rentang tempel tidak kosong, peringatkan pengguna Jika NonEmptyCellCount <> 0 Lalu _ Jika MsgBox ("Timpa data yang ada?", vbQuestion + vbYesNo, _ "Salin Beberapa Pilihan ") <> vbYes Kemudian Keluar Sub 'Salin dan tempel setiap area Untuk i = 1 Ke NumAreas RowOffset = SelAreas (i) .Row - TopRow ColOffset = SelAreas (i) .Column - LeftCol SelAreas (i). Salin PasteRange.Offset ( RowOffset, ColOffset) Selanjutnya i End Sub

3. Kemudian klik menjalankan tombol untuk menjalankan kode.

4. Dan sekarang tentukan sel untuk menempelkan rentang di pembukaan Salin Beberapa Pilihan kotak dialog, dan klik OK tombol. Lihat tangkapan layar:


Salin dengan cepat beberapa rentang yang dipilih dari satu lembar kerja

The Salin Beberapa Rentang kegunaan Kutools untuk Excel dapat membantu Anda dengan mudah menyalin beberapa rentang dari lembar kerja aktif dengan cepat. Harap lakukan sebagai berikut:

Kutools untuk Excel - Termasuk lebih dari 300 alat praktis untuk Excel. Uji coba gratis fitur lengkap 30 hari, tidak perlu kartu kredit! Get It Now

1. Pilih rentang yang ingin Anda gunakan satu per satu tanpa menahan Ctrl kunci, lalu klik Kutools > Salin Rentang. Lihat tangkapan layar:

2. di Salin Beberapa Rentang kotak dialog, periksa Semua opsi dari Tempel khusus bagian, dan klik Ok button. Lihat tangkapan layar di atas:

Catatan: Jika Anda ingin mempertahankan tinggi baris dan lebar kolom seperti kisaran aslinya, harap periksa Termasuk tinggi baris pilihan dan Termasuk lebar kolom opsi di kotak dialog Salin Beberapa Rentang.

3. Dan tentukan sel untuk menempelkan rentang di kotak prompt berikut, dan klik OK tombol.

Dan sekarang semua rentang yang dipilih akan ditempelkan ke sel yang ditentukan dengan tinggi baris dan lebar kolom yang sama seperti pilihan asli.

Klik di sini untuk informasi lebih lanjut tentang utilitas Salin Beberapa Rentang       

Kutools untuk Excel - Termasuk lebih dari 300 alat praktis untuk Excel. Uji coba gratis fitur lengkap 30 hari, tidak perlu kartu kredit! Get It Now


Salin beberapa rentang dari banyak lembar kerja / buku kerja

Kutools for Excel menyediakan yang lain Gabungkan Lembar Kerja utilitas untuk menyalin beberapa rentang dari banyak lembar kerja atau banyak buku kerja dengan mudah di Excel. Harap lakukan sebagai berikut:

Kutools untuk Excel - Termasuk lebih dari 300 alat praktis untuk Excel. Uji coba gratis fitur lengkap 30 hari, tidak perlu kartu kredit! Get It Now

1. klik Kutools Plus > Menggabungkan.

2. Pada kotak dialog Combine Worksheets - Langkah 1 dari 3 pembuka, centang Gabungkan beberapa lembar kerja dari buku kerja menjadi satu lembar kerja pilihan, dan klik Berikutnya tombol.

3. Di kotak dialog Gabungkan Lembar Kerja - Langkah 2 dari 3, lakukan seperti di bawah ini:

(1) Pilih buku kerja di Daftar buku kerja bagian, dan kemudian klik melihat-lihat tombol di belakang setiap lembar kerja untuk menentukan rentang dari setiap lembar kerja;
(2) Klik menambahkan tombol untuk menambahkan buku kerja lain yang akan Anda salin rentangnya, lalu ulangi di atas (1) untuk menentukan rentang dalam buku kerja yang ditambahkan.
(3) Klik selesai tombol.

Kutools untuk Excel - Termasuk lebih dari 300 alat praktis untuk Excel. Uji coba gratis fitur lengkap 30 hari, tidak perlu kartu kredit! Get It Now

4. Kemudian kotak dialog Kutools for excel keluar dan meminta skenario kombinasi tabungan. Silakan klik ya tombol atau Tidak tombol yang Anda butuhkan.

Sejauh ini semua rentang tertentu dari beberapa lembar kerja atau buku kerja telah disalin dan ditempelkan ke buku kerja baru.


Demo: Salin beberapa rentang yang dipilih dari satu lembar kerja

Demo: Salin beberapa rentang yang dipilih dari banyak buku kerja / lembar kerja


Kutools untuk Excel menyertakan lebih dari 300 alat praktis untuk Excel, gratis untuk dicoba tanpa batasan dalam 30 hari. Unduh dan Uji Coba Gratis Sekarang!

Alat Produktivitas Kantor Terbaik

Kutools for Excel Memecahkan Sebagian Besar Masalah Anda, dan Meningkatkan Produktivitas Anda hingga 80%

  • Reuse: Masukkan dengan cepat rumus, bagan yang kompleks dan apa pun yang pernah Anda gunakan sebelumnya; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Super Formula Bar (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom tanpa kehilangan Data; Pisahkan Konten Sel; Gabungkan Baris / Kolom Duplikat... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Lebih dari 300 fitur canggih. Mendukung Office / Excel 2007-2019 dan 365. Mendukung semua bahasa. Penerapan yang mudah di perusahaan atau organisasi Anda. Fitur lengkap uji coba gratis 30 hari. Jaminan uang kembali 60 hari.
kte tab 201905

Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Tingkatkan produktivitas Anda hingga 50%, dan kurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    peter.habershon@eis2win.co.uk · 2 years ago
    Hi there,
    Great code but wondered how I can paste values rather than just paste?
    Thanks :)
  • To post as a guest, your comment is unpublished.
    Peter Habershon · 2 years ago
    Hi there,
    Great post and the VBA code works perfectly. Is it possible to change the code to paste special > values? If so, how?
    Thanks!
  • To post as a guest, your comment is unpublished.
    jacobkring@hotmail.com · 3 years ago
    Hi. Nice code, works great. Is it possible to modify the code in a way such that it is possible to insert/paste the market row/ranges multiple times instead of just one time?
    • To post as a guest, your comment is unpublished.
      kelly.extendoffice@gmail.com · 3 years ago
      Hi Jacob,
      Maybe this Insert Title Rows feature of Kutools for Excel can solve your problem.
      https://www.extendoffice.com/product/kutools-for-excel/excel-insert-title-rows.html
  • To post as a guest, your comment is unpublished.
    kmmanahan · 3 years ago
    Hi! How do I use the same VBA Code above but instead of simply pasting, I would like it to paste special for just the values. The table I am putting the values (constants) into is already formatted and with totals (formulas)
    Thanks so much in advance!
    • To post as a guest, your comment is unpublished.
      · 3 years ago
      Hi Katrina Manahan,

      Please open the Microsoft Visual Basic for applications window, and create a new Module, just press CTRL + V to paste the VBA code directly. The sequence numbers before code won't be pasted.
  • To post as a guest, your comment is unpublished.
    Steve O · 5 years ago
    Thanks for the code, works perfectly. This odd lack of function within Excel has stumped me many times in the past. It's normally quicker in the end to work around it, but in this case I have 4000 individually colour-coded cells so any work-around would have taken a long time, so I'm very grateful.
    Steve
  • To post as a guest, your comment is unpublished.
    David Hedin · 5 years ago
    Hi,
    Is it possible to adjust the code so that the copied cells can be pasted in another sheet? Now I get the error message "400" when I attempt this. I use Office 2010.

    Also, is it possible to copy so that empty lines are deleted? I have a big document and I copy some cells with hundreds of non-copied rows between them. This makes for a rather bulky output.
  • To post as a guest, your comment is unpublished.
    Yunivor · 5 years ago
    I found that if you have the Clipboard task plane open you can copy multiple rows simply using ctrl+C and paste them in order with crtl+V using Excel 2007.
  • To post as a guest, your comment is unpublished.
    M · 6 years ago
    Thank you SOOOOOO much - what a great site
  • To post as a guest, your comment is unpublished.
    Lyn Mc · 6 years ago
    Found above explanation of options to copy multiple ranges very helpful - thanks! I used the 'clipboard' option to copy multiple rows. Had to select each group of consecutive rows and copy it, move on and select next row or group of consecutive rows and copy it, etc.. But after this its easy, go to where you want to paste them, eg a new sheet, and click 'Paste all' from the Clipboard and all the rows are copied to there with out any gaps! Exactly what I wanted - thanks again!
  • To post as a guest, your comment is unpublished.
    Abani Pattanayak · 6 years ago
    I want to select the rows like 1, 5,6,10. so how can i copy these rows ???
    • To post as a guest, your comment is unpublished.
      David Hedin · 5 years ago
      In this case you can just select the rows and copy them as usual.
      • To post as a guest, your comment is unpublished.
        K Raj · 4 years ago
        How can I copy cell a1, e5, g2, and so on.... (more than 1000 cells in same column) and paste them into b1, f5, h2 (right into the next column in same row.)