Formulle başka hücredeki değeri yazdırma

[hopeful]

Merhabalar
Şöyle bir sorum var. c2:c8 alanı arasında belli değerlerim var. d2:j8 alanı içerisinde "x" yazdığımda, yazmış olduğum "x" in satırındaki c kolonunda bulunan değerin, "x" yazdığım hücreye kırmızı renkli bir şekilde gelmesini istiyorum. Anlatımı karışık gelebilir. Kolay anlatımlı örnek ektedir.
makro kullanmadan yapabilirmisiniz...

Saygılar

 

[cel1453]

biçim/koşullu biçimlendirme/hücre değeri /eşittir x renk kırmızı bir denerseniz çözüm olabilir

 

[kombo]

Örnek dosya ekte.

 

[hopeful]

Sonucun ayrı bir excel sheetinde olmasını istemiyorum. Sheet 1 de ilgili alandaki bir hücreye "x" yazdığım zaman, o hücre hemen C kolunundaki değere dönüşecek.

 

[Korhan Ayhan]

Selamlar,

Ekte dosyanızda gerekli düzenlemeyi yaptım incelermisiniz.

 

[hopeful]

Ellerinize sağlık. Çok teşekkürler..
Mavi alanımız geniş olduğunda nasıl bir yöntem izleyeceğiz? Datalarımızı tutacağımız için geniş bir alana ihtiyacımız olacak. sütun ve satırlara ilaveler gelecek. (D2:EK2000) alanı kadar genişlediğini varsayalaım. her bir kolon için de sütun sonlarında toplam alacağım. Bunun için kodda nasıl bir düzeltme yapılabilir acaba?

 

[Korhan Ayhan]

Selamlar,

Bu durumda kodu daha işlevsel hale getirmek için aşağıdaki şekilde kullanabilirsiniz. Sabit değerler olarak C sütunu baz alınmıştır. Siz kendinize göre uyarlarsınız.

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
    If Intersect(Target, [D2:EK2000]) Is Nothing Then Exit Sub
    If IsEmpty(Target) Or InStr(1, Target.Address, ":") <> 0 Then Exit Sub
    If UCase(Target) = "X" Then
    Target = Cells(Target.Row, "C")
    End If
End Sub

 

[hopeful]

Çok teşekkür ederim ilginiz ve yardımlarınız için..