ওয়ার্ড .ডোক্স ফাইলে ব্যাচ একাধিক বুকমার্কের নাম পরিবর্তন করে

Question

স্ট্যান্ডার্ড ওয়ার্ড 97-2003 ডক ফাইলে একাধিক বুকমার্কের নামকরণ করা কি সম্ভব? আমি ওয়ার্ড 2010-এ একটি 400 পৃষ্ঠার ডকুমেন্টটি শেষ করেছি, কয়েক শতাধিক বুকমার্কের নাম পরিবর্তন করা আবশ্যক এবং আমি স্পষ্টভাবে ভিতরে যেতে এবং ম্যানুয়ালি তাদের নাম পরিবর্তন করতে চাই না। অন্তর্নির্মিত ওয়ার্ড বুকমার্ক ডায়ালগটি বাড়ানোর জন্য আমি এই শব্দটি অ্যাড-ইন পেয়েছি , তবে এটি আমার ডকুমেন্টে এটি সঠিকভাবে লোড করা যায় বলে মনে হচ্ছে না, যদি আমি এটি কাজ করতে পারি তবে এটি আমার সমস্যার সমাধান করবে। ততক্ষণে এটি সম্পাদনের জন্য অন্য কোনও সরল পদ্ধতি আছে? সম্ভবত এটি ম্যাক্রো ব্যবহার করে সম্পন্ন করা যেতে পারে। এই মুহুর্তে আমি সন্ধান করছি যে ওপেনঅফিস কোনও ডক্সএক্স ফাইলে বুকমার্কের ব্যাচের নাম পরিবর্তন করতে সমর্থন করে। সাহায্য প্রশংসা করা হয়।

Answer 1

আপনি ওয়ার্ডে একটি ভিবিএ ম্যাক্রো দিয়ে এটি করতে পারেন। নীচের ম্যাক্রো, যা এখান থেকে নেওয়া হয়েছে (এবং ওয়েব পৃষ্ঠায় আরও বিস্তৃতভাবে আলোচনা করা হয়েছে) প্রতিটি বিদ্যমান বুকমার্ক নামের "NEW_" প্রিন্ট করে দেবে, তবে কনভেনশনগুলি যেটি পছন্দ করে তা বুকমার্কগুলির নাম পরিবর্তন করতে মানিয়ে নেওয়া যেতে পারে।

Sub RenameBookmarks()
'  although it does NOT rename them
'  it creates a new one for the same range
'  then deletes the old one

Dim BM_Names()
Dim i As Long
With ActiveDocument
  For i = 1 To .Bookmarks.Count
    ReDim Preserve BM_Names(i)
    BM_Names(i) = .Bookmarks(i).Name
  Next
  For i = 1 To .Bookmarks.Count
    With .Bookmarks(BM_Names(i))
      .Range.Bookmarks.Add Name:="NEW_" & .Name, Range:=.Range
      .Delete
    End With
  Next
End With
End Sub