Hücre baglantisi

[merpil]

Merhaba arkadaslar,

5 sayfali bir excel dosyasinda, sayfa 3, sayfa 4 ve sayfa 5 deki C9 hücrelerinin iceriginin ayni olmasi lazim. Bu sayfalari nasil birlestirebilirimki birinde degisiklik yapilirsa hepsi birden degissin?

Tesekkür ederim

 

[uzmanamele]

merhaba
aklıma gelen 2 seçenekden birini kullanabilirsiniz

sayfa3 C9 da değişiklik yapacağınızı varsayalım;
diğer sayfaların C9 hücresine =Sayfa3!C9 yazabilirsiniz.

tüm sayfaları seçin ve C9 hücreye değeri yazın, sayfaları çözdüğünüzde her sayfanın C9 hücresinde aynı şey yazıyor olacak.

 

[fedeal]

alternatif olarak makrolu çözüm ekte sayfanın kod bölümünü inceleyin,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$c$9" <> Empty Then
Else
Sheets("sayfa2").Range("c9").Value = Range("c9").Value
Sheets("sayfa3").Range("c9").Value = Range("c9").Value
End If
End Sub
not:her sayfa için sayfa isimlerini degiştirmelisiniz.

 

[uzmanamele]

merhaba
bir alternatif makroda benden olsun

ThisWorkbook bölümüne yazarak deneyiniz

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [c9]) Is Nothing Then Exit Sub
yeni = [c9]
For i = 1 To Worksheets.Count
Sheets(i).[c9] = yeni
Next
End Sub