Tässä artikkelissa aiomme oppia päivittämään tiedot yhdeltä arkilta toiselle arkille VBA: n avulla Microsoft Excelissä.
Otetaan esimerkki ymmärtääksemme, miten ja missä voimme käyttää tätä makroa datassamme päivittäisen työn vähentämiseksi.
Haluamme kirjoittaa tämän koodin niille työntekijöille, jotka työskentelevät puhelinkeskuksessa. Kun asiakkaat soittavat heille, he pyytävät perustietoja, kuten User_Name, User_ID, Phone_Number ja Problem_ID, he tarvitsevat tällaisen koodin toimimaan järjestelmällisesti.
Nyt haluamme soveltaa makroa tällaiseen asiayhteyteen, kun puhelu tulee ja he merkitsevät kaikki edellä mainitut tiedot Excel -taulukkoon, ja kun he napsauttavat päivitystä, nämä tiedot on päivitettävä toisella taulukolla.
Voit päivittää tiedot yhdestä taulukosta toiseen taulukkoon seuraavasti:-
- Lisäämme ensin komentopainikkeen laskentataulukkoon.
- Siirry Kehittäjä -välilehdelle ja lisää sitten Activexcontrolin Komento -painike.
- Määritä alla mainittu makro:-
Yksityinen alikomentoButton1_Click ()
Himmennä käyttäjänimi merkkijonona, käyttäjän_tunnus kokonaislukuna, puhelinnumero kaksinkertaisena, ongelman_ID kokonaislukuna
Laskentataulukot ("Sheet1"). Valitse
Käyttäjän_nimi = Alue ("B2")
User_ID = Alue ("B3")
Puhelinnumero = Alue ("B4")
Problem_ID = Alue ("B5")
Laskentataulukot ("Sheet2"). Valitse
Laskentataulukot ("Sheet2"). Alue ("A1"). Valitse
Jos laskentataulukot ("Sheet2"). Alue ("A1"). Siirtymä (1, 0) "" Sitten
Laskentataulukot ("Sheet2"). Alue ("A1"). Loppu (xlDown) .Valitse
Loppu Jos
ActiveCell.Offset (1, 0) Valitse
ActiveCell.Value = Käyttäjän_nimi
ActiveCell.Offset (0, 1) Valitse
ActiveCell.Value = Käyttäjätunnus
ActiveCell.Offset (0, 1) Valitse
ActiveCell.Value = Puhelinnumero
ActiveCell.Offset (0, 1) Valitse
ActiveCell.Value = Ongelman tunnus
Laskentataulukot ("Sheet1"). Valitse
Laskentataulukot ("Sheet1"). Alue ("B2"). Valitse
End Sub
Koodin selitys:-Ensinnäkin olimme määritelleet kaikki muuttujat. Sitten olimme määrittäneet alueen jokaiselle muuttujalle ja sitten kuvanneet kaikkien muuttujien alueen. Lisäksi olemme määrittäneet, että missä ja millä alueella tiedot päivitetään Päivitä -painikkeen napsauttamisen jälkeen.
- Voit suorittaa koodin painamalla näppäimistön näppäintä F5.
- Kun syötät tiedot ja napsautat päivityspainiketta, tiedot päivitetään toisella taulukolla ja voimme syöttää uusia tietoja taulukkoon.
Tällä tavalla voimme päivittää tiedot yhdestä taulukosta toiseen taulukkoon Microsoft Excelin VBA: n kautta.
Lataa - Kuinka päivittää tiedot yhdestä taulukosta toiseen arkkiin - xlsm