Joskus haluamme käyttää yhtä Excel -arkkia lomakkeena, jota käytetään syötteiden saamiseen käyttäjältä. käyttäjän syöttämät tiedot, yritämme tallentaa ne joillekin muille arkeille, jotka eivät ehkä ole loppukäyttäjän saatavilla tietoturvan vuoksi. Tässä artikkelissa opimme, kuinka voimme päivittää tietoja yhdeltä taulukolta toiselle VBA: ta käyttäen.
Joten menemättä pidemmälle tylsiin puheiini, syvennymme esimerkkiin käsitteen ymmärtämiseksi.
Esimerkki: Päivitä tiedot Sheet2 Base -palvelussa Sheet1: lle syötettyihin arvoihin
Haluamme kirjoittaa tämän koodin niille työntekijöille, jotka työskentelevät puhelinkeskuksessa. Kun asiakkaat soittavat heille, he saavat perustiedot, kuten Käyttäjän_nimi, Käyttäjän_tunnus, Puhelinnumero ja Ongelman_ID.
Nyt haluamme kirjoittaa makron, kun puhelu tulee, he merkitsevät kaikki edellä mainitut tiedot Excel -taulukkoon, ja kun he napsauttavat päivitystä, tiedot on päivitettävä toisella taulukolla.
Päivitä tiedot yhdestä taulukosta toiseen taulukkoon seuraavasti:-
• Lisäämme ensin komentopainikkeen laskentataulukkoon.
• Siirry Kehittäjä -välilehteen ja lisää sitten Activexcontrolin Komento -painike.
• Määritä alla mainittu makro:-
Private Sub CommandButton1_Click () Dim User_Name as String, User_ID as Integer, Phone_Number as Double, Problem_ID as Integer Worksheets ("Sheet1"). Valitse User_Name = Range ("B2") User_ID = Range ("B3") Phone_Number = Range (" 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 End If ActiveCell.Offset (1, 0). , 1) .Valitse ActiveCell.Value = User_ID ActiveCell.Offset (0, 1) .Valitse ActiveCell.Value = Phone_Number ActiveCell.Offset (0, 1) .Valitse ActiveCell.Value = Problem_ID -laskentataulukot ("Sheet1"). Valitse laskentataulukot ( "Sheet1"). Alue ("B2"). Valitse End Sub
Koodin selitys:- Ensin olimme määritelleet kaikki muuttujat. Sitten olimme määrittäneet alueen jokaiselle muuttujalle ja sitten kuvanneet kaikkien muuttujien alueen. Ja olimme määrittäneet, että missä ja millä alueella tiedot saavat päivityksen 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 saavat päivityksen toiselle taulukolle ja voimme syöttää uusia tietoja taulukkoon.
Tällä tavalla voimme päivittää tiedot yhdestä taulukosta toiseen taulukkoon Microsoft Excelin VBA: n kautta. Toivottavasti olin tarpeeksi selittävä. Jos sinulla on epäilyksiä tästä artikkelista tai muista Excel VBA -artikkeleista, voit kysyä minulta alla olevasta kommenttiosasta.
Muuta useiden UserForm-ohjausobjektien arvoa/sisältöä VBA: n avulla Excelissä | Voit muuttaa käyttäjämuodon ohjaimien sisältöä käyttämällä tätä yksinkertaista VBA -katkelmaa.
Estä käyttäjä lomakkeen sulkeminen, kun käyttäjä napsauttaa x-painiketta käyttämällä VBA: ta Excelissä | Käytämme UserForm_QueryClose -tapahtumaa, jotta käyttäjälomake ei sulkeutuisi, kun käyttäjä napsauttaa lomakkeen x -painiketta.
Suosittuja artikkeleita:
50 Excel -pikanäppäintä tuottavuuden lisäämiseksi | Nopeuta tehtävääsi. Nämä 50 pikanäppäintä tekevät työskentelystäsi entistä nopeampaa Excelissä.
VLOOKUP -toiminto Excelissä | Tämä on yksi eniten käytetyistä ja suosituimmista Excel -toiminnoista, jota käytetään arvon etsimiseen eri alueilta ja arkeilta.
COUNTIF Excel 2016: ssa | Laske arvot olosuhteilla käyttämällä tätä hämmästyttävää toimintoa. Sinun ei tarvitse suodattaa tietojasi tietyn arvon laskemiseksi. Laskutoiminto on välttämätön kojelaudan valmistelemiseksi.
SUMIF -toiminnon käyttäminen Excelissä | Tämä on toinen kojelaudan olennainen toiminto. Tämä auttaa sinua laskemaan yhteen arvot tietyissä olosuhteissa.