Sheetler arasında bağlantı

[elam]

Slm, Elimde bir excel çalışması var ve bu excelde 2 button kullanılıyor.Ayrıca bu formlar exceldeki sheetten veri çekiyor. Yalnız ben bu buttonları boş bir sheette kopyaladığımda verileri form üzerine getirmiyor.Mesela Boş sheet sheet1, buttonların bulunduğu sheet ise sheet2.Sheet1de iken sheet2deki verileri görmesini nasıl sağlayabilirim???Yani sheet2 deki verileri sheet1deki buttonlara tıklanıldığımda form üzerine nasıl getirebilirim??? Yardımcı olursanız sevinirim...

 

[Merhum İdris SERDAR]

Formunuzdaki kodlara bakın. Hangi Sheet'ten veri aldığına bakın. Sonra Hangi Sheet'ten veri alınmasını istiyorsanız bununla değiştirin.

 

[elam]

tamam onu hallettim.Peki bir excel dosyasını açar açmaz imleci AA1 hücresinde nasıl yapabiliriz.Yani dosyayı açtığımızda AA1 hücresini nasıl seçili hale getirebiliriz???

 

[Levent Menteşoğlu]

Aşağıdaki kodu bir normal modül sayfasına kopyalayın.

[vb:1:2c0b3867d4]Sub auto_open()
sheets("sayfa1").[AA1].select
end sub[/vb:1:2c0b3867d4]

 

[elam]

dediğinizi yaptım ama dosyayı açtığımda bana "Ambiguous name detected:auto_open"diye uyarı veriyo ne yapmam gerekiyo???

 

[Levent Menteşoğlu]

Kod içindeki Sayfa1 isimli sayfa adı yerine kendi sayfanızın adını yazmanız gerekir.

 

[Merhum İdris SERDAR]

Sayın elam,
Anlaşılan hep sayfa isimleri ile problem yaşıyorsunuz.

 

[elam]

Evet ama doğru yazıyorum yine aynı hatayı veriyo.Excelle yıldızımız barışmıyo :lol:

 

[Levent Menteşoğlu]

Evet ama doğru yazıyorum yine aynı hatayı veriyo.Excelle yıldızımız barışmıyo

Hata bende kodu aşağıdaki gibi deneyin.

[vb:1:b7e3e7771e]Sub auto_open()
sheets("sayfa1").select
[AA1].select
End Sub [/vb:1:b7e3e7771e]

 

[elam]

Dediğiniz kod yine hatalı Ben doğru olanını buldum.
Sub auto_open()
Sheets("sheet1").Select
ActiveSheet.Cells(1, 27).Select
End Sub

Herşey için teşekkürler iyi çalışmalar.... :hey: