У овом чланку ћемо научити како ажурирати податке са једног листа на други лист кроз ВБА у програму Мицрософт Екцел.
Узмимо пример да бисмо разумели како и где можемо да користимо овај макро у својим подацима за смањење свакодневног посла.
Овај код желимо да напишемо за оне запослене који раде у цалл центру. Када их клијенти позову, траже основне податке као што су Усер_Наме, Усер_ИД, Пхоне_Нумбер и Проблем_ИД, потребан им је такав код за системски рад.
Сада желимо да применимо макро за такав контекст када дође позив и они забележе све горе наведене детаље у Екцел листу, а када кликну на ажурирање, те податке треба ажурирати на другом листу.
Да бисте ажурирали податке са једног листа на други, следите доле наведене кораке:-
- Прво ћемо уметнути командно дугме у радни лист.
- Идите на картицу Девелопер, а затим уметните командно дугме из програма Ацтивекцонтрол.
- Доделите доле поменути макро:-
Приватна под -командаБуттон1_Цлицк ()
Дим Усер_Наме Ас Стринг, Усер_ИД Ас Интегер, Пхоне_Нумбер Ас Доубле, Проблем_ИД Ас Интегер
Радни листови („Лист1“). Изаберите
Усер_Наме = Распон ("Б2")
Усер_ИД = Распон ("Б3")
Пхоне_Нумбер = Распон ("Б4")
Проблем_ИД = Распон ("Б5")
Радни листови („Лист 2“). Изаберите
Радни листови („Лист 2“). Распон („А1“). Изаберите
Иф Ворксхеетс ("Схеет2"). Ранге ("А1"). Оффсет (1, 0) "" тхен
Радни листови ("Лист 2"). Распон ("А1"). Крај (клДовн). Одаберите
Крај Ако
АцтивеЦелл.Оффсет (1, 0) .Одаберите
АцтивеЦелл.Валуе = Корисничко_Име
АцтивеЦелл.Оффсет (0, 1) .Одаберите
АцтивеЦелл.Валуе = Кориснички_ИД
АцтивеЦелл.Оффсет (0, 1) .Одаберите
АцтивеЦелл.Валуе = Број_телефона
АцтивеЦелл.Оффсет (0, 1) .Одаберите
АцтивеЦелл.Валуе = Проблем_ИД
Радни листови („Лист1“). Изаберите
Радни листови („Лист1“). Распон („Б2“). Изаберите
Енд Суб
Код Објашњење: -Прво, дефинирали смо све варијабле. Затим смо дефинисали опсег за сваку променљиву, а затим описали опсег за све променљиве. Такође смо дефинисали где и у ком опсегу ће се подаци ажурирати након клика на дугме Ажурирај.
- Да бисте покренули код, притисните тастер Ф5 на тастатури.
- Када унесете податке и кликнете на дугме за ажурирање, тада ће се подаци ажурирати на другом листу, а ми можемо унијети нове податке у лист.
Ово је начин на који можемо ажурирати податке са једног листа на други лист путем ВБА у Мицрософт екцелу.
Преузимање - Како ажурирати податке један лист на други лист - клсм
