Bagaimana cara cepat menukar konten dua sel di Excel?
Saat kami menangani lembar kerja, kami mungkin perlu menukar konten dua sel terkadang. Biasanya sebagian besar dari kita hanya tahu "memotong, menempel, dan menyalin" untuk menukar konten, tetapi itu memakan waktu. Kami akan berbicara tentang cara cepat menukar konten dalam sel di Excel.
Tukar dua konten sel yang berdampingan secara manual
Tukar dua konten sel yang tidak berdekatan dengan kode VBA
Tukar dua konten sel acak dengan mudah hanya dengan beberapa klik
Tukar dua konten sel yang berdampingan secara manual
Terkadang, ada dua sel yang berdampingan perlu ditukar. Kita bisa melakukannya secara manual dengan mudah. Lihat screenshot berikut, saya ingin menukar sel A4 dan B4, lakukan hal berikut:
1. Pilih sel yang ingin Anda tukar. Dalam contoh ini, pilih sel A4.
2. tekan perubahan kunci, dan letakkan kursor di tepi kanan.
3. Kemudian seret kursor ke tepi kanan sel B4.
4. Ketika ada menampilkan "工", Lepaskan mouse.
5. Dan dua konten sel telah ditukar. Lihat tangkapan layar:
Dengan metode ini, kita juga dapat menukar dua baris atau kolom yang berdampingan.
Tukar konten dua sel atau rentang dengan cepat di Excel:
Kutools untuk Excel's Swap Rentang utilitas membantu Anda dengan mudah menukar dua sel atau rentang tertentu sekaligus di Excel seperti yang ditunjukkan pada demo di bawah ini.
Unduh dan coba sekarang! (Jejak gratis 30 hari)
Tukar dua konten sel yang tidak berdekatan dengan kode VBA
Jika kedua sel tidak berdampingan, metode di atas tidak akan berfungsi. Kita bisa menukarnya dengan kode VBA.
1. Tap Ctrl kunci dan pilih dua sel yang tidak berdekatan yang ingin Anda tukar.
2. Klik Pengembang>Visual Basic, Baru Microsoft Visual Basic untuk aplikasi jendela akan ditampilkan, klik Menyisipkan>Modul, dan masukkan kode berikut ke dalam Modul:
Sub SwapTwoRange()
'Updateby20131120
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub
3. Lalu klik untuk menjalankan kode, lalu dialog ditampilkan bagi Anda untuk memilih dua sel yang ingin Anda tukar. Lihat tangkapan layar:
4. klik Ok dalam dialog yang muncul, dua sel yang dipilih akan ditukar. Lihat tangkapan layar:
Catatan: Kode VBA ini tidak dapat menukar pemformatan dua sel.
Tukar dua konten sel acak dengan mudah hanya dengan beberapa klik
Dengan Kutools untuk Excel's Swap Rentang utilitas, kita tidak hanya dapat menukar dua sel, baris atau kolom yang berdampingan, tetapi juga dapat mengganti dua sel, baris atau kolom yang tidak berdekatan dengan mudah.
Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.
1. klik Kutools > Jarak > Swap Rentang, lihat tangkapan layar:
2. Dalam Swap Rentang kotak dialog, Anda perlu:
- (1) klik yang pertama tombol di Rentang Swap 1 kotak untuk memilih sel yang ingin Anda tukar.
- (2) klik kedua tombol dari Rentang Swap 2 kotak untuk memilih sel yang akan Anda tukar.
Tips: Anda dapat memilih dua rentang sebelum menerapkan fitur, kemudian Anda dapat melihat dua rentang yang dipilih ditampilkan di kotak Swap Range 1 dan Swap Range 2 secara terpisah. - (3) Klik OK .
Kemudian dua sel atau rentang yang dipilih segera ditukar. Lihat tangkapan layar:
Jika Anda ingin memiliki uji coba gratis (30 hari) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.
Demo: Tukar dua konten sel acak dengan Kutools for Excel
Artikel terkait:
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
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.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!