শব্দ ভিবিএ: কোনও অনুসন্ধানে কোনও ভেরিয়েবল sertোকানো এবং ম্যাক্রো প্রতিস্থাপন করার কোনও উপায় আছে?

Question

সুতরাং আমি যা করতে চাই তা হ'ল ম্যাক্রোর মাধ্যমে নথিতে যে পৃষ্ঠাগুলির সংখ্যা রয়েছে তা খুঁজে বের করা:

pages.count

আমি যতদূর জানি, অনুসন্ধান এবং প্রতিস্থাপনের পদ্ধতিটি ব্যবহার করা এই ক্ষেত্রে সম্ভব নয়, কারণ আমি একটি ভেরিয়েবল সন্নিবেশ করিতে পারি না

replacement.text

আমি যে অন্য পদ্ধতিটি চেষ্টা করেছিলাম তা হ'ল প্রথমে যে অংশটি প্রতিস্থাপন করা উচিত তার অংশটির অবস্থান সন্ধান করুন, এটি নির্বাচন করুন এবং তারপরে এটি ব্যবহার করুন

Selection.TypeText Text:=Pages.Count

তবে এটির ফলে কোনও ত্রুটির প্রয়োজন হয়। সুতরাং এটি কাজ করে না। এর মতো আমি পাঠ্যটি প্রতিস্থাপনের জন্য কোন পদ্ধতিটি ব্যবহার করব সেগুলি ধারণার বাইরে out

এই সমস্যাটির কাছে কীভাবে যোগাযোগ করবেন সে সম্পর্কে কারও ধারণা আছে?

Comments

আপনি আসলে কী করার চেষ্টা করছেন?

— ডেভিডপস্টিল

শব্দ উত্পন্ন নয় এমন সামগ্রীগুলির একটি সারণী আপডেট করা (এটি দুর্ভাগ্যক্রমে একটি প্রয়োজনীয়তা)। সুতরাং আমি যা করব পৃষ্ঠার সংখ্যা যাই হোক না কেন 3 - এক্স এর সাথে প্রতিস্থাপন করা হবে replace

— নায়ের

Answer 1

আমি রহস্যজনক শব্দ বলতে চাইছি না তবে মাইক্রোসফ্ট ওয়ার্ডে আসল "পৃষ্ঠা" বলে আসলে কিছুই নেই। যেহেতু মাইক্রোসফ্ট ওয়ার্ড একটি ওয়ার্ড প্রসেসিং প্রোগ্রাম এবং একটি পৃষ্ঠা বিন্যাস প্রোগ্রাম নয়, মাইক্রোসফ্ট ওয়ার্ড একটি মুদ্রিত পৃষ্ঠায় কী ফিট করে তা নির্ধারণ করার জন্য বিভিন্ন কারণের উপর গতিশীলভাবে নির্ভর করে। এর মধ্যে কয়েকটি হ'ল ফন্ট, পয়েন্ট আকার, ব্যবধান, মার্জিন সেটিংস, পৃষ্ঠার ধরণ, পৃষ্ঠা ওরিয়েন্টেশন, মুদ্রক ড্রাইভার সেটিংস এবং আরও অনেক কিছু।

এ কারণে, একটি নির্দিষ্ট পৃষ্ঠা নম্বরে কিছু forceোকানো জোর করা এমন কিছু নয় যা করা বা করা উচিত নয় ... এবং আপনি ঠিক কী অনুমান করার জন্য আমাদের সকলের সীমাবদ্ধতা অর্জন করতে চাইছেন সে সম্পর্কে আরও কিছু জানেন না।

আপনি যা করতে চেষ্টা করছেন তা দয়া করে পুরো বর্ণনা করুন।

Comments

প্রথমে সত্যিই একটি বড় ম্যাক্রো চালিত হয় যা প্রচুর পরিমাণে কাজ করে, যার ফলশ্রুতিতে মোট পৃষ্ঠাগুলির সংখ্যা পরিবর্তিত হতে পারে। আমার নিজের সামগ্রীর টেবিলের মোট পৃষ্ঠাগুলির ম্যানুয়ালি পরিবর্তন করতে না পারাতে (অবশ্যই আমাকে কেবল একটি একক সংখ্যা পরিবর্তন করতে হবে যা সর্বদা 3 - 5 থেকে 3 - 6 এর মতো কিছু হবে will সন্নিবেশ করানো হয়েছে, যেমন এটি উল্লেখগুলি> আপডেট টেবিলের মাধ্যমে আপডেট করা যায় না), পৃষ্ঠাগুলির সংখ্যা গণনা এবং একটি পূর্ণসংখ্যা প্রতিস্থাপন করতে চাইবে।

— নয়ের

আমি সত্যিই প্রশ্নটিকে খুব বেশি জটিল করতে চাই না, এমনকি গর্তটিও সমাধানটি সোজা নাও হতে পারে: আমি কীভাবে অনুসন্ধান ব্যবহার করব এবং কোনও কিছুর প্রতিস্থাপন করব, যেখানে প্রতিস্থাপনের মানটি একটি ভেরিয়েবল হয়, যা বিষয়বস্তুগুলির বিষয়বস্তুর বৈশিষ্ট্যের কোনও একক মাধ্যমে নির্ধারিত হয় is শব্দের দস্তাবেজ (আমার ক্ষেত্রে পৃষ্ঠাগুলির সংখ্যা, যা আমি পেজকন্টগুলি ব্যবহার করতে পারি)।

— নয়ের

Answer 2

সামগ্রী নিয়ন্ত্রণ ব্যবহার করুন। আপনি সেগুলি লেবেল করতে পারেন এবং তারপরে তাদের পাঠ্য সন্ধান এবং প্রতিস্থাপন করতে পারেন। নীচে একটি স্ক্রিন ক্লিপ রয়েছে এবং আপনি দেখতে পাচ্ছেন যে আমি নির্বাচিত একটিতে মডিউল আওয়ারগুলির লেবেল রয়েছে। আপনার ভিবিএ কোডে আপনি নীচের উদাহরণ হিসাবে যা অন্তর্ভুক্ত করেছেন তার অনুরূপ একটি রুটিন থাকবে যা নথিতে সমস্ত সামগ্রী নিয়ন্ত্রণ অনুসন্ধান করেছে এবং তারপরে এটি নিয়ন্ত্রণের পাঠ্যটি প্রতিস্থাপন করেছে।

        For Each cc In doc.ContentControls
        If cc.Tag = "Course hours" Then
            cc.Range.Text = courseHours
        End If
        If cc.Tag = "Course minutes" Then
            cc.Range.Text = courseMinutes
        End If
        Next