Loncat ke daftar isi utama

Bagaimana cara cepat menyorot crosshair sel aktif di Excel?

Jika ada beberapa kolom dan baris data dalam lembar kerja, apakah Anda telah mencitrakan saat Anda mengaktifkan sel, kolom dan baris relatifnya disorot? Misalnya, klik F11, dan kolom F dan baris 11 disorot pada saat yang sama seperti gambar di bawah ini. Di sini artikel ini, memperkenalkan trik cepat can untuk membantu Anda menyorot silang sel aktif di Excel.
doc crosshair sorotan 1

Sorot silang sel aktif dengan VBA

Sorot silang sel aktif dengan Kutools for Excel ide bagus3


Sorot silang sel aktif dengan VBA

Di Excel, tidak ada fungsi bawaan yang dapat membantu Anda menyorot silang sel aktif, tetapi di sini saya memperkenalkan VBA yang dapat membantu Anda menyorot silang baris dan kolom sel aktif.

1. tekan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Kemudian di Project panel, klik dua kali pada lembar yang ingin Anda terapkan VBA ini, lalu salin dan tempel kode VBA di bawah ini ke skrip kanan. Lihat tangkapan layar:

olymp trade indonesiaTip: Jika panel Proyek tersembunyi, klik Ya View > Penjelajah Proyek in Microsoft Visual Basic untuk Aplikasi jendela untuk menampilkannya.

VBA: Crosshair menyorot sel aktif.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    With Target
        .Worksheet.Cells.Interior.ColorIndex = 0
        .EntireRow.Interior.Color = vbYellow
        .EntireColumn.Interior.Color = vbYellow
    End With
    Application.ScreenUpdating = True
End Sub
doc crosshair sorotan 2

3. Kemudian simpan dan tutup VBA, dan sekarang saat Anda mengaktifkan sel, baris dan kolom relatifnya disorot.
doc crosshair sorotan 3

Jika Anda ingin menyorot hanya sel aktif, Anda dapat menggunakan VBA berikut.

VBA: Sorot sel aktif yang Anda pilih

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    Target.Worksheet.Cells.Interior.ColorIndex = 0
    Target.Interior.Color = vbYellow
    Application.ScreenUpdating = True
End Sub

Note: Dalam kode VBA di atas, ColorIndex dapat berubah sesuai keinginan Anda.


Sorot silang sel aktif dengan Kutools for Excel

Jika Anda tidak terbiasa dengan VBA, Anda dapat mencoba melamar Kutools untuk Excel'S Membaca Tata Letak utilitas untuk menyorot silang dengan cepat sel aktif.

Kutools untuk Excel, dengan lebih dari 300 fungsi praktis, membuat pekerjaan Anda lebih mudah. 

Setelah pemasangan gratis Kutools for Excel, lakukan seperti di bawah ini:

Klik Kutools > Membaca Tata Letak untuk mengaktifkan Membaca Tata Letak utilitas. Lihat tangkapan layar:
doc crosshair sorotan 4

Catatan:

1. klik Kutools > Membaca Tata Letak sekali lagi untuk menonaktifkan utilitas ini.

2. klik Kutools > Membaca Tata Letak > Membaca Pengaturan Tata Letak untuk menentukan bentuk, gaya dan warna yang Anda butuhkan di Membaca Pengaturan Tata Letak dialog. Lihat tangkapan layar:
doc crosshair sorotan 5

olymp trade indonesiaTip: Utilitas ini berlaku untuk seluruh buku kerja.

Alat Produktivitas Kantor Terbaik

馃 Kutools AI Ajudan: Merevolusi analisis data berdasarkan: Eksekusi Cerdas   |  Hasilkan Kode  |  Buat Rumus Khusus  |  Analisis Data dan Hasilkan Grafik  |  Aktifkan Fungsi Kutools...
Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

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...

Deskripsi Produk


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!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi. Can you please help with a VBA Code that doesn't remove the cell formatting or the previous colored cells.
This comment was minimized by the moderator on the site
Hi, the VBA code cannot satisfy your need, I suggest you try Kutools for Excel.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations