Dažreiz mēs vēlamies izmantot vienu Excel lapu kā veidlapu, kas tiek izmantota, lai no lietotāja iegūtu informāciju. lietotāja ievadītos datus, mēs cenšamies tos saglabāt dažās citās lapās, kuras, iespējams, nav pieejamas gala lietotājam, lai nodrošinātu datu drošību. Šajā rakstā mēs uzzināsim, kā atjaunināt datus no vienas lapas uz otru, izmantojot VBA.
Tāpēc, neiedziļinoties savās garlaicīgajās sarunās, ļaujiet iedziļināties piemērā, lai saprastu šo jēdzienu.
Piemērs: atjauniniet datus lapā 2, pamatojoties uz vērtībām, kas ievadītas lapā 1
Mēs vēlamies uzrakstīt šo kodu tiem darbiniekiem, kuri strādā zvanu centrā. Zvanot klientiem, viņi saņem pamatinformāciju, piemēram, User_Name, User_ID, Phone_Number un Problem_ID.
Tagad mēs vēlamies uzrakstīt makro, kad zvana laikā viņi atzīmēs visu iepriekš minēto informāciju Excel lapā, un, noklikšķinot uz atjaunināšanas, dati jāatjaunina citā lapā.
Lai atjauninātu datus no vienas lapas uz otru, veiciet tālāk norādītās darbības:-
• Vispirms mēs darblapā ievietojam komandu pogu.
• Atveriet cilni Izstrādātājs un pēc tam ievietojiet komandu pogu no Activexcontrol.
• Piešķirt zemāk minēto makro:-
Privāta apakškomanda CommandButton1_Click () Dim User_Name as String, User_ID as Integer, Phone_Number as Double, Problem_ID as Integer Worksheets ("Sheet1"). Atlasiet User_Name = Range ("B2") User_ID = Range ("B3") Phone_Number = Range (" B4 ") Problem_ID = Diapazons (" B5 ") darblapas (" Sheet2 "). Atlasiet darblapas (" Sheet2 "). Diapazons (" A1 "). Atlasiet Ja darblapas (" Sheet2 "). Diapazons (" A1 "). Nobīde (1, 0). , 1). Atlasiet ActiveCell.Value = User_ID ActiveCell.Offset (0, 1). Izvēlieties ActiveCell.Value = Phone_Number ActiveCell.Offset (0, 1). Atlasiet ActiveCell.Value = Problem_ID darblapas ("Sheet1"). Atlasiet darblapas ( "Sheet1"). Diapazons ("B2"). Atlasiet End Sub
Koda skaidrojums:- Vispirms mēs bijām definējuši visus mainīgos. Tad mēs bijām definējuši diapazonu visiem mainīgajiem un pēc tam aprakstījuši visu mainīgo diapazonu. Un mēs bijām definējuši, ka kur un kurā diapazonā dati tiks atjaunināti pēc noklikšķināšanas uz pogas Atjaunināt.
• Lai palaistu kodu, nospiediet tastatūras taustiņu F5.
• Kad ievadīsit datus un noklikšķināsit uz atjaunināšanas pogas, dati tiks atjaunināti citā lapā, un mēs varēsim ievadīt jaunus datus šajā lapā.
Tādā veidā mēs varam atjaunināt datus no vienas lapas uz citu lapu, izmantojot Microsoft Excel VBA. Ceru, ka biju pietiekami izskaidrojošs. Ja jums ir šaubas par šo rakstu vai kādu citu Excel VBA rakstu, varat jautāt man komentāru sadaļā zemāk.
Mainiet vairāku UserForm vadīklu vērtību/saturu, izmantojot Excel VBA | Lai mainītu lietotāja formas vadīklu saturu, izmantojiet šo vienkāršo VBA fragmentu.
Neļaujiet lietotāja veidlapai aizvērties, kad lietotājs noklikšķina uz pogas x, izmantojot programmu VBA programmā Excel | Lai novērstu lietotāja veidlapas aizvēršanos, kad lietotājs noklikšķina uz veidlapas pogas x, mēs izmantojam notikumu UserForm_QueryClose.
Populāri raksti:
50 Excel saīsnes, lai palielinātu produktivitāti | Ātrāk izpildiet savu uzdevumu. Šie 50 īsceļi ļaus jums strādāt vēl ātrāk programmā Excel.
Funkcija VLOOKUP programmā Excel | Šī ir viena no visbiežāk izmantotajām un populārākajām Excel funkcijām, kas tiek izmantota, lai meklētu vērtību no dažādiem diapazoniem un lapām.
COUNTIF programmā Excel 2016 | Saskaitiet vērtības ar nosacījumiem, izmantojot šo apbrīnojamo funkciju. Jums nav jāfiltrē dati, lai uzskaitītu noteiktu vērtību. Skaitītāja funkcija ir būtiska, lai sagatavotu informācijas paneli.
Kā lietot SUMIF funkciju programmā Excel | Šī ir vēl viena būtiska informācijas paneļa funkcija. Tas palīdz apkopot vērtības noteiktos apstākļos.