Fọwọsi ni awọn fọọmu pẹlu data lati tabili

Ilana ti iṣoro naa

A ni aaye data (akojọ, tabili - pe ohun ti o fẹ) pẹlu alaye lori awọn sisanwo lori iwe kan data:

Išẹ: yarayara tẹjade iwe-ẹri owo kan (sisanwo, risiti…) fun titẹsi eyikeyi ti o fẹ ti a yan lati atokọ yii. Lọ!

Igbesẹ 1. Ṣẹda Fọọmu kan

Lori iwe miiran ti iwe (jẹ ki a pe iwe yii fọọmù) ṣẹda fọọmu ti o ṣofo. O le ṣe funrararẹ, o le lo awọn fọọmu ti a ti ṣetan, ti o ya, fun apẹẹrẹ, lati awọn oju opo wẹẹbu ti iwe irohin Oloye Accountant tabi oju opo wẹẹbu Microsoft. Mo ni nkankan bi eleyi:

Fọwọsi ni awọn fọọmu pẹlu data lati tabili

Ninu awọn sẹẹli ofo (Account, Iye, Gba lati ati be be lo) yoo gba data lati tabili sisan lati iwe miiran - diẹ diẹ lẹhinna a yoo ṣe pẹlu eyi.

Igbesẹ 2: Ngbaradi tabili sisan

Ṣaaju ki o to mu data lati tabili fun fọọmu wa, tabili nilo lati jẹ imudojuiwọn diẹ. Eyun, fi ọwọn ti o ṣofo si apa osi ti tabili. A yoo lo lati tẹ aami sii (jẹ ki o jẹ lẹta Gẹẹsi "x") idakeji ila lati eyiti a fẹ lati fi data kun fọọmu naa:

Igbesẹ 3. Sisopọ tabili ati fọọmu

Fun ibaraẹnisọrọ, a lo iṣẹ naa VPR(VLOOKUP) – o le ka diẹ ẹ sii nipa o nibi. Ninu ọran wa, lati fi nọmba isanwo ti samisi “x” lati inu iwe data sinu sẹẹli F9 lori fọọmu, o gbọdọ tẹ agbekalẹ atẹle ni sẹẹli F9:

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

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

Awon. tumọ si “agbọye”, iṣẹ naa yẹ ki o wa ni ibiti A2: G16 lori iwe data laini kan ti o bẹrẹ pẹlu ohun kikọ “x” ati fun wa ni awọn akoonu ti iwe keji ti laini yii, ie nọmba isanwo.

Gbogbo awọn sẹẹli miiran ti o wa lori fọọmu naa ni a kun ni ọna kanna - nọmba ọwọn nikan ni iyipada ninu agbekalẹ.

Lati ṣe afihan iye ni awọn ọrọ, Mo lo iṣẹ naa ara lati afikun PLEX.

Abajade yẹ ki o jẹ atẹle yii:

Fọwọsi ni awọn fọọmu pẹlu data lati tabili

Igbesẹ 4. Ki ko si meji "x"…

Ti olumulo ba tẹ “x” lodi si awọn laini pupọ, iṣẹ VLOOKUP yoo gba iye akọkọ ti o rii nikan. Lati yago fun iru aibikita, tẹ-ọtun lori taabu dì data ati igba yen Ọrọ orisun (koodu orisun). Ninu ferese olootu Ipilẹ Visual ti o han, daakọ koodu atẹle naa:

Ikọkọ Sub Worksheet_Change(ByVal Target Bi Range) Dim r As Long Dim str As String If Target.Count > 1 Lẹhinna Jade Sub If Target.Column = 1 Lẹhinna str = Target.Value Application.EnableEvents = False r = Awọn sẹẹli(Rows.Count) , 2) .Opin(xlUp) .Opin ila ("A2: A" & r) .ClearContents Target.Value = str Ipari Ti Ohun elo.EnableEvents = Ipari Ipari otitọ

Makiro yii ṣe idiwọ olumulo lati titẹ sii ju ọkan lọ "x" ni iwe akọkọ.

O dara, iyẹn ni gbogbo! Gbadun!

  • Lilo iṣẹ VLOOKUP lati paarọ awọn iye
  • Ẹya ilọsiwaju ti iṣẹ VLOOKUP
  • Iye ninu awọn ọrọ (iṣẹ Propis) lati inu afikun PLEX

 

Fi a Reply