Σε αυτό το άρθρο θα μάθετε πώς μπορείτε να αλλάξετε εύρος με τιμές μεγαλύτερες από περιοχή σε τιμές χρησιμοποιώντας VBA στο Microsoft Excel.
Ας πάρουμε ένα παράδειγμα και κατανοήσουμε πώς να γράψετε τον κώδικα VBA για να αλλάξετε το εύρος με τιμές μεγαλύτερες από περιοχή.
Πώς να αλλάξετε εύρος με τιμές μεγαλύτερες από περιοχή;
Παράδειγμα 1:-
Έχουμε δεδομένα στο Excel A1: C1, σε αυτά τα δεδομένα θέλουμε να επικολλήσουμε στις διαφορετικές περιοχές. Ας δούμε πώς;
Ακολουθήστε τα παρακάτω βήματα:-
- Πατήστε το πλήκτρο Alt+F11 για να ανοίξετε την εφαρμογή Visual Basic
- Στο VBAProject Κάντε διπλό κλικ στο Φύλλο 1
- Εισαγάγετε τον παρακάτω κωδικό VBA
Sub Values_4 () Dim smallrng As Range For Every smallrng In Range ("A1: D10, E12: H17"). Areas smallrng.Value = Range ("A1: D1"). Value Next End Sub
- Για να εκτελέσετε τον κωδικό, πατήστε το πλήκτρο F5
- Οι τιμές θα ενημερώνονται σε καθορισμένο μικρό εύρος
Παράδειγμα 2:-
Ας υποθέσουμε ότι έχουμε δεδομένα στο καθορισμένο μικρό εύρος και θέλουμε να γράψουμε υπερβολικά αυτά τα δεδομένα με τα συγκεκριμένα δεδομένα εύρους.
Για να λύσετε αυτό το πρόβλημα ακολουθήστε τα παρακάτω βήματα:-
- Πατήστε το πλήκτρο Alt+F11 και κάντε διπλό κλικ στο φύλλο 2
- Εισαγάγετε τον παρακάτω κωδικό:-
Sub Values_4 () Dim smallrng As Range For Every smallrng In Range ("A1: D10, E12: H17"). Areas smallrng.Value = Range ("A1: D1"). Value Next End Sub
- Εκτελέστε τον κωδικό πατώντας F5
- Οι τιμές θα ενημερωθούν
Αν σας άρεσαν τα ιστολόγια μας, μοιραστείτε το με τους φίλους σας στο Facebook. Επίσης, μπορείτε να μας ακολουθήσετε στο Twitter και το Facebook.
Θα θέλαμε πολύ να σας ακούσουμε, ενημερώστε μας πώς μπορούμε να βελτιώσουμε, να συμπληρώσουμε ή να καινοτομήσουμε το έργο μας και να το κάνουμε καλύτερο για εσάς. Γράψτε μας στον ιστότοπο email