Bagaimana cara mencegah salin dan tempel sel dengan daftar drop-down di Excel?
Untuk sel dengan daftar drop-down validasi data, ketika menyalin konten dari sel lain dan menempelkannya, daftar drop-down akan hilang dan diganti dengan konten yang baru menempel. Dalam beberapa kasus, Anda ingin mencegah salin dan tempel konten lain di sel dengan daftar tarik-turun, apa yang akan Anda lakukan untuk mengatasinya? Pada artikel ini, Anda akan mendapatkan metode VBA untuk mengatasi masalah ini.
Cegah salin dan tempel di sel dengan daftar drop-down di Excel
Cegah salin dan tempel di sel dengan daftar drop-down di Excel
1. Buka lembar kerja dengan sel daftar drop-down yang ingin Anda cegah salin dan tempel.
2. tekan lain + F11 tombol secara bersamaan untuk membuka Aplikasi Microsoft Visual Basic jendela.
3. Dalam Aplikasi Microsoft Visual Basic jendela, klik dua kali nama lembar kerja saat ini di panel kiri, lalu salin dan tempel kode VBA di bawah ini ke editor Kode. Lihat tangkapan layar:
Kode VBA: Mencegah salin dan tempel di sel dengan daftar drop-down
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20200903
Dim xValue As String
Dim xCheck1 As String
Dim xCheck2 As String
Dim xRg As Range
Dim xArrCheck1() As String
Dim xArrCheck2() As String
Dim xArrValue()
Dim xCount, xJ As Integer
Dim xBol As Boolean
' If Target.Count > 1 Then
' Exit Sub
' End If
xCount = Target.Count
ReDim xArrCheck1(1 To xCount)
ReDim xArrCheck2(1 To xCount)
ReDim xArrValue(1 To xCount)
Application.EnableEvents = False
On Error Resume Next
xJ = 1
For Each xRg In Target
xArrValue(xJ) = xRg.Value
xArrCheck1(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
Application.Undo
xJ = 1
For Each xRg In Target
xArrCheck2(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
xBol = False
For xJ = 1 To xCount
If xArrCheck2(xJ) <> xArrCheck1(xJ) Then
xBol = True
Exit For
End If
Next
If xBol Then
MsgBox "The selected cells containg data validation drop-down lists, no pasting allowed."
Else
xJ = 1
For Each xRg In Target
xRg.Value = xArrValue(xJ)
xJ = xJ + 1
Next
End If
Application.EnableEvents = True
End Sub4. tekan lain + Q kunci untuk keluar dari Aplikasi Microsoft Visual Basic jendela.
5. Saat Anda menempelkan konten ke sel dengan daftar drop-down, kotak dialog akan muncul untuk mengingatkan Anda bahwa penyisipan tidak diperbolehkan. Lihat tangkapan layar:
Note: VBA ini hanya berfungsi dalam penempelan sel tunggal. Jika Anda menyalin dan menempel di beberapa sel, itu tidak akan berfungsi.
Mudah membuat daftar drop-down dengan kotak centang di Excel:
Grafik Daftar Drop-down dengan Kotak Centang kegunaan Kutools for Excel dapat membantu Anda dengan mudah membuat daftar turun bawah dengan kotak centang dalam kisaran tertentu, lembar kerja saat ini, buku kerja saat ini atau semua buku kerja yang dibuka berdasarkan kebutuhan Anda.
Unduh fitur lengkapnya 30-hari bebas jejak Kutools for Excel sekarang!
Artikel terkait:
Bagaimana cara membuat daftar drop-down dengan beberapa kotak centang di Excel?
Banyak pengguna Excel cenderung membuat daftar drop-down dengan beberapa kotak centang untuk memilih beberapa item dari daftar setiap kali. Sebenarnya, Anda tidak dapat membuat daftar dengan beberapa kotak centang dengan Validasi Data. Dalam tutorial ini, kami akan menunjukkan kepada Anda dua metode untuk membuat daftar drop-down dengan beberapa kotak centang di Excel. Tutorial ini memberikan metode untuk memecahkan masalah tersebut.
Buat daftar drop-down dari buku kerja lain di Excel
Sangat mudah untuk membuat daftar drop-down validasi data di antara lembar kerja dalam buku kerja. Tetapi jika daftar data yang Anda perlukan untuk validasi data ada di buku kerja lain, apa yang akan Anda lakukan? Dalam tutorial ini, Anda akan belajar cara membuat daftar drop fown dari workbook lain di Excel secara detail.
Buat daftar drop-down yang dapat dicari di Excel
Untuk daftar drop-down dengan banyak nilai, menemukan yang tepat bukanlah pekerjaan yang mudah. Sebelumnya kami telah memperkenalkan metode pengisian otomatis daftar drop-down saat memasukkan huruf pertama ke dalam kotak drop-down. Selain fungsi pelengkapan otomatis, Anda juga dapat membuat daftar drop-down dapat dicari untuk meningkatkan efisiensi kerja dalam menemukan nilai yang tepat dalam daftar drop-down. Untuk membuat daftar drop-down dapat dicari, coba metode dalam tutorial ini.
Mengisi otomatis sel lain saat memilih nilai di daftar drop-down Excel
Katakanlah Anda telah membuat daftar drop-down berdasarkan nilai dalam rentang sel B8: B14. Saat Anda memilih nilai apa pun dalam daftar turun bawah, Anda ingin nilai yang sesuai dalam rentang sel C8: C14 secara otomatis terisi dalam sel yang dipilih. Untuk memecahkan masalah, metode dalam tutorial ini akan membantu Anda.
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 Canggih untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Office Tab Menghadirkan antarmuka Tab ke Office, dan Membuat Pekerjaan Anda 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!
