Range Sınıfının Select Yönetimi Başarısız Hatası

[iplikci_80]

Arkadaşlar bu çalışmada çalışma kapanıp açıldğında D4 hücresindeki tarih değerlerine göre sıralayan bir kod mevcut. Çoğu zaman çalışmayı açtığımda " Rune-time error'1004': Range Sınıfının Select Yönetimi Başarısız" hatası almaktayım. Bu hatanın giderilmesi hususunda yardımlarınızı rica ediyorum.

 

[Muzaffer Ali]

Kodlar ile seçim yapınca önce o hücrenin bulunduğu sayfa aktif edilmelidir.
Aktif olmayan bir sayfada hücre seçimi yapılamaz.

Yani kodlar şöyle olmalı

sayfaadi.select
range("A1").select

 

[iplikci_80]

Sayın dalgalikur ilginize teşekkür ederim.

 

[Muzaffer Ali]

Rica ederim.
İyi çalışmalar.

 

[Ömer BARAN]

Benim fikrim ise; mümkün olduğunca vba kodlarında selecet işleminin hiç yapılmamasının daha doğru olduğu yönünde.

Ayrıca sayfada sürekli çalışan SAAT uygulaması, belgenin verimliliğini düşürüyor.
Olmazsa olmaz bir işlem değilse saat olayını tamamen devre dışı bırakmanız daha doğru olur bence.

Select olayına gelirsek; örneğin kullandığınız Makro1 isimli makronun aşağıdaki kadar olması yeterli bence.
Kod'un işlem yapması için sayfanın seçili olmasına filan da gerek yok, sıralama işlemi sayfa aktif değilken de yapılabilir.
.

[B]Sub Makro1()[/B]
    Sheets("VERİ").Range("B4:L600").Sort , Key1:=Sheets("VERİ").[D4], Order1:=xlAscending
[B]End Sub[/B]

 

[iplikci_80]

Ömer Bey ilginize teşekkür ederim.