Σε αυτό το κεφάλαιο θα μάθετε πώς μπορείτε να αλλάξετε όλα τα κελιά του ενεργού φύλλου σε τιμές, χρησιμοποιώντας το VBA στο Microsoft Excel.
Ας πάρουμε ένα παράδειγμα και καταλάβουμε πώς γράφουμε τον κώδικα VBA.
Πώς να αλλάξετε την τιμή από στήλη σε στήλη;
Έχουμε δεδομένα στο Excel στα οποία η στήλη Α και η στήλη Β περιέχουν ορισμένες τιμές, τώρα θέλουμε να αντικαταστήσουμε τιμές στη στήλη Α με τις τιμές στη στήλη Β.
Ακολουθήστε αυτά τα βήματα:
- Πατήστε το πλήκτρο Alt+F11 για να ανοίξετε την εφαρμογή Visual Basic
- Στο VBAProject Κάντε διπλό κλικ στο Φύλλο 1
- Εισαγάγετε τον παρακάτω κωδικό VBA
Υπο Τιμές_8 () Στήλες ("Α"). Αξία = Στήλες ("Β"). Τιμή Τέλος Υπο
- Για να εκτελέσετε τον κωδικό, πατήστε το πλήκτρο F5
- Η τιμή της στήλης Β θα ενημερωθεί στη στήλη Α
Πώς να αλλάξετε την τιμή από στήλες σε στήλες;
Έχουμε δεδομένα στο Excel στα οποία η στήλη A, B και C περιέχει ορισμένες τιμές σε μια ομάδα και οι στήλες E, F και G περιέχουν τιμές σε 2nd ομάδα, τώρα θέλουμε να αλλάξουμε την τιμή του 1st ομάδα με τους 2nd ομάδα.
Για να αλλάξετε την τιμή ακολουθήστε τα παρακάτω βήματα και κωδικό:
- Πατήστε το πλήκτρο Alt+F11 και κάντε διπλό κλικ στο φύλλο 2
- Εισαγάγετε τον παρακάτω κωδικό:
Sub Values_9 () Στήλες ("A: C"). Value = Colonns ("E: G"). Value End Sub
- Εκτελέστε τον κωδικό πατώντας το F5
- Οι τιμές θα ενημερωθούν
Αν σας άρεσαν τα ιστολόγια μας, μοιραστείτε το με τους φίλους σας στο Facebook. Επίσης, μπορείτε να μας ακολουθήσετε στο Twitter και το Facebook.
Θα θέλαμε πολύ να σας ακούσουμε, ενημερώστε μας πώς μπορούμε να βελτιώσουμε, να συμπληρώσουμε ή να καινοτομήσουμε το έργο μας και να το κάνουμε καλύτερο για εσάς. Γράψτε μας στον ιστότοπο email