ການຕື່ມຂໍ້ມູນໃສ່ໃນແບບຟອມທີ່ມີຂໍ້ມູນຈາກຕາຕະລາງ

ການສ້າງບັນຫາ

ພວກເຮົາມີຖານຂໍ້ມູນ (ບັນຊີລາຍຊື່, ຕາຕະລາງ - ໂທຫາມັນສິ່ງທີ່ທ່ານຕ້ອງການ) ທີ່ມີຂໍ້ມູນກ່ຽວກັບການຊໍາລະຢູ່ໃນແຜ່ນ ຂໍ້ມູນ:

Task: ພິມໃບຮັບເງິນໄດ້ໄວ (ການຊໍາລະ, ໃບແຈ້ງໜີ້…) ສໍາລັບລາຍການທີ່ຕ້ອງການເລືອກຈາກລາຍການນີ້. ໄປ!

ຂັ້ນຕອນທີ 1. ສ້າງແບບຟອມ

ຢູ່​ໃນ​ປຶ້ມ​ຫົວ​ອື່ນ (ຂໍ​ໃຫ້​ເອີ້ນ​ແຜ່ນ​ນີ້​ວ່າ ຮູບແບບ) ສ້າງແບບຟອມເປົ່າ. ທ່ານສາມາດເຮັດໄດ້ຕົວທ່ານເອງ, ທ່ານສາມາດນໍາໃຊ້ແບບຟອມທີ່ກຽມພ້ອມ, ປະຕິບັດ, ຕົວຢ່າງ, ຈາກເວັບໄຊທ໌ຂອງວາລະສານຫົວຫນ້າບັນຊີຫຼືເວັບໄຊທ໌ Microsoft. ຂ້ອຍໄດ້ຮັບບາງສິ່ງບາງຢ່າງເຊັ່ນນີ້:

ການຕື່ມຂໍ້ມູນໃສ່ໃນແບບຟອມທີ່ມີຂໍ້ມູນຈາກຕາຕະລາງ

ໃນຕາລາງຫວ່າງເປົ່າ (ບັນຊີ, ຈໍານວນ, ໄດ້ຮັບຈາກ ແລະອື່ນໆ) ຈະໄດ້ຮັບຂໍ້ມູນຈາກຕາຕະລາງການຈ່າຍເງິນຈາກເອກະສານອື່ນ - ເລັກນ້ອຍຕໍ່ມາພວກເຮົາຈະຈັດການກັບເລື່ອງນີ້.

ຂັ້ນຕອນທີ 2: ການກະກຽມຕາຕະລາງການຈ່າຍເງິນ

ກ່ອນທີ່ຈະເອົາຂໍ້ມູນຈາກຕາຕະລາງສໍາລັບແບບຟອມຂອງພວກເຮົາ, ຕາຕະລາງຕ້ອງມີຄວາມທັນສະໄຫມເລັກນ້ອຍ. ຄື, ໃສ່ຖັນຫວ່າງຢູ່ທາງຊ້າຍຂອງຕາຕະລາງ. ພວກເຮົາຈະໃຊ້ເພື່ອໃສ່ປ້າຍ (ໃຫ້ມັນເປັນຕົວອັກສອນພາສາອັງກິດ "x") ກົງກັນຂ້າມກັບແຖວທີ່ພວກເຮົາຕ້ອງການເພີ່ມຂໍ້ມູນໃສ່ແບບຟອມ:

ຂັ້ນຕອນທີ 3. ການເຊື່ອມໂຍງຕາຕະລາງແລະແບບຟອມ

ສໍາລັບການສື່ສານ, ພວກເຮົາໃຊ້ຫນ້າທີ່ VPR(VLOOKUP) - ທ່ານສາມາດອ່ານເພີ່ມເຕີມກ່ຽວກັບມັນ ທີ່ນີ້. ໃນ​ກໍ​ລະ​ນີ​ຂອງ​ພວກ​ເຮົາ​, ໃນ​ຄໍາ​ສັ່ງ​ທີ່​ຈະ​ໃສ່​ຈໍາ​ນວນ​ຂອງ​ການ​ຈ່າຍ​ເງິນ​ຫມາຍ "x​" ຈາກ​ແຜ່ນ​ຂໍ້​ມູນ​ເຂົ້າ​ໄປ​ໃນ​ຫ້ອງ F9 ໃນ​ຮູບ​ແບບ​, ທ່ານ​ຈະ​ຕ້ອງ​ໃສ່​ສູດ​ດັ່ງ​ຕໍ່​ໄປ​ນີ້​ໃນ​ຫ້ອງ F9​:

=VLOOKUP(“x”,Data!A2:G16)

=VLOOKUP(“x”;Data!B2:G16;2;0)

ເຫຼົ່ານັ້ນ. ແປເປັນ "ເຂົ້າໃຈໄດ້", ຟັງຊັນຄວນຊອກຫາຢູ່ໃນລະດັບ A2: G16 ໃນເອກະສານຂໍ້ມູນເສັ້ນເລີ່ມຕົ້ນດ້ວຍຕົວອັກສອນ "x" ແລະໃຫ້ພວກເຮົາເນື້ອໃນຂອງຄໍລໍາທີສອງຂອງແຖວນີ້, ເຊັ່ນ: ຈໍານວນການຈ່າຍເງິນ.

ເຊລອື່ນທັງໝົດຢູ່ໃນແບບຟອມຈະຖືກຕື່ມໃສ່ໃນແບບດຽວກັນ - ພຽງແຕ່ຕົວເລກຖັນທີ່ປ່ຽນແປງໃນສູດ.

ເພື່ອສະແດງປະລິມານໃນຄໍາສັບຕ່າງໆ, ຂ້ອຍໃຊ້ຫນ້າທີ່ ເປັນເຈົ້າຂອງ ຈາກ PLEX add-on.

ຜົນໄດ້ຮັບຄວນຈະເປັນດັ່ງຕໍ່ໄປນີ້:

ການຕື່ມຂໍ້ມູນໃສ່ໃນແບບຟອມທີ່ມີຂໍ້ມູນຈາກຕາຕະລາງ

ຂັ້ນຕອນທີ 4. ດັ່ງນັ້ນບໍ່ມີສອງ "x" ...

ຖ້າຜູ້ໃຊ້ໃສ່ “x” ຕໍ່ກັບຫຼາຍແຖວ, ຟັງຊັນ VLOOKUP ຈະໃຊ້ເວລາພຽງແຕ່ຄ່າທໍາອິດທີ່ມັນພົບ. ເພື່ອຫຼີກເວັ້ນຄວາມບໍ່ຊັດເຈນດັ່ງກ່າວ, ໃຫ້ຄລິກຂວາໃສ່ແຖບແຜ່ນ ຂໍ້ມູນ ແລະຫຼັງຈາກນັ້ນ ແຫຼ່ງຂໍ້ຄວາມ (ລະຫັດແຫຼ່ງ). ໃນປ່ອງຢ້ຽມບັນນາທິການ Visual Basic ທີ່ປາກົດ, ຄັດລອກລະຫັດຕໍ່ໄປນີ້:

Private Sub Worksheet_Change(ByVal Target As Range) Dim r As Long Dim str As String If Target.Count > 1 ຫຼັງຈາກນັ້ນອອກຈາກ Sub if Target.Column = 1 ຈາກນັ້ນ str = Target.Value Application.EnableEvents = False r = Cells(Rows.Count , 2).End(xlUp).Row Range("A2:A" & r).ClearContents Target.Value = str End ຖ້າ Application.EnableEvents = True End Sub

ມະຫາພາກນີ້ປ້ອງກັນບໍ່ໃຫ້ຜູ້ໃຊ້ເຂົ້າໄປຫຼາຍກວ່າໜຶ່ງ “x” ໃນຖັນທຳອິດ.

ດີ, ນັ້ນແມ່ນທັງຫມົດ! ມ່ວນ!

  • ການນໍາໃຊ້ຟັງຊັນ VLOOKUP ເພື່ອທົດແທນຄ່າ
  • ສະບັບປັບປຸງຂອງຟັງຊັນ VLOOKUP
  • ຈໍານວນຄໍາສັບ (ຟັງຊັນ Propis) ຈາກ PLEX add-on

 

ອອກຈາກ Reply ເປັນ