Buradasın
Excel VBA'da farklı sayfalarda arama nasıl yapılır?
Yazeka
Arama sonuçlarına göre oluşturuldu
Excel VBA'da farklı sayfalarda arama yapmak için aşağıdaki adımları izleyebilirsiniz:
- VBA Editörünü Açın: Alt + F11 tuşlarına basarak VBA Editörünü açın 3.
- Yeni Modül Ekleyin: Ekle > Modül seçeneğini kullanarak yeni bir modül ekleyin 3.
- Arama Kodunu Yazın: Aşağıdaki kodu modüle yapıştırın 3:
Sub BirdenFazlaSayfadaArama() Dim sayfa As Worksheet Dim aramaKelimesi As String Dim hucre As Range aramaKelimesi = InputBox("Aranacak Kelimeyi Girin:") For Each sayfa In ThisWorkbook.Sheets sayfa.Activate Set hucre = sayfa.Cells.Find(What:=aramaKelimesi, LookAt:=xlPart) If Not hucre Is Nothing Then MsgBox "Bulunan Değer: " & hucre.Value & vbNewLine & "Sayfa: " & sayfa.Name & " Hücre: " & hucre.Address End If Next sayfa
- Kodu Çalıştırın: Menü çubuğundaki Çalıştır düğmesine tıklayın veya klavyede F5 tuşuna basın 4.
Bu kod, tüm sayfalarda arama yaparak bulunan hücrelerin konumunu gösterecektir 3.
5 kaynaktan alınan bilgiyle göre: