У гэтым артыкуле мы праілюструем, як уставіць дадзеныя ў Excel табліцу з дапамогай VBA код . З дапамогай убудаваных уласцівасцяў і метадаў Excel мы можам палегчыць функцыянальнасць дадання або перазапісу дадзеных у табліцу. Давайце паглыбімся ў прыклады, каб атрымаць дакладнае разуменне метадаў разам з кодамі VBA.

Спампаваць практычны сшытак

Спампуйце гэты практычны сшытак, каб займацца падчас чытання гэты артыкул.

4 прыклады ўстаўкі даных у табліцу з дапамогай VBA ў Excel

Дапусцім, у нас ёсць спіс распродажаў крамы з такімі дэталямі, як дата замовы, назва прадукту, колькасць, кошт за адзінку і агульны кошт.

Як стварыць табліцу ў Excel

Каб ператварыць набор даных у табліцу Excel , зрабіце наступнае-

• Выберыце ўвесь набор даных .
• Перайдзіце на ўкладку Уставіць са стужкі Excel .
• Націсніце на опцыю Табліца .

• Нарэшце націсніце кнопку ОК у акне Стварыць табліцу.

• Мы паспяхова пераўтварылі набор даных у табліцу Excel .

Каб уставіць даныя у табліцу Excel, мы будзем выкарыстоўваць некалькі функцый VBA і ўласцівасці ў нашым кодзе . Наступны раздзелапісвае, як адкрываць і напісваць код у рэдактары Visual Basic.

Напісаць код у рэдактары Visual Basic

Выканайце крокі каб адкрыць visual basic рэдактар ​​ і напішыце там код.

• Перайдзіце на ўкладку Распрацоўшчык на стужцы Excel .
• Пстрыкніце параметр Visual Basic.

• У акне Visual Basic для прыкладанняў пстрыкніце выпадальнае меню Уставіць , каб выбраць Новы модуль

Цяпер, калі новы модуль адкрыты , напішыце там код і націсніце F5 для запуску.

1. Уставіць даныя ў апошні радок табліцы з дапамогай VBA ў Excel

У гэтым прыкладзе мы будзем выкарыстоўваць код VBA , каб дадаць новы радок у нізе табліцы і затым устаўце даныя ў яго. У нашай табліцы ў нас ёсць 4 радкі з дадзенымі . Каб дадаць 5-ы , скапіруйце і ўстаўце наступны код у рэдактар ​​Visual Basic.

9556

Націсніце F5 каб запусціць код .

Мы ўставілі новы радок з дадзенымі ў унізе існуючай табліцы .

Тлумачэнне кода:

• У нашым кодзе мы выкарыстоўвалі ListObjects аб'ект VBA Excel, каб захапіць табліцу з яе імем . Для атрымання дадатковай інфармацыі кожны з аб'ектаў ListObject з'яўляецца табліца на рабочым аркушы . Каб атрымаць назву табліцы, націсніце на табліцы >> націсніце на ўкладцы Дызайн табліцы у стужцы Excel.

• Затым мы выкарыстоўвалі ListRows . Метад Add каб дадаць новы радок у табліцу . Гэты метад прымае два аргументы : Пазіцыя і AlwaysInsert .

Пры ўводзе цэлага ліку лік , мы можам вызначыць адноснае становішча нова дададзенага радка ў табліцы . У гэтым прыкладзе мы пакінулі пустым аргумент пазіцыі , у выніку новы радок быў дададзены ў унізе табліцы .

• Нарэшце, мы ўсталёўваем даныя ў кожную з ячэйкі нова дададзены радок . У гэтым выпадку даныя былі .Range(1) = “1/1/2022” як OrderDate, .Range(2) = “Apple” як Product, .Range(3) = 5 як колькасць,  .Range(4) = 1,77 як цана за адзінку.

Дадатковая інфармацыя : Назва табліцы Excel: усё, што вам трэба ведаць

2. Запусціце код VBA, каб уставіць даныя ў пэўны радок табліцы ў Excel

На гэтай ілюстрацыі мы збіраемся дадаць радок даных у канкрэтным радку адносна табліцы , выкарыстоўваючы той самы фрагмент кода, які мы выкарыстоўвалі ў прыведзеным вышэй прыкладзе. У гэтым выпадку нам проста трэба вызначыць аргумент Position метаду ListRows.Add у нашымкод. Дапусцім, мы хочам дадаць дадзеныя аб продажы для Orange з дэталямі ў радку нумар 3 адносна да існуючай табліцы . Каб гэта адбылося, скапіруйце і ўстаўце наступны код у візуальны рэдактар ​​кода.

4582

Запусціце код, націснуўшы F5 уставіў дадзеныя аб продажы для Orange у 3-ці радок адносна табліцы .

Прачытаць Больш: Код Excel VBA для кожнага радка ў табліцы (дадаць, перазапісаць, выдаліць і г.д.)

Падобныя паказанні

• Разлічаная сума поля, падзеленая на колькасць у зводнай табліцы
• Як праілюстраваць адноснае размеркаванне частот у Excel
• [Выправіць] Немагчыма згрупаваць даты ў зводнай табліцы: 4 магчымыя рашэнні
• Як разлічыць працэнтнае размеркаванне частаты ў Excel (2 метады)
• Зводная табліца не абнаўляецца (5 праблем і рашэнняў)

3. Уставіць і перазапісаць даныя ў табліцу з дапамогай VBA ў Excel

Тут мы праілюструем, як перазапісаць існуючыя даныя ў табліца замест устаўкі новага радка з дадзенымі . Каб зрабіць гэта, нам трэба выкарыстоўваць уласцівасць ListObject.ListRows Excel замест уласцівасці ListRows.Add , якую мы выкарыстоўвалі раней . Уласцівасць ListObject.ListRows таксама прымае нумар радка ( Цэлы лік значэнне ) у якасці аргумента . Дапусцім, мы хочам змяніцца цана за адзінку апельсіна ад 2,14 да 2,35 якую мы ўставілі ў папярэднім прыкладзе . Скапіруйце і ўстаўце наступны код ніжэй у рэдактар ​​Visual Basic.

1503

У нашым кодзе мы ўсталёўваем аргумент для ўласцівасці ListObject.ListRows як 3 дзе дадзеныя для Аранжавы належыць . Запусціце код націснуўшы F5 і ўбачыце розніцу .

Код мае зменена толькі цана за адзінку дадзеных у радку нумар 3 адносна да табліцы .

Дадатковая інфармацыя: Як уставіць або выдаліць радкі і слупкі з табліцы Excel

4. Запусціце код VBA для ўстаўкі даных у табліцу Excel на аснове ўводу карыстальніка

У гэтым прыкладзе мы збіраемся ўставіць назва табліцы і падрабязныя звесткі аб продажы прадукту як увод карыстальніка а не жорсткі код гэта ў кодзе VBA кожны час . Выконвайце інструкцыі ніжэй, каб выканаць гэта.

• Скапіруйце і ўстаўце наступны код у візуальны рэдактар ​​кода.

2329

• Націсніце F5 каб запусціць код.
• Увядзіце імя з табліцы ў поле ўводу ( Табліца1 , у гэтым прыкладзе) і націсніце ОК.

• Затым увядзіце значэнні для Дата заказу, Назва прадукту, Колькасць і Цана за адзінку ў поля ўводу , якія з'яўляліся паслядоўна . У гэтым прыкладзе мы выкарыстоўвалі значэнні 1/1/2022, аранжавы, 3, і 35.

• У выніку мы атрымалі новы радок з устаўленымі данымі у унізе табліцы .

Чытаць далей: Парады па фарматаванні табліц Excel – змяніце выгляд табліцы

Нататкі

Калі мы дадалі новы радок з дадзенымі з дапамогай кода VBA фармат і формулы атрымліваюць перанос у новы радок аўтаматычна . У нашым прыкладзе TotalPrice слупок выводзіць прадукт слупкоў Колькасць і Кошт за адзінку . Мы толькі што ўставілі толькі значэнне Колькасці і Цаны за адзінку ; новы радок быў устаўлены з здабыткам з гэтых двух значэнняў у слупок Агульная цана.

Выснова

Цяпер мы ведаем, як уставіць даныя ў табліцу Excel з дапамогай кода VBA. Будзем спадзявацца, што гэта дапаможа вам больш упэўнена выкарыстоўваць гэтыя метады. Любыя пытанні ці прапановы не забывайце размяшчаць іх у полі для каментарыяў ніжэй.