Ana içeriğe atla

Excel'de arama sonuçlarını arayın ve vurgulayın

Excel'de, belirli bir değeri bulmak için Bul ve Değiştir işlevini kullanabilirsiniz, ancak arama yaptıktan sonra arama sonuçlarını nasıl vurgulayacağınızı biliyor musunuz? Bu makalede, bu arada Excel'de arama sonuçlarını aramanıza ve vurgulamanıza yardımcı olacak iki farklı yol sunacağım.

Arama sonuçlarını VBA koduna göre arayın ve vurgulayın

Koşullu Biçimlendirmeye göre arama sonuçlarını arayın ve vurgulayın

Kullanışlı bir araçla arama sonuçlarını arayın ve vurgulayın


Arama sonuçlarını VBA koduna göre arayın ve vurgulayın

Excel'de, bir değeri aramanıza ve ardından arama sonuçlarını vurgulamanıza yardımcı olabilecek bir VBA kodu vardır.

1. Aramak istediğiniz sayfayı etkinleştirin ve sonuçları vurgulayın, Alt + F11 açmak için anahtarlar Uygulamalar için Microsoft Visual Basic pencere.

2. tık Ekle > modülve aşağıdaki kodu yeni modüle yapıştırın.

VBA: Arama sonuçlarını vurgulayın

Sub FindRange()
'UpdatebyExtendoffice20190813
Dim xRg As Range
Dim xFRg As Range
Dim xStrAddress As String
Dim xVrt As Variant
xVrt = Application.InputBox(prompt:="Search:", Title:="www.extendoffice.com")
If xVrt <> "" Then
Set xFRg = ActiveSheet.Cells.Find(what:=xVrt)
If xFRg Is Nothing Then
MsgBox prompt:="Cannot find this value", Title:="www.extendoffice.com"
Exit Sub
End If
xStrAddress = xFRg.Address
Set xRg = xFRg
Do
Set xFRg = ActiveSheet.Cells.FindNext(After:=xFRg)
Set xRg = Application.Union(xRg, xFRg)
Loop Until xFRg.Address = xStrAddress
If xRg.Count > 0 Then
xRg.Interior.ColorIndex = 8
xRsp = MsgBox(prompt:="Do you want to cancel highlighting?", Title:="www.extendoffice.com", Buttons:=vbQuestion + vbOKCancel)

If xRsp = vbOK Then xRg.Interior.ColorIndex = xlNone
End If
End If
End Sub

doc arama vurgulama arama sonucu 1

3. Basın F5 tuşuna basın, ardından aradığınız belirli değeri yazmanız için bir arama kutusu açılır.
doc arama vurgulama arama sonucu 2

4. tık OK, eşleşen sonuçlar bir arka plan rengiyle vurgulanmıştır. Ayrıca, vurgulamayı iptal edip etmediğinizi soran bir iletişim kutusu açılır. Tıklayın OK vurgulamayı iptal etmek ve iletişim kutusunu kapatmak için İptal etmek vurgulamayı sürdürmek ve iletişim kutusunu kapatmak için.
doc arama vurgulama arama sonucu 3

not:

1. Eşleşen bir değer bulunamazsa, size hatırlatmak için bir iletişim kutusu açılır.
doc arama vurgulama arama sonucu 4

2. Bu VBA, tüm aktif sayfa için çalışır ve büyük / küçük harfe duyarlı değildir.

ot hareket

Ailenizle Eşlik Etmek İçin Maaş Artışı Yapmak ve Çok Zamanınız mı İstiyorsunuz?

Office Tab Şu Anda Çalışan Microsoft Office'te Verimliliğinizi% 50 Artırıyor

İnanılmaz, iki veya daha fazla belgede çalışmak, bir belgede çalışmaktan daha kolay ve hızlıdır.

İyi bilinen tarayıcılarla karşılaştırıldığında, Office Tab'taki sekmeli araç daha güçlü ve daha verimlidir.

Her gün yüzlerce fare tıklamasını ve klavye yazmayı sizin için azaltın, şimdi fare eline veda edin.

Genellikle birden çok belgede çalışıyorsanız, Office Tab sizin için harika bir zaman kazandıracaktır.

30günlük ücretsiz deneme, Kredi kartına gerek yok.

Devamını OkuŞimdi Bedava İndirin


Koşullu Biçimlendirmeye göre arama sonuçlarını arayın ve vurgulayın

Excel'de, Koşullu Biçimlendirme işlevi de arama sonuçlarını otomatik olarak vurgulayabilir.

Verilerin ve arama kutusunun aşağıdaki ekran görüntüsü gibi görüntülendiğini varsayarsak, şimdi lütfen aşağıdaki adımları uygulayın:
doc arama vurgulama arama sonucu 5

1. Aramak istediğiniz aralığı seçin ve tıklayın Ana Sayfa > Koşullu biçimlendirme > Yeni kural.
doc arama vurgulama arama sonucu 6

2. içinde Yeni Formatlama Kuralı iletişim kutusunu seçin Biçimlendirilecek hücreleri belirlemek için bir formül kullanın içinde Bir Kural Türü seçin bölümünde, ardından altındaki metin kutusuna gidin Bu formülün geçerli olduğu değerleri biçimlendiryazın = VE ($ E $ 2 <> "", $ E $ 2 = A4).

E2, arama değerini yerleştireceğiniz hücredir ve A4, arama yaptığınız aralıktaki ilk hücredir.
doc arama vurgulama arama sonucu 7

3. tık oluşturulan düğmesi, gidin biçim Hücreler diyalog, altında Doldurmak sekmesi, ihtiyacınız olan bir renk seçin. Tıklayın OK > OK diyalogları kapatmak için.
doc arama vurgulama arama sonucu 8

Şu andan itibaren, Hücre E2'ye anahtar kelimeyi girdiğinizde, arama sonuçları otomatik olarak belirtilen aralıkta vurgulanacaktır.


Kullanışlı bir araçla arama sonuçlarını arayın ve vurgulayın

İki veya daha fazla değeri aramak ve arama sonuçlarını bir kez vurgulamak istiyorsanız, Anahtar Kelimeyi İşaretle özelliği Kutools for Excel sana bir iyilik yapabilir.

Kutools for Excel, Excel işlerinde verimliliğinizi artırmak için 300'den fazla kullanışlı araç toplayan güçlü bir eklentidir, şimdi 30 günlük ücretsiz deneme sürümünü almak için tıklayın.

1. Aramak istediğiniz veri aralığını seçin, Kutools > Metin > Anahtar Kelimeyi İşaretle.
doc arama vurgulama arama sonucu 8

2. Açılan iletişim kutusunda, aramak istediğiniz değerleri virgülle ayırarak yazın. Anahtar kelime Metin kutusu. sonra seçin Seçenekleri İşaretle ve ihtiyacınız olan yazı tipi rengi. Tıklamak Ok.

Değeri büyük/küçük harfe duyarlı olarak aramak istiyorsanız, işaretleyin maç Kılıf onay kutusunu işaretleyin.
doc arama vurgulama arama sonucu 8

Ardından eşleşen sonuçlar farklı bir yazı tipi rengiyle vurgulanacaktır.
doc arama vurgulama arama sonucu 8

İle Anahtar Kelimeyi İşaretle özelliği, aralıktaki dizenin bir bölümünü de bulabilirsiniz. Arama hücrelerinin top veya zıplama içerdiğini varsayarsak, top yazın, Anahtar kelime metin kutusunu seçin, ardından ayarları belirtin ve Ok.
doc arama vurgulama arama sonucu 8doc arama vurgulama arama sonucu 8


Örnek dosya

Örnek dosyayı indirmek için tıklayın


Koşullu Biçimlendirmeyle İlgili Diğer İşlemler (Makaleler)

Excel'de koşullu biçimlendirme ile hücreleri renklere göre say / topla
Şimdi bu öğretici, Excel'de koşullu biçimlendirme ile hücreleri hızlı bir şekilde saymak veya toplamak için bazı kullanışlı ve kolay yöntemler anlatacaktır.

Excel'de koşullu biçimlendirmeye sahip bir grafik oluşturun
Örneğin, bir sınıfın puan tablosuna sahipsiniz ve farklı aralıklardaki puanları renklendirmek için bir grafik oluşturmak istiyorsanız, burada bu eğitim bu işi çözme yöntemini tanıtacaktır.

Excel'de koşullu biçimlendirme yığılmış çubuk grafik
Bu eğitim, Excel'de adım adım gösterilen ekran görüntüsü gibi koşullu biçimlendirmeli yığılmış çubuk grafiğin nasıl oluşturulacağını açıklar.

Excel'de iki sütun eşitse koşullu biçimlendirme satırları veya hücreleri
Bu makalede, Excel'de iki sütun eşitse, koşullu biçimlendirme satırları veya hücreleri ile ilgili yöntemi tanıtıyorum.

Excel'deki her satır için koşullu biçimlendirme uygulayın
Bazen, her satır için koşullu biçimlendirme uygulamak isteyebilirsiniz. Her satır için aynı kuralları tekrar tekrar belirlemek dışında, bu işi çözmenin bazı püf noktaları vardır.


  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme ve Verilerin Saklanması; Bölünmüş Hücre İçeriği; Yinelenen Satırları ve Toplam / Ortalamayı Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Sık Kullanılan ve Hızlı Eklenen Formüller, Aralıklar, Grafikler ve Resimler; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • Pivot Tablo Gruplaması hafta numarası, haftanın günü ve daha fazlası ... Kilidi Açılmış, Kilitli Hücreleri Göster farklı renklerle; Formülü / Adı Olan Hücreleri Vurgulayın...
kte sekmesi 201905
  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
ofis tabanı
Comments (10)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
how do I make a VBA to search a few times with different highlight color?

and

then how do i make the highlight area, not only in the exact cell but also the cells next to it, or the whole row?

Please advice.

Thank you.
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
how about highlight the keyword's row or column or the 3 cells next to the keyword?

and how do i search multiple times with different color of highlight?
This comment was minimized by the moderator on the site
How would I make the data entry box reopen after hitting ok? I use this macro with a barcode scanner and would like to be able to keep scanning without having to rerun macro each time. Example open macro scan it finds and highlights then reopens for next scan.
This comment was minimized by the moderator on the site
Hi, I have office 365 but when I went to Kutools > Text > I could not find Mark Keyword. Is there feature still there? Thanks
This comment was minimized by the moderator on the site
Hi, Kimber, what version of Kutools for Excel you use? Mark Keyword released after Kutools for Excel 24.0. If your version is lower than 24.0, please upgrade your version.
This comment was minimized by the moderator on the site
Does it work for Excel 2013 and what do I have to change in order to fit in with the 2003 version? I’ve tried your code but there is no button to save the module
This comment was minimized by the moderator on the site
Sorry, it’s Excel 2003
This comment was minimized by the moderator on the site
How can you modify this to also jump to the cell that is being highlighted.
This comment was minimized by the moderator on the site
Hi, Jeff, if you want to select all highlighted cells, just add
xRg.Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-1.png
If you want to jump to the first highlighted cell, add
xRg.Areas(xRg.Areas.Count)(1).Select
at the end of the above code, see screenshot:
https://www.extendoffice.com/images/stories/comments/sun-comment/doc-jump-to-highlighted-cell-2.png
This comment was minimized by the moderator on the site
Hi thanks for your help but when we click ok for cancel highlighting. color of cell change. I want orignal color after cancel. What code i need to change in VBA.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations