U ovom ćemo članku naučiti kako ažurirati podatke s jednog lista na drugi list putem VBA u programu Microsoft Excel.
Uzmimo primjer kako bismo razumjeli kako i gdje možemo koristiti ovaj makro u svojim podacima za smanjenje svakodnevnog posla.
Ovaj kod želimo napisati za one zaposlenike koji rade u pozivnom centru. Kad ih klijenti nazovu, traže osnovne podatke kao što su User_Name, User_ID, Phone_Number i Problem_ID, potreban im je takav kôd za sustavni rad.
Sada želimo primijeniti makro za takav kontekst kada dođe poziv i oni zabilježe sve gore navedene detalje u Excel listu, a kada kliknu na ažuriranje, te podatke treba ažurirati na drugom listu.
Da biste ažurirali podatke s jednog lista na drugi, slijedite korake u nastavku:-
- Prvo ćemo umetnuti naredbeni gumb u radni list.
- Idite na karticu Developer, a zatim umetnite naredbeni gumb iz programa Activexcontrol.
- Dodijelite dolje spomenuti makro:-
Privatna pomoćna naredbaButton1_Click ()
Dim User_Name As String, User_ID As Integer, Phone_Number As Double, Problem_ID As Integer
Radni listovi ("List1"). Odaberite
User_Name = Raspon ("B2")
User_ID = Raspon ("B3")
Phone_Number = Raspon ("B4")
Problem_ID = Raspon ("B5")
Radni listovi ("List 2"). Odaberite
Radni listovi ("List2"). Raspon ("A1"). Odaberite
Ako radni listovi ("List2"). Raspon ("A1"). Odmak (1, 0) "" Zatim
Radni listovi ("List 2"). Raspon ("A1"). Kraj (xlDown). Odaberite
Završi ako
ActiveCell.Offset (1, 0) .Odaberite
ActiveCell.Value = Korisničko_ime
ActiveCell.Offset (0, 1) .Odaberite
ActiveCell.Value = Korisnički_ID
ActiveCell.Offset (0, 1) .Odaberite
ActiveCell.Value = Broj telefona_
ActiveCell.Offset (0, 1) .Odaberite
ActiveCell.Value = Problem_ID
Radni listovi ("List1"). Odaberite
Radni listovi ("List1"). Raspon ("B2"). Odaberite
Kraj podm
Kod Objašnjenje: -Prvo, definirali smo sve varijable. Zatim smo definirali raspon za svaku varijablu, a zatim opisali raspon za sve varijable. Također smo definirali da će se i u kojem rasponu podaci ažurirati nakon klika na gumb Ažuriraj.
- Za pokretanje koda pritisnite tipku F5 na tipkovnici.
- Kada unesete podatke i kliknete gumb za ažuriranje, tada će se podaci ažurirati na drugom listu, a mi možemo unijeti nove podatke u list.
Ovo je način na koji možemo ažurirati podatke s jednog lista na drugi list kroz VBA u Microsoft Excelu.
Preuzimanje - Kako ažurirati podatke jedan list na drugi list - xlsm
