আমি এটিকে ঘিরে একটি উপায় বের করেছি। কোনও নির্বাচিত ব্যাপ্তিকে এইচটিএমএলে রূপান্তর করতে কোনও ভিবিএ কোড ব্যবহার করার পরিবর্তে, আমি সূত্র এবং একটি একক ভিবিএ কোড ব্যবহার করে বিকল্প পথে চলেছি।
প্রথম জিনিসটি আমি একটি Sheet5
করেছিলাম, তারপরে আমি যে টেবিলটি পুনরায় তৈরি করার চেষ্টা করছিলাম (সেই কলামগুলিতে সারিগুলি ম্যাপিং Desc!1:16
করছি Sheet5!A:K
) থেকে কাঁচা এইচটিএমএল ডেটা নিয়েছি এবং এটিকে বিভক্ত করেছি, কোডটিতে ব্রেক রেখেছি আমি যদি নতুন তথ্য প্রবেশ করতাম। আমি প্রতিটি খণ্ড নিয়ে তাতে আটকালাম A2:K2
। তারপরে আমি যে তথ্য আমি নিজেই পরিবর্তন করেছি এবং তা আমার বইয়ের সাথে যুক্ত করেছি A4:K4
। (এটি আমার লগ পৃষ্ঠায় থাকা সেলগুলিতে লিঙ্কগুলি ব্যবহার করছে যা আমার প্রতিটি তালিকার সাথে পরিবর্তন হয়))
সেলে L2
আমি সূত্রটি রেখেছি
=CONCATENATE(A2,A4,B2,B4,C2," ",C4,D2," ",D4,E2," ",E4,F2," ",F4,
G2," ",G4,H2," ",H4,I2," ",I4,J2," ",J4,K2)
(লাইন ব্রেকটি কেবল উপস্থাপনার জন্য)। এটি প্রতিটি কাঁচা এইচটিএমএল এবং আমার লগ থেকে তথ্য নিয়েছে এবং এটি একটি সম্পূর্ণ এইচটিএমএল কোড দেখাচ্ছে সংযুক্ত করে। C11
আমার লগ শীটের ঘরে আমি =Sheet5!$L$2
মানটি অনুলিপি এবং আটকানোর জন্য আমার মূল পৃষ্ঠায় এইচটিএমএল ডেটা দেখানোর জন্য রেখেছিলাম ।
এর পরে, আমি লক্ষ্য করেছি এক্সেল ইতিমধ্যে উদ্ধৃত সমস্ত কিছুতে ডাবল কোট এবং অন্য ক্ষেত্রে একক উদ্ধৃতি যুক্ত করবে। কিছু অনুসন্ধান করার পরে, আমি কিছু কোড পেয়েছি যা একটি নির্বাচিত ঘরের মানগুলি অনুলিপি করবে যাতে আমি উদ্ধৃতি ছাড়াই এইচটিএমএল কোডটি পেস্ট করতে সক্ষম হব। এর জন্য আমি যে ম্যাক্রোটি ব্যবহার করেছি তা এখানে:
Sub CopyCellContents()
Range("C11").Select
'create a reference in the VBE to Microsft Forms 2.0 Lib
Dim objData As New DataObject
Dim strTemp As String
strTemp = ActiveCell.Value
objData.SetText (strTemp)
objData.PutInClipboard
End Sub
আমি পিয়ারসন সফটওয়্যার কনসাল্টিং (অর্থাত্, চিপ পিয়ারসন)
ম্যাক্রোর জন্য ভিবিএ সাইটে উইন্ডোজ ক্লিপবোর্ড ব্যবহার করেছি ।
আমি ব্যবহারকারী সংজ্ঞায়িত ডেটা নিয়ে একটি সমস্যায় পড়েছি। এটি সমাধান করার জন্য, আমাকে কোড ডিবাগারটি প্রস্থান করতে হবে, ম্যাক্রোটির সাথে ম্যাক্রোটিটি এতে ম্যাক্রো দিয়ে আবার খুলতে হবে, "সরঞ্জামগুলি" → "রেফারেন্সগুলি" এ যান এবং তারপরে ব্রাউজ FM20.DLL
করে "ফাইলের নাম:" টাইপ করতে হয়েছিল। অন্যথায় উপলভ্য রেফারেন্সগুলিতে আমি "মাইক্রোসফ্ট ফর্মগুলি ২.০ অবজেক্ট লাইব্রেরি" খুঁজে পাইনি।
আমি এটিকে ঘরের পাশের বোতামে অর্পণ করেছি C11
এবং এখন, আমি যখন এটি ক্লিক করি তখন কোডটি আমার ক্লিপবোর্ডে উদ্ধৃতিবিহীন অনুলিপি করা হয়। আমি মূলত যেভাবে পরিকল্পনা করছিলাম ঠিক সেভাবে এটি কাজ করে না, তবে ফলাফলটি আমি যা চেয়েছিলাম ঠিক ঠিক তেমনই ঘটে। আশা করি এটি আরও কিছুকে সহায়তা করবে।
আমি যা অর্জন করেছি তার কয়েকটি স্ক্রিন শট এখানে দেওয়া হল:
আমি এখানে প্রতিটি তালিকার জন্য কোড প্রয়োজন।
Sheet5
কোষে বিভক্ত কাঁচা ডেটা।
এই সূত্রগুলি দ্বারা তৈরি সমাপ্ত পণ্য এখানে। এবং সেখানে আমার লগ পৃষ্ঠাটি বোতামটি রয়েছে। ক্লিক করা হলে, এটি বাক্সে কোডটি উদ্ধৃতি ছাড়াই ডানদিকে অনুলিপি করে।