Note: The other languages of the website are Google-translated. Back to English
English English

Bagaimana cara meningkatkan ukuran font daftar drop down di Excel?

doc meningkatkan ukuran font daftar drop-down 1

Daftar drop-down adalah fitur yang sangat membantu di Excel, ketika Anda membuat daftar drop-down di lembar kerja Anda, pernahkah Anda mencoba meningkatkan ukuran font dari daftar drop-down untuk membuat catatan yang dipilih lebih besar dan lebih mudah dibaca seperti gambar di sebelah kiri? Artikel ini akan berbicara tentang solusi untuk mengatasinya.

Tingkatkan ukuran font daftar drop-down dengan kode VBA untuk memperbesar zoom


Tingkatkan ukuran font daftar drop-down dengan kode VBA untuk memperbesar zoom

Faktanya, tidak ada cara langsung bagi kami untuk meningkatkan ukuran font dari daftar drop-down, tetapi, Anda dapat menerapkan kode VBA berikut untuk mengubah pengaturan zoom sel daftar drop-down untuk membuat teks tampak lebih besar. Harap lakukan sebagai berikut:

1. Buka lembar kerja yang berisi daftar drop-down yang ingin Anda tingkatkan ukuran fontnya.

2. Klik kanan tab lembar, lalu pilih Lihat kode dari menu konteks, di-pop-out Microsoft Visual Basic untuk Aplikasi jendela, harap salin dan tempel kode berikut ke dalam kolom kosong Modul window:

Kode VBA: Meningkatkan ukuran font daftar drop-down untuk memperbesar zoom sel

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice
    On Error GoTo LZoom
    Dim xZoom As Long
    xZoom = 100
    If Target.Validation.Type = xlValidateList Then xZoom = 130
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

3. Kemudian simpan dan tutup kode ini, sekarang, ketika Anda mengklik sel daftar drop-down, zoom sel akan diperbesar, dan daftar drop-down akan tampak lebih besar, tetapi, ketika Anda mengklik sel lain yang tidak berisi daftar drop-down, zoom sel akan normal.

Note: Pada kode di atas, xZoom = 130 akan mengubah zoom sel daftar drop-down menjadi 130, Anda dapat mengubah nomor zoom ini sesuai kebutuhan Anda.


Buat daftar drop-down dengan kotak centang di Excel

Jika Anda perlu membuat daftar drop-down dengan beberapa kotak centang untuk memilih beberapa item dari daftar ke dalam satu sel, mungkin tidak ada cara langsung bagi Anda untuk menyelesaikan tugas ini. Tapi, Kutools untuk Excel mendukung fitur luar biasa - Daftar Drop-down dengan Kotak Centang, dengan fitur ini, Anda dapat dengan cepat membuat daftar turun bawah dengan kotak centang dalam rentang tertentu, lembar kerja saat ini, buku kerja saat ini atau semua buku kerja yang dibuka berdasarkan kebutuhan Anda.  Klik untuk mengunduh Kutools for Excel!


Demo: Tingkatkan ukuran font daftar drop-down dengan kode VBA untuk memperbesar zoom


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 ...
  • Bilah Formula Super (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.
tab kte 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
Urutkan komentar berdasarkan
komentar (27)
Belum ada peringkat. Jadilah yang pertama memberi peringkat!
Komentar ini diminimalkan oleh moderator di situs
Jadi, kode ini membuat seluruh lembar diperbesar, bukan hanya kotak drop-down. Ia juga mengatakan "tidak dapat menyimpan ...... Proyek VB di buku kerja makro yang dinonaktifkan". Bla bla bla. Jika saya harus berburu di seluruh setengah hektar untuk mendapatkan jawaban lengkap untuk masalah ini, ini bukan jawaban.
Komentar ini diminimalkan oleh moderator di situs
[quote]Jadi, kode ini membuat seluruh lembar diperbesar, bukan hanya kotak drop-down. Ia juga mengatakan "tidak dapat menyimpan ...... Proyek VB di buku kerja makro yang dinonaktifkan". Bla bla bla. Jika saya harus berburu di seluruh setengah hektar untuk mendapatkan jawaban lengkap untuk masalah ini, ini bukan jawaban.Oleh Michael[/quote] Cukup simpan buku kerja sebagai xlsm dan ikuti langkah-langkahnya lagi. BTW saya mencobanya dan TIDAK bekerja untuk saya sama sekali; zoomnya masih 100%.
Komentar ini diminimalkan oleh moderator di situs
Saya menjalankan Office 2016 dan menggunakan kotak drop-down. Saya mencoba "Tingkatkan ukuran font daftar drop-down dengan kode VBA untuk memperbesar zoom" tetapi tidak berhasil. Apakah ada hal lain yang harus saya lakukan untuk membuatnya bekerja? Terima kasih!
Komentar ini diminimalkan oleh moderator di situs
Seperti yang ditunjukkan petunjuk arah, Anda harus mengubah zoom dari "100" menjadi "130" atau zoom lain untuk melihat perubahan apa pun. Namun, komentar pertama akurat karena tidak hanya mengubah menu tarik-turun, tetapi setelah Anda mengklik sel, itu akan memperbesar seluruh lembar 1% untuk memperbesar sel itu. Tidak terlalu membantu karena Anda hanya perlu memperkecil setiap waktu.
Komentar ini diminimalkan oleh moderator di situs
atau pilih sel alternatif di buku kerja untuk mengembalikannya ke 100 seperti yang dinyatakan dalam Makro

Private Sub Worksheet_SelectionChange(ByVal Target As Range)'updateby Extendoffice 20160530 Pada Kesalahan GoTo LZoom Dim xZoom As Long xZoom = 100 Jika Target.Validation.Type = xlValidateList Kemudian xZoom = 130LZoom: ActiveWindow.Zoom = xZoomEnd Sub
Komentar ini diminimalkan oleh moderator di situs
Hai, Hanya ingin tahu mengapa fitur ini hilang setelah file disimpan dan dibuka kembali?
Komentar ini diminimalkan oleh moderator di situs
Hai, Noel, Anda harus menyimpan file Excel sebagai format Buku Kerja Excel Macro-Enabled.
Komentar ini diminimalkan oleh moderator di situs
Jangan khawatir
Komentar ini diminimalkan oleh moderator di situs
Terima kasih, berfungsi dengan baik
Komentar ini diminimalkan oleh moderator di situs
Ini tidak bekerja untuk saya. Saya menempelkan teks seperti yang diinstruksikan. Ketika saya mengklik menu drop down ukuran fontnya sama. Ketika saya kemudian mengklik sel yang berbeda, seluruh spreadsheet meningkat ukurannya mungkin sebesar 30%. Benar-benar ingin bekerja jika memungkinkan
Komentar ini diminimalkan oleh moderator di situs
Setelah menggunakan kode ini, saya tidak dapat menggunakan kunci kembali di Excel. Bagaimana saya bisa membuat kode (menginstal) kunci kembali?
Komentar ini diminimalkan oleh moderator di situs
Ini memperbesar seluruh lembar menjadi 130%
Bagaimana cara meningkatkan menu drop saja?
Komentar ini diminimalkan oleh moderator di situs
Halo, Dave,
Untuk hanya menambah menu drop down, berikut adalah solusi untuk mengatasinya.

Pertama, setelah memasukkan daftar drop down di lembar kerja Anda, maka Anda harus memasukkan Kotak Kombo (Kontrol ActiveX), dan kemudian menerapkan kode VBA berikut ke dalam kode modul lembar:

Redupkan xRg Sebagai Rentang
Sub ComboBox1_Change () Pribadi
On Error Resume Next
xRg.Value = Saya.ComboBox1.Teks
End Sub
Sub Worksheet_SelectionChange Pribadi (Target ByVal Sebagai Rentang)
Pada Kesalahan GoTo LblExit
Dengan Saya.ComboBox1
.Terlihat = Salah
Jika Target.Validation.Type = xlValidateList Kemudian
Target.Validation.InCellDropdown = Salah
.ListWidth = 120
.ListFillRange = ""
.ListFillRange = Target.Validasi.Formula1
.Kiri = Target.Kiri
.Atas = Target.Atas
.Lebar = Target.Lebar
.Tinggi = Target.Tinggi
.Font.Ukuran = 16
.Terlihat = Benar
Tetapkan xRg = Target
End If
Berakhir dengan
Keluar:
End Sub

Setelah memasukkan kode, sekarang ketika Anda mengklik sel daftar drop-down, kotak kombo akan ditampilkan, dan ukuran font di menu drop-down ditingkatkan sesuai kebutuhan. Dan kotak kombo yang dimasukkan akan disembunyikan secara otomatis.

Silakan dicoba, semoga bisa membantu Anda!
Komentar ini diminimalkan oleh moderator di situs
GENIUS! Terima kasih Skyyang! Sangat berterima kasih atas metode Anda! Bekerja seperti pesona!
Komentar ini diminimalkan oleh moderator di situs
Bisakah Anda menjelaskannya langkah demi langkah untuk boneka?
Komentar ini diminimalkan oleh moderator di situs
Halo, ITALO,
1. Masukkan drop down yang Anda butuhkan di lembar kerja Anda;
2. Kemudian masukkan Combo Box (ActiveX Controls) dengan mengklik Developer > Insert > Combo Box (ActiveX Controls), lalu seret mouse untuk menggambar objek Combo Box;
3. Dan kemudian, klik kanan lembar kerja yang Anda gunakan saat ini, pilih Lihat Kode, dan tempel kode di atas ke dalam modul;
4. Terakhir, klik Mode Desain di bawah tab Pengembang untuk menonaktifkannya.
5. Sekarang ketika Anda mengklik sel daftar drop-down, kotak kombo akan ditampilkan, dan ukuran font di menu drop-down ditingkatkan sesuai kebutuhan.
Silakan dicoba, semoga bisa membantu Anda!
Komentar ini diminimalkan oleh moderator di situs
Bagaimana saya bisa menerapkan ukuran perubahan font ini ke hanya satu kolom? Saya memiliki beberapa kolom dengan kotak drop-down dan saya hanya ingin satu kolom tertentu untuk mengubah ukuran font?
Komentar ini diminimalkan oleh moderator di situs
Hai, Hanya pertanyaan saya telah menempelkan kode ke jendela Modul kosong (Klik kanan dalam kode tampilan). Setelah saya simpan, apakah berfungsi dengan baik itu bagus. Tetapi ketika saya menutup file dan membukanya kembali, kode itu hilang dan tidak ada lagi memperbesar untuk daftar drop down. Bisakah saya tahu cara mengatur penggunaan permanen?
Komentar ini diminimalkan oleh moderator di situs
Halo, Ase,
Untuk menyimpan kode, Anda harus menyimpan file Excel sebagai format Buku Kerja Excel Macro-Enabled. Silakan coba.
Komentar ini diminimalkan oleh moderator di situs
Saya memiliki beberapa dropdown dan hanya perlu satu yang lebih besar karena sisanya ya/tidak. Tetapi kode yang Anda bagikan melakukan ini untuk mereka semua. Bagaimana cara agar ini hanya digunakan untuk satu dropdown saja?
Komentar ini diminimalkan oleh moderator di situs
Halo, Yvonne
Untuk menerapkan kode hanya ke satu sel, kode berikut dapat membantu Anda: (Note: dalam kode, ubah sel I2 ke referensi sel Anda sendiri.)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice
    On Error GoTo LZoom
    Dim xZoom As Long
    Dim xRg As Range
    xZoom = 100
    Set xRg = Range("I2")
    If Not Intersect(Target, xRg) Is Nothing Then
        If Target.Validation.Type = xlValidateList Then xZoom = 130
    End If
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

Silakan dicoba, semoga bisa membantu Anda!
Komentar ini diminimalkan oleh moderator di situs
Terima kasih atas tip untuk memperbesar ukuran font di kotak drop down. Itu berhasil.
Komentar ini diminimalkan oleh moderator di situs
Terjadi al revés. Al dar clic en cualquiera celda se agranda, pero no en la lista deplegable y no vuelve al tamaño original. Uso Excel 2010. Solucion?Itu terjadi sebaliknya. Mengklik sel mana pun akan memperbesarnya, tetapi bukan daftar tarik-turun dan tidak kembali ke ukuran aslinya. Saya menggunakan Excel 2010. Solusi?
Komentar ini diminimalkan oleh moderator di situs
Bisakah kita melakukan ini untuk beberapa drop box? Jika tidak, lalu bagaimana prosedur multiple drop box.
Komentar ini diminimalkan oleh moderator di situs
Ale po zamknięciu pliku and ponownym go otwarciu to rozwiązanie już nie działa.
Komentar ini diminimalkan oleh moderator di situs
Oke. Trzeba zapisać plik z obsługą makra.
Komentar ini diminimalkan oleh moderator di situs
Halo teman,
Kamu benar. Kita perlu menyimpan file yang mendukung makro agar solusinya dapat bekerja. Semoga hari mu menyenangkan.

Hormat kami,
Mandy
Belum ada komentar yang diposting di sini
Tinggalkan komentar anda
Posting sebagai Tamu
×
Beri peringkat pos ini:
0   Karakter
Lokasi yang Disarankan