Arkadaşlar merhaba,
Sayfa1'de A sütununda hangi test numarasını yazarsam,
B Sütununda onun karşısına, ilgili renk geliyor
Bunu otomatik olarak Sayfa2'de de yapmasını istiyorum.
İnternetten araştırdım, aşağıdaki kodu buldum
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Range("C1").Interior.Color = Me.Range("A1").Interior.Color
End Sub
Bu kod sadece, aynı sayfa içinde ve de tek bir hücreyi hedefliyor.
Benim istediğim farklı sayfalarda, tüm sütunu hedeflesin
Aşağıda başka bir kod daha buldum ama çalışmadı,
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Sheet2.Range("C1").Interior.Color = Sheet1.Range("A1").Interior.Color
End Sub
Nasıl yardımcı olabilirsiniz?
Sayfa1'de A sütununda hangi test numarasını yazarsam,
B Sütununda onun karşısına, ilgili renk geliyor
Bunu otomatik olarak Sayfa2'de de yapmasını istiyorum.
İnternetten araştırdım, aşağıdaki kodu buldum
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Range("C1").Interior.Color = Me.Range("A1").Interior.Color
End Sub
Bu kod sadece, aynı sayfa içinde ve de tek bir hücreyi hedefliyor.
Benim istediğim farklı sayfalarda, tüm sütunu hedeflesin
Aşağıda başka bir kod daha buldum ama çalışmadı,
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Sheet2.Range("C1").Interior.Color = Sheet1.Range("A1").Interior.Color
End Sub
Nasıl yardımcı olabilirsiniz?