sayfalar arası geçiş

[SERGUZEST_İM]

benim tam olarak yardımını istediğim konuyu ekte verdim.yardımcı olurmusunuz dostlar

 

[accountant80]

Merhaba, Kod bölümüne ekleyip deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value = "" Then Exit Sub
If Target.Value = "ali" Then Target.Value = "32"
If Target.Value = "ahmet" Then Target.Value = "2"
If Target.Value = "ayşe" Then Target.Value = "23"
If Target.Value = "hüseyin" Then Target.Value = "25"
End Sub

 

[SERGUZEST_İM]

ben bıraz acemiyimde detaylı açıklamanız mümkün mü?

 

[accountant80]

Sayfa 2 de alt+f11 tuşuna basın, gelen boş sayfaya yukarıdaki kodları yapıştırın. Kaydedip, kapatın.
Sayfa 2 de ali,ahmet vs yazın ve değişiklikleri izleyin.

Bunları yapamam derseniz dosyanız ekte onu inceleyin.

 

[SERGUZEST_İM]

çok teşekkür ederim tam istediğim gibi olmuş

 

[accountant80]

çok teşekkür ederim tam istediğim gibi olmuş

Güle güle kullanın