ActiveCell Hatası

[farukozoktem]

Merhaba arkadaşlar internetten izleyerek yaptığım bir excel çalışması bende sorunsuz çalışırken bittiği için arkadaşıma gönderdim ama onun bilgisayarında B sutünlarında tıklanılan satır sayısının hemen yanında A sutünuna gelmesi gerek buton onda çalışmıyormuş ve bu hatayı veriyormuş neden olabilir?

Hata Resmi

 

[Orion1]

if intersect diye başlayan satırı iptal edip deneyiniz.

 

[farukozoktem]

if intersect diye başlayan satırı iptal edip deneyiniz.

Söylediğinizi yaptım fakat yine olmadı.
Ben Excel 2010 kullanarak yaptım arkadaşım Excel 2013 kullanıyormuş ondan kaynaklı olabilir mi ?

 

[Orion1]

Söylediğinizi yaptım fakat yine olmadı.
Ben Excel 2010 kullanarak yaptım arkadaşım Excel 2013 kullanıyormuş ondan kaynaklı olabilir mi ?

Ondan olmaz.
cmd1 diye nesnesi olmayabilir.
cmd1 nedir?

 

[farukozoktem]

Ondan olmaz.
cmd1 diye nesnesi olmayabilir.
cmd1 nedir?

Ben dosyayı size link olarak versem sanırım öyle daha anlaşılır olur. Şablon sayfasında B sutununda sectiğiniz her satırda A sutunuda gözükmesi gereken buton onun ismi "Cmd1" ama arkadaşımda sadece B2 satırında çıkıyor B3 e geldiğinde çıkmıyor inceleyebilir misiniz?

Dosya : http://dosya.co/ul96nctmk1dl/Örnek.rar.html

 

[Orion1]

Bende b sütununa tıkladığımda a sütununda aktif hücrenin satırında çıkıyor.
Sorun yok.Herhangi bir hatada vermedi.

 

[farukozoktem]

Bende b sütununa tıkladığımda a sütununda aktif hücrenin satırında çıkıyor.
Sorun yok.Herhangi bir hatada vermedi.

Sırasıyla B2,B3,B4,B5 vs. denediniz ve solunda çıktı değil mi her satırın.

 

[Orion1]

Sırasıyla B2,B3,B4,B5 vs. denediniz ve solunda çıktı değil mi her satırın.

evet çıktı.sorun yok.

 

[farukozoktem]

evet çıktı.sorun yok.

Peki çok teşekkür ederim. Birde Office kaldırıp yeniden kuralım çözüm olacak mı bakalım. Eğer bir hata ile karşılaşırsam tekrar yardım rica edebilirim sizden

Bunu buton ile değilde B sutununda giriş yapmak istediği satıra tıkladığında açılır hale gelmesi için ne yapmamız lazım ?

 

[Orion1]

Peki çok teşekkür ederim. Birde Office kaldırıp yeniden kuralım çözüm olacak mı bakalım. Eğer bir hata ile karşılaşırsam tekrar yardım rica edebilirim sizden

Bunu buton ile B sutununda giriş yapmak istediği satıra tıkladığında açılır hale gelmesi için ne yapmamız lazım ?

Sayfa1 in kod bölümündeki kodları silin ve aşağıdaki kodları yapıştırın.
b sütununa çift tıkladığınızda userform açılır.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [B:B]) Is Nothing Then Exit Sub
UserForm1.Show
Cancel = True
End Sub

 

[farukozoktem]

Sayfa1 in kod bölümündeki kodları silin ve aşağıdaki kodları yapıştırın.
b sütununa çift tıkladığınızda userform açılır.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [B:B]) Is Nothing Then Exit Sub
UserForm1.Show
Cancel = True
End Sub

Çok teşekkür ederim sağolun. Allah razı olsun.

 

[Korhan Ayhan]

Bende eklediğiniz dosyadaki buton seçime göre konumlanmadı. Yani kod çalışmıyor. Sayfa koruması nedir?

 

[farukozoktem]

Bende eklediğiniz dosyadaki buton seçime göre konumlanmadı. Yani kod çalışmıyor. Sayfa koruması nedir?

Sayfa koruması : gedik

Arkadaşımda olan sorunun aynısını yaşamışsınız acaba bir çözüm bulabildiniz mi ?

 

[Korhan Ayhan]

Aşağıdaki gibi uygulayınca çalıştı.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ActiveSheet.Unprotect "gedik"
    Cmd1.Top = ActiveCell.Top
    ActiveSheet.Protect "gedik"
End Sub

 

[farukozoktem]

Aşağıdaki gibi uygulayınca çalıştı.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ActiveSheet.Unprotect "gedik"
    Cmd1.Top = ActiveCell.Top
    ActiveSheet.Protect "gedik"
End Sub

Anladığım kadarı ile sayfa koruması var diye çalışmıyor bazı sistemlerde değil mi sayın Orion1 ' in sisteminde sıkıntısız çalışmıştı. Ama sizinkinde çalışmadı başta.

 

[Korhan Ayhan]

Aslında sayfa koruması yaparken gelen menüde NESNELERİ DÜZENLE seçeneğini seçip koruma yaparsanız kodunuzun eski halide çalışıyor.

 

[farukozoktem]

Aslında sayfa koruması yaparken gelen menüde NESNELERİ DÜZENLE seçeneğini seçip koruma yaparsanız kodunuzun eski halide çalışıyor.

Anladım size de yardımlarınız ve bilgileriniz için çok teşekkür ederim. Harika bir site burası gerçekten ve sizlerde çok alakadarsınız.