CTRL F Bulma ve Değiştirme

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

bychilavert

Katılım
18 Tem 2018
Mesajlar
216
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

  • Screenshot_1.webp
    Screenshot_1.webp
    16 KB · Görüntüleme: 56
Çözüm
Ömer BARAN
Ne kadar işe yarar (auto_open prosedüründe işlem yapmadı) bilemiyorum ama;
boş bir module şu kodları yapıştırın, ardından belgenizde herhangi bir sayfaya bir düğme/metin kutusu/şeki ekleyip,
eklediğiniz metin/kutusu/düğme/şekil ile bu kodu ilişkilendirin ve belgeyi açtığınızda 1 kez bu kodu tetikleyin.
Kod çalıştıktan sonra, işlem açık tüm excel belgelerinde geçerli olacaktır.
Kod çalışırken VBA ekranının KAPALI OLMASI gerekir (çünkü SendKeys işlemi mevcut).

İşlem SendKeys yöntemiyle 1 kez CTRL+F ekranını açıp, ÇALIŞMA KİTABI ve DEĞERLER seçimini yapıp, CTRL+F ekranını kapatma şeklinde.

VBA: 
Sub CTRL_F_DUZENLE()
SendKeys "^f", True
SendKeys "{TAB 2}"
SendKeys "{DOWN}{DOWN}{ENTER}"
SendKeys "{TAB 2}", True
SendKeys "{DOWN}{DOWN}{ENTER}"...
Tarihe göre sırala Oylamaya göre sırala
@ByChilavert

Ben de buna ait bir ayarlama hatırlamıyorum ancak şunu biliyorum.
Belgede ARAMA işlemi için, ilk kez CTRL+F yaptığınızda arama yerini Çalışma Kitabı olarak değiştirirseniz,
sonraki CTRL+F işlemlerinde kullanılan son YER (Çalışma Kitabı/Çalışma Sayfası) ayarı aynı kalıyordu galiba.

O halde açılışta 1 kez CTRL+F yapıp, Çalışma Kitabı seçeneğini seçmeniz yeterli olur gibi düşünüyorum.

.
 
Oyla 0 Olumsuz oyla
Merhaba Ömer Hocam

Bende o dediğiniz şekilde yapıyorum. Sormaktaki amacım bunun Excel seçeneklerinde bir tanımlama v.s. var mı diye öğrenmek istedim.
 
Oyla 0 Olumsuz oyla
Ne kadar işe yarar (auto_open prosedüründe işlem yapmadı) bilemiyorum ama;
boş bir module şu kodları yapıştırın, ardından belgenizde herhangi bir sayfaya bir düğme/metin kutusu/şeki ekleyip,
eklediğiniz metin/kutusu/düğme/şekil ile bu kodu ilişkilendirin ve belgeyi açtığınızda 1 kez bu kodu tetikleyin.
Kod çalıştıktan sonra, işlem açık tüm excel belgelerinde geçerli olacaktır.
Kod çalışırken VBA ekranının KAPALI OLMASI gerekir (çünkü SendKeys işlemi mevcut).

İşlem SendKeys yöntemiyle 1 kez CTRL+F ekranını açıp, ÇALIŞMA KİTABI ve DEĞERLER seçimini yapıp, CTRL+F ekranını kapatma şeklinde.

VBA: 
Sub CTRL_F_DUZENLE()
SendKeys "^f", True
SendKeys "{TAB 2}"
SendKeys "{DOWN}{DOWN}{ENTER}"
SendKeys "{TAB 2}", True
SendKeys "{DOWN}{DOWN}{ENTER}"
SendKeys "{TAB}"
SendKeys "{ESC}"
End Sub
 
Oyla 0 Olumsuz oyla
Çözüm
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt