Πίνακας περιεχομένων
Αυτό το άρθρο δείχνει πώς να εφαρμόζετε κωδικούς VBA για την επιλογή στηλών στο Excel. Μπορεί να σας φανεί χρήσιμο όταν πρέπει να επιλέξετε ολόκληρες σειρές ή στήλες. Κωδικοί προγραμματισμού VBA μπορεί να επιλέξει αυτόματα ολόκληρες στήλες ή περιοχές, γεγονός που θα σας εξοικονομήσει πολύ χρόνο. Σε αυτό το άρθρο, θα σας δείξουμε μερικές από τις μεθόδους για να κάνετε αυτή τη δουλειά.
Κατεβάστε το βιβλίο ασκήσεων
Κατεβάστε αυτό το βιβλίο εξάσκησης για να εξασκηθείτε στην εργασία ενώ διαβάζετε αυτό το άρθρο.
Εφαρμογή VBA για την επιλογή Columns.xlsx3 κατάλληλοι τρόποι εφαρμογής της VBA για την επιλογή στηλών
Η μακροεντολή VBA σάς επιτρέπει να επιλέγετε στήλες με τρεις διαφορετικούς τρόπους. Μπορείτε να επιλέξετε μία μόνο στήλη ή πολλαπλές στήλες ή ένα ολόκληρο εύρος. Σε αυτή την ενότητα, θα εξετάσουμε όλες αυτές τις μεθόδους.
1. Εκτελέστε έναν κώδικα VBA για να επιλέξετε μια μεμονωμένη στήλη
Φανταστείτε μια κατάσταση όπου πρέπει να επιλέξετε μια ολόκληρη στήλη χρησιμοποιώντας κωδικούς VBA. Μπορείτε να το κάνετε πολύ εύκολα εφαρμόζοντας απλό κώδικα. Ας ακολουθήσουμε τα παρακάτω βήματα για να μάθουμε.
Βήμα 1:
- Για να εισαγάγουμε έναν κώδικα VBA πρέπει πρώτα να ανοίξουμε το παράθυρο VBA. Μπορείτε να το κάνετε είτε χρησιμοποιώντας συντομεύσεις πληκτρολογίου είτε από το Καρτέλα Developer . Ctrl+F11 για να ανοίξετε το Παράθυρο VBA.
- Στο παράθυρο της VBA, πρέπει να δημιουργήσουμε μια ενότητα για να γράψουμε τον κώδικά μας. Κάντε κλικ στην επιλογή Εισαγωγή και στη συνέχεια κάντε κλικ στην επιλογή Ενότητα για να ανοίξει ένα.
Βήμα 2:
- Εδώ θα γράψουμε τον κώδικά μας. Πρώτα θα γράψουμε τη μορφή του κώδικά μας και μετά θα εισάγουμε τις συνθήκες. Η αρχή και το τέλος του κώδικά μας είναι,
Private Sub Select_Column() End Sub
- Θα γράψουμε τον κώδικα για να επιλέξουμε τη στήλη C. Ο κώδικας είναι ο εξής,
Columns(3).Select
- Ο τελικός κωδικός είναι,
Private Sub select_column() Columns(3).Select End Sub
- Κάντε κλικ στο εικονίδιο Εκτέλεση για να εκτελέσετε τον κώδικα και η καθορισμένη στήλη μας είναι επιλεγμένη.
Βήμα 3:
- Μπορείτε επίσης να εισαγάγετε έναν συγκεκριμένο αριθμό σε κάθε κελί μιας επιλεγμένης στήλης. Ας υποθέσουμε ότι θέλετε να εισαγάγετε τον αριθμό 100 στο C4 Για να το κάνετε αυτό, επιλέξτε οποιοδήποτε κελί στη στήλη C .
- Εισάγετε αυτόν τον κώδικα στην ενότητα.
Private Sub select_column() ActiveCell.EntireColumn.Cells(4).Value = 100 End Sub
- Εκτελέστε τον κώδικα και το αποτέλεσμά μας είναι εδώ.
2. Εφαρμόστε έναν κώδικα VBA για την επιλογή πολλαπλών στηλών
Βήμα 1:
- Μπορείτε να επιλέξετε πολλαπλές στήλες με τον ίδιο τρόπο που επιλέξατε μια απλή στήλη. Αλλά ο κώδικας είναι διαφορετικός εδώ. Ας ξεκινήσουμε λοιπόν ανοίγοντας το παράθυρο της VBA!
Βήμα 2:
- Θέλουμε να επιλέξουμε τις στήλες από το B έως το D. Για αυτό, ο κώδικας είναι ο εξής,
Private Sub select_multiplecolumns() Columns("B:D").Select End Sub
- Και επιλέγονται πολλαπλές στήλες.
3. Χρήση κώδικα VBA για την επιλογή στηλών σε μια σειρά
Η επιλογή ενός εύρους με τη χρήση κωδικών VBA είναι επίσης εύκολη και απαιτεί ένα μικρό μήκος κώδικα. Ας υποθέσουμε ότι πρέπει να επιλέξουμε ένα εύρος από το B3 στο F13 Ακολουθήστε αυτά τα βήματα για να μάθετε!
Βήμα 1:
- Εισάγετε τον κώδικα VBA στην ενότητα.
Private Sub select_range() Range(Cells(3, 2), Cells(13, 6)).Select Range("B3", "F13").Select Range("B3:F13").Select End Sub
- Έχουμε επιλέξει το εύρος μας χρησιμοποιώντας τους κωδικούς VBA.
Βήμα 2:
- Μπορείτε επίσης να εισαγάγετε αριθμούς ή κείμενα στην επιλεγμένη περιοχή σας. Απλά εισάγετε τον παρακάτω κώδικα στην ενότητα.
Private Sub select_range() Range ("B3:F13"). Select Selection = 100 End Sub
- Έτσι μπορείτε να κάνετε αυτή τη μέθοδο.
Βήμα 3:
- Επιπλέον, μπορείτε επίσης να χρωματίσετε τα επιλεγμένα κελιά σας. Απλά γράψτε αυτόν τον κώδικα στην ενότητα VBA.
Private Sub select_range() Selection.Interior.Color = RGB (255,255,0) End Sub
- Και έτσι μπορείτε να επιλέξετε και να χρωματίσετε την περιοχή σας χρησιμοποιώντας έναν κώδικα VBA.
Πράγματα που πρέπει να θυμάστε
👉 Αν δεν έχετε ορατή την καρτέλα του προγραμματιστή σας, μπορείτε να την ενεργοποιήσετε χρησιμοποιώντας αυτήν την οδηγία.
Προσαρμοσμένη γραμμή εργαλείων γρήγορης πρόσβασης → Περισσότερες εντολές → Προσαρμογή κορδέλας → Προγραμματιστής → OK
Συμπέρασμα
Εξετάσαμε τρεις διαφορετικές προσεγγίσεις για την εκτέλεση κωδικών VBA για την επιλογή στηλών. Είστε ευπρόσδεκτοι να σχολιάσετε εάν έχετε οποιεσδήποτε ερωτήσεις ή απορίες. Επίσης, μπορείτε να δείτε άλλα άρθρα μας σχετικά με τις εργασίες του Excel!