Petua: Bahasa lain diterjemahkan Google. Anda boleh melawat English versi pautan ini.
Log masuk
x
or
x
x
Daftar Sekarang
x

or

Bagaimana untuk menambah simbol semak dan silang ke dalam senarai drop down dalam Excel?

Biasanya, selepas memasukkan simbol semak dan simbol silang dalam sel dengan fungsi simbol dan kemudian membuat senarai drop down dengan mereka sebagai sumber data, hasilnya akan dipaparkan sebagai ü atau û dalam drop down sel. Bagaimana untuk memaparkan sebenar ✓ dan simbol dalam sel selepas memilih item dari senarai drop-down? Kaedah VBA di bawah ini akan membantu untuk membuat senarai tandakan dan jatuh bawah dalam Excel.

Tambah simbol centang dan salib ke senarai drop down dengan kod VBA


Tambah simbol centang dan salib ke senarai drop down dengan kod VBA


Dengan kod VBA di bawah, anda boleh memasukkan senarai lungsur dan lintasan silang ke dalam sel yang ditentukan dalam Excel. Sila buat seperti berikut.

1. Dalam lembaran kerja, anda akan membuat senarai simbol centang dan simbol silang, klik kanan tab helaian dan pilih Lihat Kod dari menu konteks.

2. Kemudian Microsoft Visual Basic untuk Aplikasi tingkap dibuka, sila salin di bawah kod VBA ke dalam tetingkap Kod.

Kod VBA 1: Tambah simbol semak dan salib ke dalam senarai drop down

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180703
    If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
    If Target.Value = "Tick" Then
        Target.Value = "P"
    ElseIf Target.Value = "Cross" Then
        Target.Value = "S"
    End If
End Sub

3. Teruskan klik Memasukkan > Modul, kemudian salin kod 2 berikut ke dalam tetingkap Modul.

Kod VBA 2: Tambah simbol semak dan salib ke dalam senarai drop down

Sub usingSymbols()
'Update by Extendoffice 20180703
    Dim xRg As Range
    Set xRg = Range("B1:B10")
    xRg.Font.Name = "Wingdings 2"
    xRg.Validation.Add xlValidateList, , , "Tick,Cross"
End Sub

Nota: Dalam kod di atas, B1: B10 adalah rangkaian sel yang akan anda buat senarai tanda cetek dan salib. Sila tukar julat yang anda perlukan.

4. Tekan butang F5 kunci untuk menjalankan kod.

Sekarang senarai juntai simbol centang dan simbol silang dimasukkan ke dalam pelbagai B1: B10. Pilih Tandakan dari drop-down akan masukkan ✓ ke dalam sel, dan pilih Cross akan dipaparkan simbol. Lihat tangkapan skrin:


Related articles:


Cadangan Alat Produktiviti untuk Excel

kte tab 201905

Kutools untuk Excel Membantu Anda Selalu Menyelesaikan Kerja di Hadapan Masa, dan Berdiri Daripada Orang

  • Lebih daripada ciri-ciri canggih 300 yang canggih, yang direka untuk senario kerja 1500, meningkatkan produktiviti oleh 70%, memberi anda lebih banyak masa untuk menjaga keluarga dan menikmati kehidupan.
  • Tidak perlu lagi menghafal formula dan kod VBA, berikan rehat dari otak anda sekarang.
  • Menjadi pakar Excel dalam minit 3, Operasi yang rumit dan berulang boleh dilakukan dalam beberapa saat,
  • Mengurangkan beribu-ribu operasi papan kekunci & tetikus setiap hari, mengucapkan selamat tinggal kepada penyakit pekerjaan sekarang.
  • 110,000 orang yang sangat berkesan dan pilihan syarikat 300 + yang terkenal di dunia.
  • Ciri-ciri penuh 60-hari adalah percubaan percuma. Jaminan wang balik 60 hari. Tahun 2 peningkatan dan sokongan percuma.

Membawa Browsing Tab dan Editing ke Microsoft Office, Jauh Lebih Berkuasa Daripada Tab Penyemak Imbas

  • Tab Pejabat direka untuk Aplikasi Pejabat Word, Excel, PowerPoint dan Lain-lain: Penerbit, Akses, Visio dan Projek.
  • Buka dan buat beberapa dokumen dalam tab baharu pada tetingkap yang sama, dan bukannya dalam tetingkap baru.
  • Meningkatkan produktiviti anda oleh 50%, dan mengurangkan beratus-ratus klik tetikus untuk anda setiap hari!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.