Varsayılan olarak çalışma kitabının tamamında arama yapmak için Excel'i ayarlayın


11

Microsoft Excel'de, CTRL+ kullanarak arama yaptığımda F, varsayılan olarak yalnızca geçerli çalışma sayfasını arar.

Varsayılan olarak çalışma kitabının tamamında aramaya nasıl ayarlayabilirim? Benim var Office 2010. Bu mümkün mü? Bunu belirli bir çalışma kitabı veya çalışma sayfası için ayarlamak mümkün müdür? Eğer gerekliyse, kayıt defteri düzenlemeye gidiyorum.

Yanıtlar:


3

Bunu ThisWorkbook modülündeki bir Workbook_Open makrosuyla yapabilirsiniz:

Private Sub Workbook_Open()

Application.CommandBars.FindControl(ID:=1849).Execute
SendKeys "%(t)%(h)W~{ESC}"

End Sub

Bu, bulunduğunuz çalışma kitabı için oturumunuz için ayarlayacaktır.

Bunun her zaman varsayılan olması için bir Kişisel Makro Çalışma Kitabı oluşturmanız gerekir .


1
Bunun için bir makro kullanmamayı tercih ederim.
Joel Coehoorn

2
@Joel, ayarlar büyük olasılıkla Excel için .pip dosyasında depolanacak, bu da kolay bulunur, ancak ikili dosyada saklanır ve bunun için belirli bir düzenleyici bulamıyorum (bu harika bir proje olurdu). Muhtemelen standart bir hex editörü bulabilir ve çalışabilirsiniz, ancak bu bir proje olacaktır.
Lance Roberts

2

Excel'in İspanyolca ise (benimki gibi) çalışması için bir değişiklik yaptım.

Private Sub Workbook_Open()

Dim lCountryCode As Long
lCountryCode = Application.International(xlCountryCode)

Application.CommandBars.FindControl(ID:=1849).Execute

Select Case lCountryCode
Case 34 'spanish
    SendKeys "%(p)%(D)L~{ESC}"
Case Else 'default english
    SendKeys "%(t)%(h)W~{ESC}"
End Select


End Sub

0
  1. Giriş Şeridinde Bul / Seç simgesini seçin

  2. Bul'a tıklayın

  3. Sağ alt kısımdaki "seçenekler" kutusunu tıklayın

  4. Sol tarafta, "İçeride" yazan bir açılır pencere var

  5. "Sayfa" veya "Çalışma Kitabı" nı seçin

Bu site varsayılanın nasıl değiştirileceğini açıklar


1
Bu iki nedenden dolayı işe yaramıyor. İlk olarak, bu seçenek her belgede kaydedilmedi. Bir e-tablo açın, değişikliği yapın, e - tabloyu kaydedin, Excel'i kapatın , e-tabloyu yeniden açın ve eskisi gibi oldu. İkincisi, belge ile tasarruf etse bile, makinemde oluşturulmamış çok fazla belge açmam gerekiyor ve bu nedenle oluşturuldukları orijinal makineden (yanlış) ayar yapmam gerekiyor.
Joel Coehoorn

0

Diğer cevapların önerdiği şekilde gönderim komutları önerilmez. Geçtiğimiz Sendkeys komutunda, bilgisayarı kurtarmak için yeniden başlatmanız gerekebileceği çok beklenmedik eylemlerle sonuçlandı. Rutin yerelleştirmenizi ve yalnızca istek üzerine çalıştırmanızı öneririm. Kolaylık sağlamak için "q" gibi bir cntl tuşu da atayabilirsiniz. Çalışma Kitabı İçinde seçeneği, oturumun dengesi için hatırlanacaktır.

Sub myFind()
  Application.CommandBars.FindControl(ID:=1849).Execute
  SendKeys "%(t)%(h)W~+{Tab}+{Tab}"
End Sub

0

Ben de benzer bir sorun yaşadım. Çalışma kitabında düğmem var. Düğmeye tıklanırsa, ne olursa olsun, varsayılan "iç sayfa" yerine "tüm çalışma kitaplarında ara" seçeneği olan seçili iletişim kutusunu açmayı çok istiyorum.

Ayrıca düğmenin çalışmasını istedim, gizlenen ya da gösterilen seçeneklerden bahsetti ve birinin manuel olarak değişiklik yapıp yapmadığına baktım. Bu, aldatıcı bir durum çünkü varsayılan başına Excel başlangıçta seçenekleri göstermiyor, ancak daha önce birileri daha önce gösterilmişse bir dahaki sefere onları hatırlıyor ve tekrar gösteriyor.

Tuş vuruşlarının çalıştığından emin olmak için, başlangıç ​​durumuna bakılmaksızın ayarı yapan bir dizi tuş vuruşuna ihtiyacımız var. Tinking biraz sürdü, ama işe yarayan bir tane buldum.

İşte benim Excel'in İngilizce sürümü için kodum, diğer diller için anahtarları uygun şekilde değiştirmek zorundasınız.

 Sub Commanbutton_Click()

      Cells(1, 1).Select

       SendKeys "^f", True
       SendKeys "{TAB 15}"
       SendKeys " ", True
       SendKeys "%t%t", True
       SendKeys "{TAB 2}", True
       SendKeys "{DOWN}{DOWN}{ENTER}", True
       SendKeys "%t%t", True

  End Sub

Manuel olarak deneyebilirsiniz:

Bulma diyalogu için CTRL + F tuşlarına basın. TAB tuşuna 15 kez basın, böylece "Seçenekler" e veya "İçinde ara" açılır menüsüne inebilirsiniz.

Basın ve ya

1) Seçenekler görüntülenir veya 2) açılır menü etkinleştirilir ve hiçbir şey olmaz

İmleci bul giriş kutusuna sıfırlamak için Alt + T tuşlarına iki kez basın.

SEKME tuşuna iki kez basın, ne olursa olsun (sizi önceki adımların seçeneklerin görüntülenmesini sağladığından emin olun!), Açılan menüde aramaya götürür.

"Çalışma Kitabı" nı seçmek için AŞAĞI ok düğmesine iki kez basın ve seçmek için GIRIŞ düğmesine basın.

İmleci bul giriş kutusuna tekrar sıfırlamak için ALT + T tuşlarına iki kez basın.

Umarım bu benzer bir problemi olan birine yardımcı olur. Birçok Googling, VBA ile "tüm çalışma kitaplarında arama yapmayı" önceden seçmenin mümkün olmadığını söyledi, ancak bu şekilde çalışıyor!

Farklı dillerle çalışmasını sağlamak için dili kontrol etmeniz ve uygun kısayollarla uygun rutine geçmek için CASE'i kullanmanız gerekir.

Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.