- Katılım
- 6 Mayıs 2014
- Mesajlar
- 264
- Excel Vers. ve Dili
- office 365
- Altın Üyelik Bitiş Tarihi
- 23-06-2021
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Cells.Interior.ColorIndex = xlColorIndexNone
ActiveCell.EntireColumn.Interior.ColorIndex = 19 'Sütun Rengi
ActiveCell.EntireRow.Interior.ColorIndex = 17 ' Satır Rengi
ActiveCell.Cells.Interior.ColorIndex = 4 ' Hücre Rengi
End Sub
şeklinde bir kod kullanıyorum. imlecin bulunduğu satır ve sütunu renklendiriyor. Yalnız yazdırırken bu renklendirmeler de görünüyor. Sadece yazdırırken olmak üzere bu makronun çalışmamasını sağlayabilir miyiz.
Ayrıca birden fazla hücre ya da satır, sütun seçildiğinde seçilen hücrelere ait satırları ve sütunları renklendirmiyor. Tek satır ve sütunu renklendiriyor. Birden fazla hücre ya da satır-sütun seçildiğinde ilgili olan tüm satır ve sütunları renklendirecek şekilde kod eklenebilir mi.
Cells.Interior.ColorIndex = xlColorIndexNone
ActiveCell.EntireColumn.Interior.ColorIndex = 19 'Sütun Rengi
ActiveCell.EntireRow.Interior.ColorIndex = 17 ' Satır Rengi
ActiveCell.Cells.Interior.ColorIndex = 4 ' Hücre Rengi
End Sub
şeklinde bir kod kullanıyorum. imlecin bulunduğu satır ve sütunu renklendiriyor. Yalnız yazdırırken bu renklendirmeler de görünüyor. Sadece yazdırırken olmak üzere bu makronun çalışmamasını sağlayabilir miyiz.
Ayrıca birden fazla hücre ya da satır, sütun seçildiğinde seçilen hücrelere ait satırları ve sütunları renklendirmiyor. Tek satır ve sütunu renklendiriyor. Birden fazla hücre ya da satır-sütun seçildiğinde ilgili olan tüm satır ve sütunları renklendirecek şekilde kod eklenebilir mi.