Sayfadan sayfaya aktarma acil

[ahe9953]

Aşağıdaki dosyada başta boş bir sütun var bu sütüna ant yazınca ant sayfasına int int sayfasına gitmesini istiyorum yardım edermisiniz?

 

[antonio]

Yazıyı yazdığınız satırda ki bilgilerin mi gitmesini istiyorsunuz, yoksa sadece belirtiğiniz sayfanın açılmasını mı istiyorsunuz? Biraz daha net ifade ederseniz yardım alma şansınız daha yüksek olur.

 

[yerbakili]

Genel isimli sayfanızın kod bölümüne,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(1, 1) = "int" Then
Cells(1, 1) = ""
Sheets("INTER YAPI").Select
End If

If Cells(1, 1) = "ant" Then
Cells(1, 1) = ""
Sheets("ANT YAPI").Select
End If
End Sub

kodlarını ekleyip, A1 hücresine ant ya da int yazarak dener misiniz?

 

[ahe9953]

kodları nereye ekliycem

 

[yerbakili]

kodları nereye ekliycem

GENEL isimli sayfanızda "GENEL" yazan yere sağ tıklayın ve Kod Görüntüleye basarak kodları ekleyebilirsiniz.

 

[ahe9953]

denedim olmadı

 

[yerbakili]

Bu kadar açıklamayla bu kadar yardımcı olabiliyorum. Kusura bakmayın.

 

[ahe9953]

kodları ekledim fakat olmadı neden

 

[antonio]

denedim olmadı

Sayın yerbakili'nin çalışması ant yada int yazısını sadece GENEL Sayfasının A1 hücresine yazdığınız zaman çalışıyor. Buna dikkat edin. Kodu şu şekilde kullanın:
1) sayın yerbakili'nin çalışmasını kopyalayınız.
2) Sayfanızda GENEL sekmesine sağ tıklayınız ve açılan menüden "Kod Görüntüle" yi tıklayınız.
Açılan pencereye sağ tıklayıp kodu "yapıştır" yapınız.
3) Kod sayfasını kapatıp, Excel Sayfanızın GENEL sayfasının A1 hücresine ant yada int yazınız.
Kolay gelsin.