Ενημέρωση Φύλλων μέσω VBA

Σε αυτό το άρθρο, θα μάθουμε πώς να ενημερώνουμε τα δεδομένα από ένα φύλλο σε άλλο φύλλο μέσω VBA στο Microsoft Excel.

Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς και πού μπορούμε να χρησιμοποιήσουμε αυτήν τη μακροεντολή στα δεδομένα μας για να μειώσουμε την καθημερινή μας εργασία.

Θέλουμε να γράψουμε αυτόν τον κωδικό για όσους υπαλλήλους εργάζονται σε τηλεφωνικό κέντρο. Όταν οι πελάτες τους καλούν ζητούν βασικές λεπτομέρειες όπως User_Name, User_ID, Phone_Number και Problem_ID, χρειάζονται έναν τέτοιο κωδικό για να λειτουργούν συστηματικά.

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

Για να ενημερώσετε τα δεδομένα από ένα φύλλο σε άλλο φύλλο, ακολουθήστε τα παρακάτω βήματα:-

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

Private Sub CommandButton1_Click ()

Dim User_Name As String, User_ID As Integer, Phone_Number As Double, Problem_ID As Integer

Φύλλα εργασίας ("Φύλλο1"). Επιλέξτε

Όνομα χρήστη = Εύρος ("B2")

User_ID = Εύρος ("B3")

Phone_Number = Range ("B4")

Problem_ID = Εύρος ("B5")

Φύλλα εργασίας ("Φύλλο2"). Επιλέξτε

Φύλλα εργασίας ("Φύλλο2"). Εύρος ("Α1"). Επιλέξτε

If Worksheets ("Sheet2"). Range ("A1"). Offset (1, 0) "" then

Φύλλα εργασίας ("Φύλλο2"). Εύρος ("Α1"). Τέλος (xlDown). Επιλέξτε

Τέλος εαν

ActiveCell.Offset (1, 0). Επιλέξτε

ActiveCell.Value = Όνομα χρήστη

ActiveCell.Offset (0, 1). Επιλέξτε

ActiveCell.Value = User_ID

ActiveCell.Offset (0, 1). Επιλέξτε

ActiveCell.Value = Αριθμός τηλεφώνου

ActiveCell.Offset (0, 1). Επιλέξτε

ActiveCell.Value = Problem_ID

Φύλλα εργασίας ("Φύλλο1"). Επιλέξτε

Φύλλα εργασίας ("Φύλλο1"). Εύρος ("Β2"). Επιλέξτε

Τέλος υπο

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

Για να εκτελέσετε τον κωδικό, πατήστε το πλήκτρο F5 στο πληκτρολόγιο.
Όταν εισάγετε τα δεδομένα και κάνετε κλικ στο κουμπί ενημέρωσης, τα δεδομένα θα ενημερώνονται σε άλλο φύλλο και μπορούμε να εισαγάγουμε νέα δεδομένα στο φύλλο.