ÇALIŞMA KİTABININ HERSEFERİNDE AYNI SAYFADA AÇILMASI

[murtili71]

Merhaba arkadaşlar,
ben çalışma kitabımın farklı sayfalarda kaydedilip çıkılsa bile ana sayfamdan açılmasını istiyorum, yani açılırken hep aynı sayfada açılsın,
yardımlarınızı bekliyorum, teşekkürler

 

[airborne]

excel vba da bir modül oluşturun ve içine aşağıdaki kodu kopyalayıp yapıştırın

sub auto_open ()
Sheets ("Sayfa1").select
Range ("A1").select
End Sub

 

[CRAYZLOVEIS]

Arkadaşlar bu kodu tam olarak nereye ekleyeceğiz. yeni bir modül ekledim içine yazdım olmadı....Lütfen biraz ayrıntı verirmisiniz

 

[Necdet]

Merhaba,

Aşağıdaki dosyayı inceliyiniz. Kodları ThisWorkbook sayfasına kopyalamanız gerek.

Private Sub Workbook_Open()
    Sheets("Sheet1").Select
End Sub

 

[CRAYZLOVEIS]

Öncelikle tşk ederim. Ama bir sorun daha var....ThisWorkbook sayfasında daha önceden aşağıda yazılı olan bir kod vardı. Bu kodu sildiğimiz zaman çalışıyor. Ama ben bu kod silinmesini istemiyorum. Acaba bir çözüm yolu varmı

Private Sub Workbook_Open()
slidehasim.Show
End Sub

 

[Necdet]

Merhaba,

Sizin kodlarınızda slidehasim.Show satırından önce ilgili sayfayı seçen kodu da ekleyebilirsiniz yani :

Private Sub Workbook_Open()
[B][COLOR=red]Sheets("Sayfa1").Select
[/COLOR][/B]slidehasim.Show
End Sub

gibi olabilir.