হালনাগাদ:
সমস্ত বিবরণ সংক্ষিপ্ত করে এবং আলোচনার পরে, আমি বিকল্পগুলি চেক করতে 2 ভাল সময় ব্যয় করেছি এবং এই আপডেটটি সমস্ত বিন্দুতে i
।
উদ্যতি
প্রথমত, আমি ভিএমওয়্যার দ্বারা চালিত ক্লিন উইন 7 এসপি 1 আলটিমেট এক্স 64 ভার্চুয়াল মেশিনে একটি ক্লিন অফিস 2010 x86 ইনস্টল করলাম (এটি আমার প্রতিদিনের পরীক্ষার কাজগুলির জন্য নিয়মিত, তাই আমার অনেকগুলি মোতায়েন রয়েছে)।
তারপরে, আমি কেবলমাত্র নিম্নলিখিত এক্সেল বিকল্পগুলি পরিবর্তন করেছি (উদাহরণস্বরূপ অন্য সমস্তগুলি যেমন ইনস্টলেশন শেষে রয়েছে):
Advanced > General > Ask to update automatic links
চেক করা :
Trust Center > Trust Center Settings... > External Content > Enable All...
(যদিও এটি ডেটা সংযোগের সাথে সম্পর্কিত এটি সম্ভবত মামলার জন্য গুরুত্বপূর্ণ নয়):
পূর্বশর্ত
আমি তার আপডেট করা উত্তরের পরামর্শ C:\
অনুযায়ী ঠিক একটি ওয়ার্কবুক প্রস্তুত করেছি এবং রেখেছি @Siddharth Rout
(আপনার সুবিধার জন্য ভাগ করা হয়েছে): https://www.roidbox.com/s/mv88vyc27eljqaq/Book1withLinkToBook2.xlsx লিঙ্কযুক্ত বইটি মুছে ফেলা হয়েছে তাই ভাগ করে দেওয়া লিঙ্কটি বই অনুপলব্ধ (অবশ্যই)
ম্যানুয়াল খোলার
খোলার উপরে উপরের ভাগ করা ফাইল শো করে (উপরের তালিকাভুক্ত এক্সেল বিকল্পগুলি থাকা) 2 সতর্কতা - উপস্থিতির ক্রমে:
সতর্কতা # 1
ক্লিক করার পরে Update
আমি প্রত্যাশিত অন্যটি পেয়েছিলাম:
সতর্কতা # 2
সুতরাং, আমি মনে করি আমার পরীক্ষার পরিবেশটি এখন এর থেকে বেশ অনুরূপ OP
) এতদূর ভাল, আমরা শেষ পর্যন্ত চলে যাই
ভিবিএ খোলা হচ্ছে
ছবিটি পরিষ্কার করার জন্য এখন আমি ধাপে ধাপে সমস্ত সম্ভাব্য বিকল্প চেষ্টা করব। সরলতার জন্য আমি কেবল কোডের প্রাসঙ্গিক লাইনগুলি ভাগ করব (কোড সহ সম্পূর্ণ নমুনা ফাইলটি ভাগ করা হবে)।
1. সাধারণ অ্যাপ্লিকেশন.ওয়ার্কবুকস.পেন
Application.Workbooks.Open Filename:="C:\Book1withLinkToBook2.xlsx"
আশ্চর্যের কিছু নেই - উপরের ম্যানুয়াল খোলার জন্য এটি দুটি সতর্কতা তৈরি করে।
2. অ্যাপ্লিকেশন.ডিসপ্লে অ্যালার্টস = মিথ্যা
Application.DisplayAlerts = False
Application.Workbooks.Open Filename:="C:\Book1withLinkToBook2.xlsx"
Application.DisplayAlerts = True
এই কোডটি সতর্কতা # 1 দিয়ে শেষ হয় এবং বিকল্প ক্লিক করা ( Update
/ Don't Update
) কোনও পরবর্তী সতর্কবার্তা তৈরি করে না, অর্থাৎ সতর্কতা # 2Application.DisplayAlerts = False
দমন করে ।
৩. অ্যাপ্লিকেশন.এস্কটো আপডেটলিংকস = ভুয়া
Application.AskToUpdateLinks = False
Application.Workbooks.Open Filename:="C:\Book1withLinkToBook2.xlsx"
Application.AskToUpdateLinks = True
এর বিপরীতে DisplayAlerts
, এই কোডটি কেবলমাত্র সতর্কতা # 2 দিয়ে শেষ হয় , অর্থাত্ সতর্কতা # 1Application.AskToUpdateLinks = False
দমন করে ।
4. ডাবল মিথ্যা
Application.AskToUpdateLinks = False
Application.DisplayAlerts = False
Application.Workbooks.Open Filename:="C:\Book1withLinkToBook2.xlsx"
Application.DisplayAlerts = True
Application.AskToUpdateLinks = True
স্পষ্টতই, এই কোড দুটি সতর্কতা দমন করে শেষ হয় ।
5. আপডেটলিংক: = মিথ্যা
Application.Workbooks.Open Filename:="C:\Book1withLinkToBook2.xlsx", UpdateLinks:=False
শেষ অবধি, এই 1-লাইন সমাধানটি (মূলত প্রস্তাবিত @brettdj
) ডাবল ফালসের মতোই কাজ করে: কোনও সতর্কতা দেখানো হয় না!
উপসংহার
একটি ভাল পরীক্ষার অনুশীলন এবং খুব গুরুত্বপূর্ণ সমাধান হওয়া কেস বাদে (আমার ওয়ার্কবুকগুলি তৃতীয় পক্ষকে পাঠানোর সময় আমি প্রতিদিন এই জাতীয় সমস্যার মুখোমুখি হতে পারি এবং এখন আমি প্রস্তুত), আরও 2 টি জিনিস শিখেছি:
- সংস্করণ নির্বিশেষে এক্সেল বিকল্পগুলি ডিও-র ব্যাপার - বিশেষত যখন আমরা ভিবিএ সমাধানে আসি to
- প্রতিটি সমস্যার সংক্ষিপ্ত এবং মার্জিত সমাধান রয়েছে - একসাথে সুস্পষ্ট এবং জটিল নয়। এর আরও একটি প্রমাণ!)
যারা সমাধানে অবদান রেখেছেন তাদের সবাইকে এবং বিশেষত ওপি যারা এই প্রশ্নটি উত্থাপন করেছে তাদেরকে অনেক ধন্যবাদ। আশা করি আমার তদন্ত এবং পুঙ্খানুপুঙ্খভাবে বর্ণিত পরীক্ষামূলক পদক্ষেপগুলি কেবল আমার জন্য সহায়ক ছিল না)
উপরের কোডের নমুনাগুলির সাথে নমুনা ফাইলটি ভাগ করা হয় (অনেকগুলি লাইন ইচ্ছাকৃতভাবে মন্তব্য করা হয়): https://www.roidbox.com/s/9bwu6pn8fcogby7/NOWarningsOpen.xlsm
আসল উত্তর ( এক্সেল 2007 এর জন্য নির্দিষ্ট বিকল্পগুলির সাথে পরীক্ষিত ):
এই কোডটি আমার পক্ষে দুর্দান্ত কাজ করে - এতে ওয়াইল্ডকার্ড ব্যবহার করে নির্দিষ্ট করা সমস্ত এক্সেল ফাইলের মধ্য দিয়ে লুপ হয় InputFolder
:
Sub WorkbookOpening2007()
Dim InputFolder As String
Dim LoopFileNameExt As String
InputFolder = "D:\DOCUMENTS\" 'Trailing "\" is required!
LoopFileNameExt = Dir(InputFolder & "*.xls?")
Do While LoopFileNameExt <> ""
Application.DisplayAlerts = False
Application.Workbooks.Open (InputFolder & LoopFileNameExt)
Application.DisplayAlerts = True
LoopFileNameExt = Dir
Loop
End Sub
অনুপলব্ধ বাহ্যিক লিঙ্ক সহ বইগুলি দিয়ে চেষ্টা করেছি - কোনও সতর্কতা নেই।
নমুনা ফাইল: https://www.DPboxbox.com/s/9bwu6pn8fcogby7/NOWarningsOpen.xlsm