Ažurirajte tablice putem VBA

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.