Aktualizujte listy prostřednictvím VBA

V tomto článku se naučíme aktualizovat data z jednoho listu na jiný list prostřednictvím VBA v aplikaci Microsoft Excel.

Uveďme si příklad, abychom pochopili, jak a kde můžeme toto makro použít v našich datech ke snížení každodenní práce.

Tento kód chceme napsat pro ty zaměstnance, kteří pracují v call centru. Když jim klienti volají, ptají se na základní údaje, jako je uživatelské jméno, ID uživatele, číslo telefonu a ID problému, potřebují takový kód, aby fungoval systematicky.

Nyní chceme použít makro pro takový kontext, když přijde hovor a oni si poznamenají všechny výše uvedené detaily do listu Excelu, a když kliknou na aktualizovat, tato data by měla být aktualizována v jiném listu.

Chcete-li aktualizovat data z jednoho listu na jiný list, postupujte podle níže uvedených kroků:-

Nejprve do listu vložíme příkazové tlačítko.
Přejděte na kartu Vývojář a poté vložte příkazové tlačítko z Activexcontrol.
Přiřadit níže uvedené makro:-

Private Sub CommandButton1_Click ()

Dim User_Name as String, User_ID as Integer, Phone_Number as Double, Problem_ID as Integer

Pracovní listy („List1“). Vyberte

User_Name = Rozsah ("B2")

User_ID = Rozsah ("B3")

Phone_Number = Rozsah ("B4")

Problém_ID = Rozsah ("B5")

Pracovní listy („List2“). Vyberte

Pracovní listy („List2“). Rozsah („A1“). Vyberte

Pokud pracovní listy („List2“). Rozsah („A1“). Offset (1, 0) “„ Potom

Pracovní listy („List2“). Rozsah („A1“). Konec (xlDown). Vyberte

Konec If

ActiveCell.Offset (1, 0). Vyberte

ActiveCell.Value = Uživatelské jméno

ActiveCell.Offset (0, 1). Vyberte

ActiveCell.Value = ID_uživatele

ActiveCell.Offset (0, 1). Vyberte

ActiveCell.Value = Phone_Number

ActiveCell.Offset (0, 1). Vyberte

ActiveCell.Value = ID problému

Pracovní listy („List1“). Vyberte

Pracovní listy („List1“). Rozsah („B2“). Vyberte

End Sub

Vysvětlení kódu: -Nejprve jsme definovali všechny proměnné. Poté jsme definovali rozsah pro každou proměnnou a poté jsme popsali rozsah pro všechny proměnné. A také jsme definovali, že kde a v jakém rozsahu budou data aktualizována po kliknutí na tlačítko Aktualizovat.

Kód spustíte stisknutím klávesy F5 na klávesnici.
Když zadáte data a kliknete na tlačítko Aktualizovat, data se aktualizují v jiném listu a do listu můžeme zadat nová data.