Seçilen Hücrenin Altındaki Veriyi Başka Hücrede Gösterme

[dahili]

En uygun başlık olarak bunu atadım. Buna göre uygun bir makro varsa yardımcı olabilirseniz çok sevinirim. İyi çalışmalar herkese.

 

[Murat OSMA]

Deneyiniz...

[SIZE="2"]Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 1 Then Range("D6").Value = Target.Offset(1, 0).Value
End Sub[/SIZE]

 

[dahili]

çok teşekkür ederim.

 

[Murat OSMA]

Rica ederim, iyi günler...

 

[dahili]

bir sorum daha olacak bu komutu H sütunu ile 28. satır arasında tık yaptığımda çalıştırabilecek bir formül var mıdır. Yani üzerine tıkladığım hücreyi direk G-29'da gösterebilecek. çok teşekkürler ilgilendiğniz için.

 

[Murat OSMA]

Deneyiniz...

[SIZE="2"]Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row < 29 And Target.Column < 9 Then Range("G29").Value = Target.Offset(1, 0).Value End Sub[/SIZE]

 

[dahili]

sayfaya tıkladığımda vb arayüzü açılıyor ve "sytax error" iletisi çıkıyor. kodu çalıştıramadım bir türlü

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

bu satırıda sarı yaparak ok işaretiyle gösteriyor.

 

[Murat OSMA]

End Sub yazan yeri bir alt satıra alın...