টেবিল থেকে ডেটা দিয়ে ফর্মগুলি পূরণ করা

সমস্যা প্রণয়ন

আমাদের কাছে একটি ডাটাবেস রয়েছে (তালিকা, টেবিল - আপনি যা চান তা বলুন) একটি শীটে অর্থপ্রদানের তথ্য সহ উপাত্ত:

কার্য: এই তালিকা থেকে নির্বাচিত যেকোনো পছন্দসই এন্ট্রির জন্য দ্রুত একটি নগদ রসিদ (পেমেন্ট, ইনভয়েস …) প্রিন্ট করুন। যাওয়া!

ধাপ 1. একটি ফর্ম তৈরি করুন

বইয়ের অন্য শীটে (আসুন এই শীটটিকে কল করি ফর্ম) একটি খালি ফর্ম তৈরি করুন। আপনি নিজেই এটি করতে পারেন, আপনি তৈরি ফর্মগুলি ব্যবহার করতে পারেন, উদাহরণস্বরূপ, চিফ অ্যাকাউন্ট্যান্ট ম্যাগাজিনের ওয়েবসাইট বা মাইক্রোসফ্ট ওয়েবসাইট থেকে নেওয়া। আমি এই মত কিছু পেয়েছি:

খালি কক্ষে (অ্যাকাউন্ট, পরিমাণ, থেকে প্রাপ্ত ইত্যাদি) অন্য একটি শীট থেকে পেমেন্ট টেবিল থেকে ডেটা পাবেন - একটু পরে আমরা এটি মোকাবেলা করব।

ধাপ 2: পেমেন্ট টেবিল প্রস্তুত করা হচ্ছে

আমাদের ফর্মের জন্য টেবিল থেকে ডেটা নেওয়ার আগে, টেবিলটি কিছুটা আধুনিকীকরণ করা দরকার। যথা, টেবিলের বাম দিকে একটি খালি কলাম ঢোকান। যে লাইন থেকে আমরা ফর্মে ডেটা যোগ করতে চাই তার বিপরীতে একটি লেবেল (এটি ইংরেজি অক্ষর "x" হতে দিন) লিখতে ব্যবহার করব:

ধাপ 3. টেবিল এবং ফর্ম লিঙ্ক করা

যোগাযোগের জন্য, আমরা ফাংশন ব্যবহার করি VPR(ভলুকআপ) - আপনি এখানে এটি সম্পর্কে আরও পড়তে পারেন. আমাদের ক্ষেত্রে, ফর্মের F9 কক্ষে ডেটা শীট থেকে "x" চিহ্নিত অর্থপ্রদানের সংখ্যা সন্নিবেশ করার জন্য, আপনাকে অবশ্যই F9 কক্ষে নিম্নলিখিত সূত্রটি লিখতে হবে:

=VLOOKUP(“x”,ডেটা!A2:G16)

=VLOOKUP("x";ডেটা!B2:G16;2;0)

সেগুলো. "বোধগম্য" তে অনুবাদ করা হলে, ফাংশনটি ডেটা শীটে A2: G16 রেঞ্জে "x" অক্ষর দিয়ে শুরু হওয়া একটি লাইন খুঁজে পাওয়া উচিত এবং আমাদেরকে এই লাইনের দ্বিতীয় কলামের বিষয়বস্তু, অর্থাত্ পেমেন্ট নম্বর দিতে হবে।

ফর্মের অন্যান্য সমস্ত কক্ষ একইভাবে পূরণ করা হয় - শুধুমাত্র কলাম নম্বর সূত্রে পরিবর্তন হয়।

শব্দে পরিমাণ প্রদর্শন করতে, আমি ফাংশন ব্যবহার করেছি নিজের PLEX অ্যাড-অন থেকে।

ফলাফল নিম্নলিখিত হওয়া উচিত:

ধাপ 4. যাতে দুটি "x" না থাকে …

যদি ব্যবহারকারী একাধিক লাইনের বিপরীতে "x" প্রবেশ করে, VLOOKUP ফাংশনটি শুধুমাত্র প্রথম মানটি খুঁজে পাবে। এই ধরনের অস্পষ্টতা এড়াতে, শীট ট্যাবে ডান-ক্লিক করুন উপাত্ত এবং তারপর উৎস টেক্সট (সোর্স কোড). প্রদর্শিত ভিজ্যুয়াল বেসিক এডিটর উইন্ডোতে, নিম্নলিখিত কোডটি অনুলিপি করুন:

Private Sub Worksheet_Change(ByVal Target As Range) Dim r As long Dim str হিসাবে স্ট্রিং যদি Target.Count > 1 তারপর সাব থেকে প্রস্থান করুন যদি Target.Column = 1 তারপর str = Target.Value Application.EnableEvents = False r = Cells(Rows. , 2)।End(xlUp)।সারি পরিসীমা("A2:A" & r)।ClearContents Target.Value = str End If Application.EnableEvents = True End Sub  

এই ম্যাক্রো ব্যবহারকারীকে প্রথম কলামে একাধিক "x" প্রবেশ করতে বাধা দেয়।

ওয়েল, যে সব! উপভোগ করুন!

• মান প্রতিস্থাপন করতে VLOOKUP ফাংশন ব্যবহার করে
• VLOOKUP ফাংশনের একটি উন্নত সংস্করণ
• PLEX অ্যাড-অন থেকে শব্দের পরিমাণ (প্রপিস ফাংশন)