Πώς να εισαγάγετε πλωτό πίνακα ή πλαίσιο κειμένου στο φύλλο εργασίας του Excel;
Εάν έχετε έναν πίνακα ή ένα πλαίσιο κειμένου με ορισμένα σημαντικά δεδομένα που θέλετε να είναι πάντα ορατά στην οθόνη του φύλλου εργασίας, ακόμη και όταν κάνετε κύλιση προς τα πάνω ή προς τα κάτω στο φύλλο εργασίας. Αυτό μπορεί να είναι ένα ενδιαφέρον έργο, αυτό το άρθρο, θα παρουσιάσω ένα γρήγορο τέχνασμα για να το λύσω.
Εισαγάγετε κυμαινόμενο πίνακα στο Excel με κωδικό VBA
Εισαγάγετε κινούμενο πλαίσιο κειμένου στο Excel με κωδικό VBA
Εισαγάγετε κυμαινόμενο πίνακα στο Excel με κωδικό VBA
Δεν υπάρχει άμεσος τρόπος για να εισαγάγετε τον πλωτό πίνακα, επομένως πρέπει να μετατρέψετε τα δεδομένα πίνακα σε μια εικόνα και, στη συνέχεια, να εφαρμόσετε έναν κωδικό για να το ολοκληρώσετε, κάντε το ως εξής:
1. Επιλέξτε τον πίνακα δεδομένων που θέλετε να διατηρήσετε ορατό και, στη συνέχεια, κάντε κλικ στο αντίγραφο > Αντιγραφή ως εικόνα σύμφωνα με το Αρχική καρτέλα, δείτε το στιγμιότυπο οθόνης:
2. Στο αναδυόμενο Αντιγραφή εικόνας , επιλέξτε Όπως φαίνεται στην οθόνη από το Εμφάνιση ενότητα, και επιλέξτε Εικόνα σύμφωνα με το Μορφή Κάντε κλικ στο κουμπί OK για να κλείσετε το παράθυρο διαλόγου και, στη συνέχεια, κάντε κλικ σε ένα κελί για έξοδο της εικόνας, τέλος, πατήστε Ctrl + V για να επικολλήσετε αυτήν την εικόνα, δείτε το στιγμιότυπο οθόνης:
3. Αφού μετατρέψετε τον πίνακα σε εικόνα, κάντε δεξί κλικ στην καρτέλα φύλλων που περιέχει την εικόνα του πίνακα που θέλετε να διατηρείτε πάντα ορατή και επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος και στο ανοιχτό Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στην κενή ενότητα:
Κωδικός VBA: Εισαγάγετε πλωτό πίνακα στο excel:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Application.ScreenUpdating = False
If Target.Cells.Count > 1 Then Exit Sub
With ActiveSheet.Shapes("Picture1")
.Top = ActiveWindow.VisibleRange.Top + 5
.Left = ActiveWindow.VisibleRange.Left + ActiveWindow.VisibleRange.Width - .Width - 45
End With
Application.ScreenUpdating = False
End Sub
Note: Σε αυτόν τον κωδικό, το Picure1 είναι το όνομα εικόνας που έχετε δημιουργήσει, αλλάξτε το ανάλογα με τις ανάγκες σας.
4. Στη συνέχεια, αποθηκεύστε και κλείστε το παράθυρο κώδικα, τώρα, όταν κάνετε κύλιση στο φύλλο εργασίας και κάνετε κλικ σε ένα κελί, η εικόνα του πίνακα διατηρείται πάντα στην επάνω δεξιά γωνία του φύλλου εργασίας.
Εισαγάγετε κινούμενο πλαίσιο κειμένου στο Excel με κωδικό VBA
Για να εισαγάγετε ένα κινούμενο πλαίσιο κειμένου, ακολουθεί επίσης ένας κωδικός VBA για την επίλυση αυτής της εργασίας.
1. Πρώτα, πρέπει να εισαγάγετε ένα πλαίσιο κειμένου από το Εργολάβος κάντε κλικ στην καρτέλα Εργολάβος > Κύριο θέμα > Πλαίσιο κειμένου (στοιχείο ελέγχου ActiveX)και, στη συνέχεια, σχεδιάστε το πλαίσιο κειμένου και εισαγάγετε τις πληροφορίες στο πλαίσιο κειμένου όπως χρειάζεστε. Δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια, κάντε δεξί κλικ στην καρτέλα φύλλων που περιέχει το πλαίσιο κειμένου που θέλετε να διατηρείτε πάντα ορατό και επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος και στο ανοιχτό Microsoft Visual Basic για εφαρμογές παράθυρο, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στο κενό Μονάδα μέτρησης:
Κωδικός VBA: Εισαγωγή κινούμενου πλαισίου κειμένου στο Excel:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Application.ScreenUpdating = False
With ActiveWindow.VisibleRange
TextBox1.Top = .Top + 5
TextBox1.Left = .Left + .Width - TextBox1.Width - 45
End With
Application.ScreenUpdating = True
End Sub
Note: Σε αυτόν τον κωδικό, το TextBox1 είναι το όνομα του κειμένου που έχετε εισαγάγει, αλλάξτε το ανάλογα με τις ανάγκες σας.
3. Στη συνέχεια, αποθηκεύστε και κλείστε το παράθυρο κώδικα, τώρα, όταν κάνετε κύλιση στο φύλλο εργασίας σε οποιοδήποτε σημείο, το εισαγόμενο πλαίσιο κειμένου διατηρείται πάντα στην επάνω δεξιά γωνία του φύλλου εργασίας.
Μεγιστοποίηση ή ελαχιστοποίηση του παραθύρου φύλλου εργασίας
Για να μεγιστοποιήσετε το παράθυρο του φύλλου εργασίας μπορεί να απελευθερώσετε περισσότερο χώρο για τους χρήστες, στο Excel, μπορείτε να μεγιστοποιήσετε το παράθυρο του φύλλου εργασίας κρύβοντας την κορδέλα, τη γραμμή τύπων ή τη γραμμή κατάστασης. Kutools για Excel's Χώρο εργασίας μπορεί να σας βοηθήσει να αποκρύψετε την κορδέλα με ένα μόνο κλικ. Κατεβάστε και δωρεάν δοκιμή Kutools για Excel τώρα!
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!