এক্সেলে রান টাইম এরর 1004 কিভাবে ঠিক করবেন

রান-টাইম এরর 1004 মাইক্রোসফ্ট ভিজ্যুয়াল বেসিকের সাথে সম্পর্কিত একটি ত্রুটি কোড যা মাইক্রোসফ্ট এক্সেল ব্যবহারকারীদের প্রভাবিত করে বলে জানা গেছে। এক্সেল 2003 এবং এক্সেল 2007-এ ত্রুটিটি সবচেয়ে বেশি প্রচলিত বলে জানা যায়, যদিও কম্পিউটারের জন্য মাইক্রোসফটের জনপ্রিয় ওয়ার্কশিট অ্যাপ্লিকেশনের কোনো সংস্করণই রান-টাইম এরর 1004-এর ঝুঁকি থেকে নিরাপদ নয়। বেশিরভাগ ক্ষেত্রে, এই সমস্যা দ্বারা প্রভাবিত ব্যবহারকারীরা এর মধ্যে একটি দেখতে পান রান-টাইম এরর 1004 এর দুটি ভিন্ন ভিন্নতা। তাদের সম্পূর্ণরূপে, রান-টাইম এরর 1004 এর দুটি ভিন্নতা পড়ে:

"রান-টাইম ত্রুটি '1004':
ওয়ার্কশীট ক্লাসের অনুলিপি পদ্ধতি ব্যর্থ হয়েছে ”

"রান-টাইম ত্রুটি '1004':
অ্যাপ্লিকেশন-সংজ্ঞায়িত বা অবজেক্ট-সংজ্ঞায়িত ত্রুটি ”

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

সবচেয়ে খারাপ প্রযুক্তিগত সমস্যার বিপরীতে, Microsoft Excel এর মধ্যে Run-time error 1004 এর কারণ জানা যায়। রান-টাইম ত্রুটি 1004 ঘটে যখন আপনি যে ম্যাক্রোটি চালাচ্ছেন সেটিকে একটি নির্দিষ্ট নামের ওয়ার্কবুকে মূল ওয়ার্কশীট কপি করে যা আপনি ম্যাক্রো চালানোর আগে সংরক্ষণ করেননি এবং বন্ধ করেননি। এই ধরনের একটি ম্যাক্রোর উদাহরণ নিম্নলিখিত কোডে দেখা যেতে পারে:

Sub CopySheetTest()
    Dim iTemp As Integer
    Dim oBook As Workbook
    Dim iCounter As Integer
    
    ' Create a new blank workbook:
    iTemp = Application.SheetsInNewWorkbook
    Application.SheetsInNewWorkbook = 1
    Set oBook = Application.Workbooks.Add
    Application.SheetsInNewWorkbook = iTemp
    
    ' Add a defined name to the workbook
    ' that RefersTo a range:
    oBook.Names.Add Name:="tempRange", _
        RefersTo:="=Sheet1!$A$1"
            
    ' Save the workbook:
    oBook.SaveAs "c:\test2.xls"
    
    ' Copy the sheet in a loop. Eventually,
    ' you get error 1004: Copy Method of
    ' Worksheet class failed.
    For iCounter = 1 To 275
        oBook.Worksheets(1).Copy After:=oBook.Worksheets(1)        
    Next
End Sub

যেহেতু মাইক্রোসফ্ট এক্সেলের প্রেক্ষাপটে রান-টাইম ত্রুটি 1004 এর কারণটি জানা যায়, রেজোলিউশন হিসাবে। এই সমস্যার সমাধান ছাড়াও, এটি দ্বারা প্রভাবিত ব্যবহারকারীদের কাছে যা উপলব্ধ তা হল একটি সমাধান যা সমাধানটি কাজ না করলে বা তারা একটি কার্যকর বিকল্প হিসাবে সমাধান খুঁজে না পেলে ব্যবহার করা যেতে পারে৷

সমাধান:

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

Sub CopySheetTest()
    Dim iTemp As Integer
    Dim oBook As Workbook
    Dim iCounter As Integer
    
    ' Create a new blank workbook:
    iTemp = Application.SheetsInNewWorkbook
    Application.SheetsInNewWorkbook = 1
    Set oBook = Application.Workbooks.Add
    Application.SheetsInNewWorkbook = iTemp
    
    ' Add a defined name to the workbook
    ' that RefersTo a range:
    oBook.Names.Add Name:="tempRange", _
        RefersTo:="=Sheet1!$A$1"
            
    ' Save the workbook:
    oBook.SaveAs "c:\test2.xls"
    
    ' Copy the sheet in a loop. Eventually,
    ' you get error 1004: Copy Method of
    ' Worksheet class failed.
    For iCounter = 1 To 275
        oBook.Worksheets(1).Copy After:=oBook.Worksheets(1)
        'Uncomment this code for the workaround:
        'Save, close, and reopen after every 100 iterations:
        If iCounter Mod 100 = 0 Then
            oBook.Close SaveChanges:=True
            Set oBook = Nothing
            Set oBook = Application.Workbooks.Open("c:\test2.xls")
        End If
    Next
End Sub

দ্রষ্টব্য: ওয়ার্কবুকটি সংরক্ষণ এবং বন্ধ করার আগে আপনি কতবার একটি ওয়ার্কশীট কপি করতে পারেন তার সঠিক সংখ্যা একটি কেস থেকে পরবর্তী ক্ষেত্রে পরিবর্তিত হয় কারণ এটি আপনি যে ওয়ার্কশীটটির কপি তৈরি করছেন তার আকারের উপর নির্ভর করে। পি>

ওয়ার্কআউন্ড:৷

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

1. লঞ্চ করুন Excel .
2. একটি নতুন ওয়ার্কবুক তৈরি করুন এবং মুছুন ৷ ওয়ার্কবুকের প্রতিটি ওয়ার্কশীট একটির জন্য সংরক্ষণ করে।
3. ফর্ম্যাট  ওয়ার্কবুক।
4. যেকোন পাঠ্য, ডেটা এবং/অথবা চার্টগুলিকে টেমপ্লেটে ডিফল্টরূপে যুক্ত করুন যেটি ওয়ার্কবুকটিতে এখন রয়েছে একমাত্র ওয়ার্কশীটটিতে৷
5. আপনি যদি এক্সেল 2003 বা তার আগের ব্যবহার করেন, তাহলে ফাইল -এ ক্লিক করুন> এই রূপে সংরক্ষণ করুন . আপনি যদি Excel 2007 বা তার পরে ব্যবহার করেন, অন্যদিকে, Microsoft Office -এ ক্লিক করুন বোতাম এবং তারপরে এভাবে সংরক্ষণ করুন-এ ক্লিক করুন .
6. ফাইলের নাম-এ : ক্ষেত্র, আপনি যে টেমপ্লেটটিকে কল করতে চান তা টাইপ করুন।
7. এর পাশের ড্রপডাউন মেনুটি খুলুন টাইপ হিসাবে সংরক্ষণ করুন: ক্ষেত্র এবং Excel -এ ক্লিক করুন টেমপ্লেট (.xlt) আপনি যদি এক্সেল 2003 বা তার আগে ব্যবহার করেন, অথবা Excel  ব্যবহার করেন টেমপ্লেট (.xltx) আপনি যদি এটি নির্বাচন করতে এক্সেল 2007 বা তার পরে ব্যবহার করেন।
8. সংরক্ষণ করুন-এ ক্লিক করুন .
9. একবার আপনি সফলভাবে টেমপ্লেটটি তৈরি করে ফেললে, আপনি কোডের নিম্নলিখিত লাইনটি ব্যবহার করে এটিকে প্রোগ্রাম্যাটিকভাবে সন্নিবেশ করতে পারেন:
   শীট। প্রকার যোগ করুন:=পথ শক্তিশালী> \ফাইলের নাম৷

দ্রষ্টব্য: উপরে বর্ণিত কোডের লাইনে, পাথ\ফাইলনাম আপনার তৈরি করা শীট টেমপ্লেটের অবস্থানের জন্য সম্পূর্ণ পাথ (সম্পূর্ণ ফাইলের নাম সহ) দিয়ে প্রতিস্থাপন করা প্রয়োজন।