Bul komutu (Ctrl+F) ile sayfayı seçmek

[ASLAN7410]

Merhaba arkadaşlar.

Excel sayfamın Sayfa1'de iken Ctrl+F'ye bastığımda Sayfa1'in komple seçilmesini istiyorum.

Forumda araştırdım ancak böyle birşey bulamadım ve kendimde yapamadım.

Yardım edecek arkadaşlara şimdiden teşekkür ederim.

 

[Ömer BARAN]

Merhaba.
Bildiğim kadarıyla, mevcut standart kısayol tuşlarını başka bir işlem için ayarlıyamıyorsunuz.
Başka tuş seçeneklerini denemelisiniz.
Sayfanın tümünü seçkenizi sağlayacak vba kodu Cells.Select .

 

[Saban Sertkaya]

İstediğiniz işlemi Ctrl+A zaten yapmaktadır.

 

[Ömer BARAN]

Şaban Bey,
Bildiğim kadarıyla aralarında boşluk olan biden fazla tablo mevcutsa; aktif hücre hangi tablonun içerisindeyse, Ctrl+A sadece o tabloyu seçiyor. Ya sol üst köşeden tüm hücreleri ya da A1'de iken Ctrl+End tuşuyla kullanılan tüm hücreleri seçmek lazım sanırım.

 

[Saban Sertkaya]

Ömer Bey, denemedim ama Ctrl+A tüm sayfayı seçiyor diye biliyorum. Tablo, boşluk vs. etkilememesi lazım.
Standart kısayollardan biridir Ctrl+A. Aynı tüm programlarda Ctrl+C'nin kopyala yapması gibidir yani.

 

[Ömer BARAN]

Bilgisayar başında değilim ama yazdığım gibi olduğunu hatırlıyorum sanki.

 

[Korhan Ayhan]

CTRL+A tuşlarına peş peşe basarsanız sayfayı komple seçmesi gerekir.

 

[mancubus]

A1 hücresinin sol üst köşesine, sayfa dışı köşe, tıklanınca tüm sayfa seçilir.

mecvut kısa yolların üzerine başka makro atayabilirsiniz.

fakat neden? neden tüm sayfayı seçmek istiyorsunuz?

 

[ASLAN7410]

Merhaba arkadaşlar günaydın, konuya cevap veren herkese çok teşekkür ederim.

Sayın mancubus mevcut kısa yolların üzerine başka makro atabilirsiniz demişsiniz ancak bunu maalesef yapamadım.

Excel sayfamda veri çok olduğu için Ctrl+F ile bulmak istediğim veriyi buluyorum, sayfanın hepsi beyaz renk olduğu için imlecin durduğu yerde beyaz olduğundan imleci arıyoruz.

Benim yapmak istediğim sayfanın tümü seçildiğinde sayfa gri renge dönüyor, Ctrl+F'ye bastığımda bulmak istediğim veriyi bulduğumda imlecin bulunduğu yer beyaz renk olduğu için daha belirgin hale geldiğiden bu şekilde istemiştim.

Her Ctrl+F'ye bastığımda önce sayfanın komple seçilmesi ve bul diyalogunun ekrana gelmesini istiyorum.

 

[systran]

şu kodu deneyin.

cells.select
Application.Dialogs(xlDialogFormulaReplace).Show

şunu da deneyin.

Cells.Select
Application.CommandBars.FindControl(ID:=313).Execute

 

[ASLAN7410]

Sayın systran ilginiz için çok teşekkür ederim.

Sizin yazmış olduğunuz kodu aşağıdaki gibi ayarladım, butona bastığımda bul dialogunun değiştir kısmı geliyor, bul kısmı gelir mi?

Sub seç()
Cells.Select
Application.CommandBars.FindControl(ID:=313).Execute
End Sub

Ayrıca bu işlem butonsuz olarak ayarlanır mı? Yani Ctrl+F'ye bastığımda kodun çalışmasını istiyorum.

 

[systran]

ID olarak 1849 u kullanın.
kısayol atmakl için önce excelin kendi makro oluşturucusundan basit bir makro oluşturn.
onun içindeki kodları silip bu kodları yapıştırın ve yine excelin kendi makro seçeneklerinde (geliştirici sekmesi gerekir) KISAYOL atayın. CTRL + F yerine Q kullanılabilir. mevcut kısayolları değiştirmek istemezseniz.

 

[ASLAN7410]

Sayın systran ilginize çok teşekkür ediyorum, hayırlı çalışmalar.