Hücre değiştiğinde seçilen sayfaya yönlenme

[hacuc]

Herkese merhaba,
Hücre içerisinde bilgi değiştiğinde belirlemiş olduğum sayfaya otomatik olarak nasıl giderim.

"Reyon_Arızalı_Tablo" sayfasında bulunan B3 hücresi değiştiğinde "Reyon Arızalı" sayfasına gitmek istiyorum.

Teşekkürler

 

[Korhan Ayhan]

B3 hücresi elle mi değişiyor?

 

[hacuc]

Yok pivot tablo ile doluyor.

 

[Korhan Ayhan]

Özet tablo için özel bir kod seçeneği var. Ama ben daha önce hiç kullanmadım. Bir deneyin. Belki işinize yarayabilir.

Eklediğiniz görselde ki sayfanın kod bölümüne uygulayınız.

Option Explicit

Private Sub Worksheet_PivotTableAfterValueChange(ByVal TargetPivotTable As PivotTable, ByVal TargetRange As Range)
    If Intersect(TargetRange, Range("B3")) Then Sheets("Reyon Arızalı").Select
End Sub

 

[hacuc]

Emeğiniz için teşekkür ederim, ama işe yaramadı

 

[Korhan Ayhan]

Bunu deneyiniz. Olmazsa örnek dosya ekleyiniz.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("B3")) Then Sheets("Reyon Arızalı").Select
End Sub