is it possible to have a code for "change cell color when clicking on it" in the way that it will not change already formated cells with another color, please?
After applying your code all my formating (colours) is away. Thank you. Veronika
Αυτό το άρθρο θα σας δείξει μερικές μεθόδους για το πώς να αλλάξετε το χρώμα του κελιού ενώ κάνετε κλικ σε ένα κελί και να αλλάξετε το επισημασμένο χρώμα ενώ επιλέγετε μια σειρά κελιών στο Excel
Αλλάξτε το χρώμα του κελιού όταν κάνετε κλικ στο κελί με τον κωδικό VBA
Αλλάξτε το επισημασμένο χρώμα όταν επιλέγονται κελιά με κωδικό VBA
Επισημάνετε ολόκληρη τη σειρά και τη στήλη του ενεργού κελιού με το Kutools για Excel
Εδώ, μπορείτε να αλλάξετε το χρώμα φόντου ενός κελιού όταν κάνετε διπλό κλικ ή κάνοντας δεξί κλικ πάνω του με τον ακόλουθο κώδικα VBA.
1. Στο φύλλο εργασίας θα αλλάξετε το χρώμα του κελιού όταν κάνετε κλικ σε αυτό, κάντε δεξί κλικ στην καρτέλα φύλλων και κάντε κλικ Προβολή κωδικού από το μενού με δεξί κλικ.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο Κώδικας παράθυρο.
VBA: αλλάξτε το χρώμα του κελιού όταν κάνετε κλικ σε αυτό
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Target.Interior.Color = vbRed End Sub Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) Target.Interior.Color = vbGreen End Sub
3. Τύπος άλλος + Q ταυτόχρονα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
Στη συνέχεια, όταν κάνετε διπλό κλικ σε ένα κελί, θα χρωματιστεί με κόκκινο χρώμα. Και όταν κάνετε δεξί κλικ σε ένα κελί, θα χρωματιστεί με πράσινο χρώμα. Δείτε το στιγμιότυπο οθόνης:
Ένα κλικ για να επισημάνετε τη σειρά και τη στήλη του επιλεγμένου κελιού στο Excel:
Kutools για Excel's Διάταξη ανάγνωσης Το βοηθητικό πρόγραμμα σάς βοηθά να επισημάνετε γρήγορα τη σειρά και τη στήλη του επιλεγμένου κελιού στο Excel όπως φαίνεται στην παρακάτω επίδειξη.
Κατεβάστε και δοκιμάστε το τώρα! (Δωρεάν μονοπάτι 30 ημερών)
Από προεπιλογή, όταν επιλέγετε μια περιοχή κελιών, το επισημασμένο χρώμα είναι γκρι. Εάν θέλετε να κάνετε το επιλεγμένο εύρος να ξεχωρίζει, μπορείτε να αλλάξετε το επισημασμένο χρώμα σε αυτό που χρειάζεστε. Κάντε τα εξής:
1. Κάντε δεξί κλικ στην καρτέλα φύλλων που θέλετε να αλλάξετε το επισημασμένο χρώμα του επιλεγμένου εύρους και κάντε κλικ στο Προβολή κωδικού από το μενού με δεξί κλικ.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο Κώδικας παράθυρο.
Κωδικός VBA: αλλάξτε το επισημασμένο χρώμα της επιλεγμένης περιοχής
Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target .Worksheet.Cells.FormatConditions.Delete .FormatConditions.Add xlExpression, , "TRUE" .FormatConditions(1).Interior.Color = vbYellow End With End Sub
3. Τύπος άλλος + Q ταυτόχρονα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
Από τώρα και στο εξής, το επισημασμένο χρώμα της επιλεγμένης περιοχής ή κελιού αλλάζει σε κίτρινο. Όταν κάνετε κλικ σε άλλο κελί ή περιοχή κελιών, τα κελιά θα χρωματιστούν αυτόματα.
Εάν ασχολείστε με ένα μεγάλο φύλλο εργασίας, είναι απαραίτητο να επισημάνετε ολόκληρη τη σειρά και τη στήλη του ενεργού κελιού για να κάνετε την ανάγνωση πιο εύκολη. Εδώ Διάταξη ανάγνωσης χρησιμότητα του Kutools για Excel μπορεί να σας βοηθήσει.
Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.
1. κλικ Kutools > Διάταξη ανάγνωσης. Δείτε το στιγμιότυπο οθόνης:
Στη συνέχεια, η διάταξη ανάγνωσης είναι ενεργοποιημένη, μπορείτε να δείτε τη γραμμή και τη στήλη του ενεργού κελιού να επισημαίνονται αμέσως.
Note: Μπορείτε να αλλάξετε τις ρυθμίσεις διάταξης ανάγνωσης με βάση τις ανάγκες σας όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.
Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.