מילוי הטפסים בנתונים מהטבלה

ניסוח הבעיה

יש לנו מאגר מידע (רשימה, טבלה - תקראו לזה איך שאתם רוצים) עם מידע על תשלומים על גיליון נתונים:

המשימות: הדפס במהירות קבלה מזומן (תשלום, חשבונית...) עבור כל ערך רצוי שנבחר מתוך רשימה זו. ללכת!

שלב 1. צור טופס

על גיליון אחר של הספר (בואו נקרא גיליון זה טופס) ליצור טופס ריק. אתה יכול לעשות את זה בעצמך, אתה יכול להשתמש בטפסים מוכנים, שנלקחו, למשל, מאתרי האינטרנט של מגזין החשב הראשי או אתר האינטרנט של מיקרוסופט. קיבלתי משהו כזה:

בתאים ריקים (חשבון, סכום, התקבל מ וכו') יקבלו נתונים מטבלת התשלומים מגיליון אחר - קצת אחר כך נעסוק בזה.

שלב 2: הכנת טבלת התשלומים

לפני נטילת נתונים מהטבלה עבור הטופס שלנו, הטבלה צריכה להיות מודרנית מעט. כלומר, הוסף עמודה ריקה משמאל לטבלה. נשתמש כדי להזין תווית (תהיה זו האות האנגלית "x") מול השורה שממנה נרצה להוסיף נתונים לטופס:

שלב 3. קישור הטבלה והטופס

לתקשורת אנו משתמשים בפונקציה VPR(VLOOKUP) - אתה יכול לקרוא עוד על זה כאן. במקרה שלנו, על מנת להכניס את מספר התשלום המסומן "x" מגיליון הנתונים לתא F9 בטופס, עליך להזין את הנוסחה הבאה בתא F9:

=VLOOKUP("x",Data!A2:G16)

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

הָהֵן. בתרגום ל"מובן", הפונקציה צריכה למצוא בטווח A2: G16 בגליון הנתונים שורה המתחילה באות "x" ולתת לנו את התוכן של העמודה השנייה בשורה זו, כלומר מספר תשלום.

כל שאר התאים בטופס ממולאים באותו אופן - רק מספר העמודה משתנה בנוסחה.

כדי להציג את הכמות במילים, השתמשתי בפונקציה שלו מהתוסף PLEX.

התוצאה צריכה להיות הבאה:

שלב 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 Then Exit Sub If Target.Column = 1 Then str = Target.Value Application.EnableEvents = False r = Cells(Rows.Count , 2).End(xlUp).Row Range("A2:A" & r).ClearContents Target.Value = str End If Application.EnableEvents = True End Sub  

מאקרו זה מונע מהמשתמש להזין יותר מ-"x" אחד בעמודה הראשונה.

טוב זה הכל! תהנה!

• שימוש בפונקציה VLOOKUP כדי להחליף ערכים
• גרסה משופרת של פונקציית VLOOKUP
• כמות במילים (פונקציית פרופיס) מהתוסף PLEX