Μετάβαση στο κύριο περιεχόμενο

Πώς να επισημάνετε ολόκληρη / ολόκληρη τη σειρά κατά την κύλιση στο φύλλο εργασίας του Excel; 

Εάν έχετε ένα μεγάλο φύλλο εργασίας με πολλές στήλες, θα είναι δύσκολο για εσάς να διακρίνετε δεδομένα σε αυτήν τη σειρά. Σε αυτήν την περίπτωση, μπορείτε να επισημάνετε ολόκληρη τη σειρά του ενεργού κελιού, ώστε να μπορείτε να βλέπετε γρήγορα και εύκολα τα δεδομένα σε αυτήν τη σειρά όταν κάνετε κύλιση προς τα κάτω στην οριζόντια γραμμή κύλισης. Σε αυτό το άρθρο, θα μιλήσω για μερικά κόλπα για να επιλύσετε αυτό το πρόβλημα .

Επισημάνετε ολόκληρη τη σειρά κατά την κύλιση με κώδικα VBA

Επισημάνετε ολόκληρη τη σειρά / στήλη / σειρά και στήλη κατά την κύλιση με το Kutools για Excel


Ο ακόλουθος κώδικας VBA μπορεί να σας βοηθήσει να επισημάνετε δυναμικά μια σειρά επιλεγμένων κυττάρων, κάντε τα εξής:

1. Ενεργοποιήστε το φύλλο εργασίας που θέλετε να επισημάνετε ολόκληρη τη σειρά του επιλεγμένου κελιού και, στη συνέχεια, κάντε δεξί κλικ στην καρτέλα φύλλων και επιλέξτε Προβολή κωδικού από το μενού δεξιού κλικ, δείτε το στιγμιότυπο οθόνης:

επισήμανση εγγράφου ολόκληρη η σειρά 1

2. Στο άνοιγμα Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε τον ακόλουθο κώδικα σε αυτήν την κενή ενότητα:

Κωδικός VBA: Επισημάνετε ολόκληρη τη σειρά κατά την κύλιση

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Cells.Interior.ColorIndex = 0
Target.EntireRow.Interior.ColorIndex = 8
End Sub

3. Στη συνέχεια, αποθηκεύστε και κλείστε αυτόν τον κώδικα, τώρα, όταν κάνετε κλικ σε ένα κελί, ολόκληρη η σειρά αυτού του επιλεγμένου κελιού θα επισημανθεί ως εξής στιγμιότυπα οθόνης που εμφανίζονται:

επισήμανση εγγράφου ολόκληρη η σειρά 2
1
επισήμανση εγγράφου ολόκληρη η σειρά 3

:

1. Μπορείτε να αλλάξετε το χρώμα επισήμανσης σε άλλο που σας αρέσει σε αυτό το σενάριο "Target.EntireRow.Interior.ColorIndex = 8Αλλάξτε τον αριθμό 8 σε άλλο δείκτη χρωμάτων.

2. Εάν θέλετε να απενεργοποιήσετε αυτόν τον κωδικό, πρέπει απλώς να μεταβείτε στο Microsoft Visual Basic για εφαρμογές παράθυρο και διαγράψτε τον κωδικό.

3. Αυτός ο κώδικας μπορεί επίσης να επισημάνει τις σειρές επιλεγμένης περιοχής κελιών ως εξής αποτέλεσμα:

επισήμανση εγγράφου ολόκληρη η σειρά 4

4. Αυτός ο κωδικός εφαρμόζεται μόνο στο τρέχον φύλλο εργασίας.

5. Εάν υπάρχουν μερικά χρωματιστά κελιά στο φύλλο εργασίας σας, το χρώμα του κελιού θα χαθεί όταν εφαρμόσετε αυτόν τον κωδικό.


Εάν θέλετε να δοκιμάσετε ένα νέο εργαλείο - Kutools για Excel, Με τους Διάταξη ανάγνωσης, μπορείτε εύκολα να επισημάνετε ολόκληρη τη σειρά ή ολόκληρη τη στήλη ή και τη σειρά και τη στήλη του ενεργού κελιού.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. 

Μετά την εγκατάσταση Kutools για Excel, κάντε τα παρακάτω βήματα:

1. Επιλέξτε ένα κελί ή μια σειρά κελιών όπου θέλετε να επισημάνετε τις σειρές.

2. Κλίκ Kutools > Διάταξη ανάγνωσης αναπτυσσόμενο κουμπί> Ανάγνωση ρυθμίσεων διάταξης, δείτε το στιγμιότυπο οθόνης:

3. Στην Ανάγνωση ρυθμίσεων διάταξης πλαίσιο διαλόγου, επιλέξτε έναν τύπο που χρειάζεστε για να επισημάνετε τη γραμμή ή τη στήλη κάτω από το Σχήματα ενότητα και, στη συνέχεια, καθορίστε ένα στυλ αυτού του σχήματος, ταυτόχρονα, μπορείτε να ορίσετε άλλες επιλογές, όπως το χρώμα ή τη διαφάνεια που χρειάζεστε, δείτε το στιγμιότυπο οθόνης:

Συμβουλές: Εάν θέλετε να επισημάνετε τη σειρά και τη στήλη του επιλεγμένου κελιού, επιλέξτε Δικτυωτός σύμφωνα με το Σχήματα ενότητα, και επιλέξτε Κάθετη γραμμή για να επισημάνετε ολόκληρη τη στήλη του ενεργού κελιού.

4. Αφού ολοκληρώσετε τις ρυθμίσεις στο παράθυρο διαλόγου, κάντε κλικ Okκαι τώρα, όταν κάνετε κλικ σε ένα κελί, ολόκληρη η σειρά θα επισημανθεί ταυτόχρονα. Και θα μετακινηθεί δυναμικά καθώς τα επιλεγμένα κελιά αλλάζουν.

:

1. Μπορείτε να ακυρώσετε αυτό το βοηθητικό πρόγραμμα επιλέγοντας το Διάταξη ανάγνωσης πάλι.

2. Αυτό Διάταξη ανάγνωσης Η δυνατότητα εφαρμόζεται σε όλα τα φύλλα εργασίας στο βιβλίο εργασίας σας.

3. Αυτό Διάταξη ανάγνωσης Η δυνατότητα θα απενεργοποιηθεί κατά την εκκίνηση του βιβλίου εργασίας την επόμενη φορά.

4. Με αυτό το βοηθητικό πρόγραμμα, το χρωματιστό κελί σας θα διατηρηθεί.

Κάντε κλικ για να μάθετε περισσότερες λεπτομέρειες σχετικά με αυτήν τη διάταξη ανάγνωσης.

Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!


Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

kte καρτέλα 201905


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
grazie
Molto utile ,
Ho un problema però, annulla l'eventuale colore delle celle che seleziono o se volessi impostare altro colore a una cella quando la seleziono mi scompare.
grazie
This comment was minimized by the moderator on the site
Hello, andrea

It may be difficult to modify the VBA code, so, here, I recommend you to apply the Conditional Formatting feature for solving this problem, please view the below article:
https://www.extendoffice.com/documents/excel/3500-excel-highlight-selected-row-conditional-formatting.html

Or you can use the Kutools for Excel' Reading Layout feature, you can try it 30 days for free.
Please download from: https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
This is so cool, but it removes any existing highlights from cells unless they are the result of conditional formatting. Any way to avoid that?
This comment was minimized by the moderator on the site
Hello, BHarris
It may be difficult to modify the VBA code, so, here, I recommend you to apply the Conditional Formatting feature for solving this problem, please view the below article:
https://www.extendoffice.com/documents/excel/3500-excel-highlight-selected-row-conditional-formatting.html

Or you can use the Kutools for Excel' Reading Layout feature, you can try it 30 days for free.
Please download from: https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
Does not work for MS Office - Excel 2016
This comment was minimized by the moderator on the site
is there a way to get it to only do a set of 4 cells along the specific row?
This comment was minimized by the moderator on the site
Hello, David,
The following VBA code can help you to highlight the cells that you selected, please try it. Hope it can help you!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 8
End Sub
This comment was minimized by the moderator on the site
Hi thanks for providing the code....it is so useful for our report, but actually for my report the hyperlink is there in the other sheet in the same workbook and highlighted cell is there in the next sheet, that selected cell row total should be selected. but while running this code im getting a run-time error '1004'. will you please help me on this ...
This comment was minimized by the moderator on the site
Thank You for this !
This comment was minimized by the moderator on the site
Thank you for the code to highlight the whole row. It is *AWESOME* and is going to make scrolling spreadsheets so much easier.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations