Excel VBA: Хүснэгтэнд өгөгдөл оруулах (4 жишээ)

  • Үүнийг Хуваалц
Hugh West

Энэ нийтлэлд бид VBA<2 ашиглан Excel хүснэгт хэрхэн өгөгдөл оруулахыг харуулах болно> код . Excel-ийн суулгасан шинж чанар, аргуудын тусламжтайгаар бид хүснэгтэд өгөгдөл нэмэх эсвэл дарж бичих функцийг хялбархан хөнгөвчлөх боломжтой. VBA кодын хамт аргуудын талаар тодорхой ойлголттой болохын тулд жишээнүүдэд шумбаж үзье.

Дадлага хийх номыг татаж авах

Уншаж байхдаа дасгал хийхийн тулд энэхүү дасгалын номыг татаж авна уу. энэ нийтлэл.

Table.xlsm-д өгөгдөл оруулах

4 Excel програмын VBA-г ашиглан хүснэгтэд өгөгдөл оруулах жишээ

Бидэнд захиалгын огноо, бүтээгдэхүүний нэр, тоо хэмжээ, нэгж үнэ, нийт үнэ зэрэг дэлгэрэнгүй мэдээлэл бүхий дэлгүүрийн борлуулалтын жагсаалт байгаа гэж бодъё.

Excel дээр хэрхэн хүснэгт үүсгэх

өгөгдлийн багц Excel хүснэгт болгохын тулд, дараахыг хий-

  • бүх өгөгдлийн багц -г сонгоно уу.
  • Оруулах таб руу очно уу Excel Ribbon -аас.
  • Хүснэгт сонголт дээр товшино уу.

  • Эцэст нь Хүснэгт үүсгэх цонхны OK товчийг товшино уу.

  • Бид өгөгдлийн багцыг Excel хүснэгт болгон амжилттай хөрвүүллээ.

Өгөгдөл оруулах Excel-ийн хүснэгтэд бид код дотроо хэд хэдэн VBA функц болон проперт -г ашиглана. Дараах хэсэг визуал үндсэн засварлагч дээр хэрхэн нээлгэх, код бичих талаар тайлбарладаг.

Visual Basic Editor дээр код бичих

алхмуудыг дагана уу visual basic-ийг нээх засварлагч болон тэнд хэдэн код бичээрэй.

  • Excel Ribbon -аас Хөгжүүлэгч таб руу очно уу.
  • Visual Basic сонголтыг товшино уу.

  • Visual Basic for Applications цонхонд, Оруулах унадаг цэс дээр товшино уу Шинэ модуль

Одоо шинэ модуль нэгдсэн , тэнд хэдэн код бичээд F5 дарж ажиллуулна.

1. Excel дээр VBA ашиглан хүснэгтийн сүүлчийн мөрөнд өгөгдөл оруулах

Энэ жишээнд бид нэмэхийн тулд VBA код ашиглана. а шинэ мөр хүснэгтийн доод , дараа нь өгөгдөл түүн рүү оруулна. Манай хүснэгтэд бид өгөгдлийн 4 мөр байна. 5-дахь -г нэмэхийн тулд хуулбар болон доорх кодыг Visual Basic редакторт буулгана уу.

4059

F5 г дарж кодоо ажиллуулна уу.

Бид өгөгдлийн шинэ мөр а шинэ мөр оруулсан. одоо байгаа хүснэгтийн доод .

Код тайлбар:

  • Бид кодонд ListObjects ашигласан. VBA Excel-ийн объект нь хүснэгтийг нэр -тэй нь барьж авахын тулд . Дэлгэрэнгүй мэдээлэл авахыг хүсвэл ListObject объектуудын бүр нь ажлын хуудас дээрх хүснэгт . Хүснэгтийн нэрийг авахын тулд хүснэгт >> хүснэгтийн дизайн таб дээрх хүснэгт дээр товшино уу. Excel Ribbon.

  • Дараа нь бид ЖагсаалтынМөр -г ашигласан. Нэмэх аргыг хүснэгт шинэ мөр нэмэхийн тулд . Энэ арга хоёр аргумент авна: Байршил ба Үргэлж оруулах .

бүхэл тоо оруулах замаар тоо , бид хүснэгт дэх шинээр нэмсэн мөрийн харьцангуй байрлалыг зааж өгч болно. Энэ жишээнд бид хоосон байрлалын аргумент , үр дүнд нь шинэ мөр дээр нэмсэн. хүснэгтийн доод .

  • Эцэст нь бид шинэ <1-ийн нүдний бүрт өгөгдлийг тохируулна>мөр нэмсэн . Энэ тохиолдолд өгөгдөл нь .Range(1) = “1/1/2022” захиалах огноо, .Range(2) = “Apple” Бүтээгдэхүүн, .Муж(3) = 5 Тоо хэмжээ,  .Муж(4) = 1.77 Нэгж үнэ.

Дэлгэрэнгүй унших : Excel Хүснэгтийн нэр: Таны мэдэх ёстой бүх зүйл

2. Excel дээр хүснэгтийн тодорхой мөрөнд өгөгдөл оруулахын тулд VBA кодыг ажиллуулаарай

Энэ зурагт бид өгөгдлийн мөр нэмэх дээрх жишээн дээр бидний ашигласан кодын ижил хэсгийг ашиглан хүснэгттэй холбоотой тодорхой мөрөнд . Энэ тохиолдолд бид ListRows.Add аргын -ын Байрлалын аргумент -ийг заах л хангалттай.код. Бид одоо байгаа хүснэгтэд 3-р мөрийн дугаар харьцангуй -д дэлгэрэнгүй мэдээлэл бүхий Улбар шар өнгийн -н борлуулалтын мэдээллийг нэммээр байна гэж бодъё. Үүнийг хийхийн тулд дараах кодоо хуулж кодоо -г визуал код засварлагч руу оруулна уу.

8806

товчлох замаар кодыг ажиллуулна уу. F5 нь хүснэгттэй харьцуулахад 3-р мөрөнд Улбар шар өнгийн борлуулалтын өгөгдлийг хүснэгт -д оруулсан.

Унших Дэлгэрэнгүй: Хүснэгтийн мөр бүрийн Excel VBA код (нэмэх, дарж бичих, устгах гэх мэт)

Ижил төстэй уншилтууд

  • Пивот хүснэгтэд тооцоолсон талбайн нийлбэрийг тоонд хуваасан
  • Excel дээр харьцангуй давтамжийн тархалтыг хэрхэн дүрслэх вэ
  • [Засах] Пивот хүснэгтэд огноог бүлэглэх боломжгүй: 4 боломжит шийдэл
  • Excel дээр давтамжийн хувиарыг хэрхэн тооцоолох вэ (2 арга)
  • Пивот хүснэгтийг сэргээдэггүй (5 асуудал & шийдэл)

3. Excel дээр VBA ашиглан хүснэгтэнд өгөгдөл оруулах, дарж бичих

Энд бид байгаа өгөгдлүүдийг хэрхэн дарж бичихийг харуулах болно. хүснэгтийн оронд хүснэгт а шинэ мөр өгөгдлийн оруулах. Үүнийг хийхийн тулд бид Excel-ийн ListRows.Add өмчийн оронд ListObject.ListRows шинж чанарыг ашиглах хэрэгтэй өмнөх . ListObject.ListRows шинж чанар нь мөн мөрийн дугаар ( Бүхэл тоо утга ) аргумент болгон авдаг. Бид өөрчлөгдөхийг хүсч байна гэж бодъё Бидний өмнөх жишээнд оруулсан Улбар шарын 2.14-өөс 2.35 хүртэлх нэгжийн үнэ . . Доорх кодыг хуулаад хуулбар доорх визуал үндсэн редакторт буулгана уу.

5662

Манай кодонд бид аргумент ListObject.ListRows шинж чанар г 3 энд өгөгдөл Улбар шар нь -д харьяалагддаг. код г F5 товчийг дарж ажиллуулаад ялгааг харна уу.

Код нь хүснэгттэй харьцангуй мөрийн дугаар 3 дахь өгөгдлийн зөвхөн нэгж үнийг өөрчилсөн.

Дэлгэрэнгүй унших: Excel хүснэгтээс мөр, багана хэрхэн оруулах, устгах

4. Хэрэглэгчийн оруулсан мэдээлэлд үндэслэн Excel хүснэгтэд өгөгдөл оруулах VBA кодыг ажиллуулна уу

Энэ жишээнд бид оруулах болно. хүснэгтийн нэр болон худалдааны дэлгэрэнгүй мэдээлэл бүтээгдэхүүн хэрэглэгчийн оруулсан хэрэглээний хатуу код хувьд VBA код тус бүрд цаг . Үүнийг хийхийн тулд доорх зааврыг дагана уу.

  • Дараах кодыг хуулж визуал код засварлагч руу оруулна уу.
6862

  • F5 дарж код ажиллуулна уу.
  • нэрийг оруулна уу. хүснэгтийн оролтын талбарт ( Хүснэгт1 , энэ жишээнд) ОК дарна уу.

  • Дараа нь Захиалгын огноо, Бүтээгдэхүүний нэр, Тоо хэмжээ, болон Нэгж үнэ -ын утгыг оруулна уу. дараалан гарч ирсэн оролтын хайрцагнууд . Энэ жишээнд бидний ашигласан утгууд нь 1/1/2022, Улбар шар, 3, болон 35.

  • Үүний үр дүнд бид шинэ мөр оруулсан өгөгдөлтэй <2 байна> хүснэгтний доод -д.

Дэлгэрэнгүй унших: Excel хүснэгтийг форматлах зөвлөмж – Хүснэгтийн харагдах байдлыг өөрчлөх

Тэмдэглэл

Бид шинэ мөр <2 нэмэх үед> өгөгдлийн VBA кодыг ашиглан формат ба томьёо шинэ мөр рүү автоматаар зөөвөрлөнө . Бидний жишээнд Нийт Үнэ баганаас Тоо хэмжээ ба Нэгж үнэ баганын бүтээгдэхүүн гарна. Бид дөнгөж сая зөвхөн Тоо хэмжээ болон Нэгж үнийн утгыг оруулсан; шинэ мөр нь нийт үнийн баганад бүтээгдэхүүний дээрх хоёр утгыг оруулан оруулсан.

Дүгнэлт

Одоо бид VBA кодыг ашиглан Excel хүснэгтэд өгөгдөл оруулах аргыг мэддэг болсон. Энэ нь танд эдгээр аргуудыг илүү итгэлтэй ашиглахад тусална гэж найдаж байна. Аливаа асуулт, санал байвал доорх коммент хэсэгт оруулахаа бүү мартаарай.

Хью Уэст бол салбартаа 10 гаруй жил ажилласан туршлагатай Excel-ийн сургагч багш, шинжээч юм. Нягтлан бодох бүртгэл, санхүүгийн чиглэлээр бакалавр, бизнесийн удирдлагын магистр зэрэгтэй. Хью багшлах сонирхолтой бөгөөд дагаж мөрдөх, ойлгоход хялбар заах өвөрмөц арга барилыг боловсруулсан. Түүний Excel-ийн мэдлэг чадвар нь дэлхий даяарх олон мянган оюутан, мэргэжилтнүүдэд ур чадвараа дээшлүүлж, ажил мэргэжлээрээ амжилт гаргахад тусалсан. Хью өөрийн блогоороо дамжуулан өөрийн мэдлэгээ дэлхийтэй хуваалцаж, Excel програмын үнэгүй зааварчилгаа, онлайн сургалтыг хувь хүмүүс болон бизнесүүдэд бүрэн дүүрэн ашиглахад нь туслах зорилгоор санал болгодог.