এই নেটতে যে কোনও তথ্য পাওয়া যায় নি (কমপক্ষে যেটি যে কাজ করে - একটি মুহুর্তে আরো বেশি)।
আমি যা করার চেষ্টা করছি, আমি একটি অ্যাক্সেস ফর্মে তৈরি করা একটি বোতামের ধাক্কায়, শব্দটি একটি ডকক্স খুলতে এবং এটিতে কয়েকটি সত্য / মিথ্যা চেকবক্সের ভিত্তিতে নির্দিষ্ট RTF অনুচ্ছেদ (নির্দিষ্ট পয়েন্টগুলিতে) দিয়ে এটি তৈরি করে। রেকর্ড এক্সেস ফর্ম বর্তমানে খোলা।
অ্যাক্সেস কোড যা Word docx এ মানগুলি পাস করার জন্য কাজ করে:
ফাংশন ওপেন ওয়ার্ড (কংপথ স্ট্রিং হিসাবে)
Word.Aplication হিসাবে ধীর মানদণ্ড
Word.Document হিসাবে Dim ডক
ত্রুটি পরবর্তী উপর সারসংকলন
Error.Clear
অভিব্যক্তি সেট করুন = GetObject (, "শব্দ। অ্যাপ্লিকেশন")
যদি Err.Number & gt; & gt; 0 তারপর
অভিব্যক্তি = নতুন শব্দ। অ্যাপ্লিকেশন সেট করুন
apword.visible = সত্য
যদি শেষ
সেট ডক = apword.Documents.Open (conPath,, সত্য)
ডক সঙ্গে
ফরমফিল্ডস ("টেক্সটনাম")। ফলাফল = Me.Name
ফরমফিল্ডস ("টেক্সটআনদার নাম")। ফলাফল = Me.AnotherName
ফরমফিল্ডস ("টেক্সটবোলিয়ন 1")। ফলাফল = Me.Boolean1
ফরমফিল্ডস ("টেক্সটবোলিয়ন ২")। ফলাফল = Me.Boolean2
ফরমফিল্ডস ("টেক্সটবোলিয়ন 3")। ফলাফল = Me.Boolean3
শেষ করা
অভিব্যক্তি। অ্যাক্টিভ উইণ্ডো। ভিউ। টাইপ = wdPrintView
apword.visible = সত্য
appword.Activate
সেট ডক = কিছুই নেই
মান নির্ধারণ করুন = কিছুই না
উপরের ডেভেলপারের মাধ্যমে Word ডক্সে নামগুলি পাস করার জন্য উপরে কাজ করে & gt; লিগ্যাসি & gt; টেক্সট ফর্ম ক্ষেত্র। বুলিয়ান মানগুলিও দেখায় (i.e .: -1 সত্য এবং FALSE এর জন্য 0)। আমি কি করার চেষ্টা করছি লাইন বরাবর কিছু:
যদি {TextBoolean1} = "0" "{AUTOTEXT কিছু অংশগ্রাফ}" ""
এই ইন্টারনেট পরামর্শ কাজ করে না।
সংক্ষেপে: অ্যাক্সেস থেকে পাস হওয়া বুলিয়ানের ভিত্তিতে কোনও পূর্বনির্ধারিত স্পটে Word 2013 একটি পূর্বনির্ধারিত অনুচ্ছেদ (একটি অটোটেক্ট বা দ্রুত অংশ বুলডিং ব্লক) থাকতে হবে কি? (এটা করার উপায় কি?)
আপনার সমস্ত ধরনের সাহায্যের জন্য আপনাকে ধন্যবাদ - এটি আমাকে এক সপ্তাহের জন্য বিভিন্ন কার্যকর উপায়ে চেষ্টা করার জন্য আটকে রেখেছে,
তুলবেন