[Μορφοποίηση] Χρωματισμός κελιού με πάτημα ποντικιού

[Spirosgr]

Καλημέρα
Μια πολύ απλή λύση με κώδικα θα μπορούσε να ήταν και η εξής:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Γραμμή 1
Cells.Interior.Pattern = xlNone
'Γραμμή 2
Target.Interior.Color = 65535
'Γραμμή 3
Rows(Target.Row).Interior.Color = 65535
'Γραμμή 4
Columns(Target.Column).Interior.Color = 65535
End Sub

Αντιγράψτε τον κώδικα σε φύλλο (όχι σε Module) και εκτός από την Γραμμή 1
ενεργοποιήστε ή απενεργοποιήστε τις υπόλοιπες γραμμές ή χρησιμοποιήστε συνδυασμό των υπολοίπων γραμμών ανάλογα με το τι θέλετε να χρωματίζεται (κελί, γραμμή, στήλη)
Σημείωση:
Το επιλεγμένο για το παράδειγμα χρώμα είναι κίτρινο