01-09-11, 23:14
|
 | Super Moderator Όνομα: Θανάσης Στυλιανίδης Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 18-10-2009 Περιοχή: Βρυξέλλες, Βέλγιο
Μηνύματα: 758
| |
Φίλε Σταύρο,
Κάνε δεξί κλικ στο όνομα του φύλλου και στο παράθυρο του VBE που θα ανοίξει κάνε επικόλληση τον παρακάτω κώδικα. Κώδικας: Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = xlNone
Rows(Target.Row).Interior.ColorIndex = 36
Columns(Target.Column).Interior.ColorIndex = 36
End Sub
Φιλικά
Θανάσης
|