Sayfalar Arası Geçişte köprü yerine makro kullanımı

[sratacc]

arkadaşlar selamlar

ekte sunduğum dosya içerisinde sayfalar arası geçişi köprü yardımıyla yapıyorum ancak köprü zaman zaman çalışma konusunda sıkıntı çıkarıyor. aynı işi görebilecek bir makro kodu varmıdır acaba.
diğer bir sorum da bu konu ile alakasız olacak fakat excel sayfasının mouse topunu ileri geri hareketinde normalde düşey olan sayfa hareketini yatay olarak nasıl hareket ettirebilirim.

teşekkürler.

 

[hamitcan]

Aşağıdaki kodda sayfa isimlerini değiştererek kodu, çoğaltınız.

sub anasayfa()
 Sheets("Anasayfa").select
end sub

 

[sratacc]

Aşağıdaki kodda sayfa isimlerini değiştererek kodu, çoğaltınız.

sub anasayfa()
 Sheets("Anasayfa").select
end sub

teşekkür ederim sayın hamitcan.

 

[sratacc]

peki içinde birden fazla sekmesi bulunan başka bir excel sayfasındaki ilgili sekmeyi açmak için nasıl bir kod kullanabiliriz. örneğin AAA isimli excel kitabının içindeki BBB sekmesinin açılması.

teşekkürler

 

[hamitcan]

Bu şekilde deneyin.

Sub SayfaSec()
  yol = "C:\deneme.xls"
  Workbooks.Open yol
  Sheets(2).Select
End Sub

 

[sratacc]

teşekkür ediyorum sayın hamitcan.

kodda (2) yerine sekme adını kullandım sorunsuz çalışıyor.
Sheets("BİLGİ EDİNME").Select

 

[mercinorama]

Arkadaşlar köprü oluşturmakla makro ile sayfaları köprülemek arasında bir fark olur mu programın kasılması konusunda?

 

[hamitcan]

Çok fazla formül kullandıysanız, sayfada ağırlaşma yapabilir.

 

[hiko33]

arkadaşlar iki ayrı sayfa arasında satır satır ilişki kurmak istiyorum. makro varsa yazabilir misiniz.

 

[hamitcan]

arkadaşlar iki ayrı sayfa arasında satır satır ilişki kurmak istiyorum. makro varsa yazabilir misiniz.

Sorunuzu, yeni başlıkta bir örnek yardımıyla sorunuz.

 

[katip16487]

Peki sayfalar arası geçişleri makro ile sağlıyorum, ancak açılışta sadece ANASAYFA isimli sayfanın görünmesi için diğer sayfaları gizli hale getirdim, bu durumda sayfaya git makrosu çalışmıyor, bunu nasıl düzeltebilirim.

Makro ile Gizli sayfalara geçiş nasıl sağlanabilir.

 

[ccuneyt13]

Peki sayfalar arası geçişleri makro ile sağlıyorum, ancak açılışta sadece ANASAYFA isimli sayfanın görünmesi için diğer sayfaları gizli hale getirdim, bu durumda sayfaya git makrosu çalışmıyor, bunu nasıl düzeltebilirim.

Makro ile Gizli sayfalara geçiş nasıl sağlanabilir.

Merhaba,
hamitcan üstadın verdiği koddan yola çıkarak;

AnaSayfadan Diğer Sayfalara gitmek için ilgili kodu aşağıdaki gibi;

Sub anadan_sayfaya()
Sheets("Sayfa1").Visible = True
Sheets("Sayfa1").Select
End Sub

Diğer Sayfalardan Anasayfaya gitmek istediğiniz koduda aşağıdaki gibi yapabilirsiniz.

Sub sayfadan_anaya()
Sheets("Sayfa1").Select
Sheets("Sayfa1").Visible = False
End Sub

Umarım işinize yarar.

 

[katip16487]

Teşekkür ederim. Gizli sayfayı aktif hale getirdik ve işlemimizi yaptık. Ancak sayfadan anasayfaya geçerken gizleme işlemini yapacağımız sayfa sayısı çok fazla olduğu için bunu Ana sayfaya git makrosunu çalıştırdığımızda tüm diğer sayfaları nasıl gizleyebiliriz.

 

[katip16487]

Örneğin, A sayfasından gizli B sayfasına gittik, B sayfasında işlemlerimizi yaptık, tekrar A sayfasına döneceğiz yada C, D veya E .... sayfalarına gideceğiz, B sayfasından çıkarken B sayfasını tekrar gizlesin.