এক্সেল এ। কম্যান্ডটাইপ = 0 ত্রুটি সমাধান করুন

Question

আমি এক্সেলে এই ম্যাক্রোটি চালানোর চেষ্টা করছি যা কোনও ওয়েবসাইট থেকে লুপে ডেটা টানবে। আমার প্রায় 50 টি ওয়েবপৃষ্ঠা থেকে একটি টেবিল টানতে হবে এবং প্রতিটি ওয়েবসাইট থেকে ডেটা টানবে এমন ফাংশনটি চালানোর জন্য লুপ রয়েছে

Dim startYear As Integer
Dim endYear As Integer
Dim strStartYear as String

For startYear = 1942 To 2014

    ' Convert the current start year number to a string, then take the last two characters and assign to strStartYear
    ' So 1942 becomes "42".
    strStartYear = Right(CStr(startYear),2)
    ' Convert the string back into an (integer) number, and add 1 to create the End year.
    endYear = CInt(strStartYear)+1

    ' Use these variables in your other commands to specify the start/end year
    With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;http://www.whatifsports.com/nhl-l/profile_team.asp?hfid=11&season=" & startYear & "-" & endYear _
        , Destination:=Range("$A$1"))
        .CommandType = 0
        .Name = "profile_team.asp?hfid=11&season=" & startYear & "-" & endYear
        'other stuff omitted  for brevity
    End With
Next startYear

আমি যে ত্রুটি কোডটি পাচ্ছি তা হ'ল রান টাইম ত্রুটি '5' অবৈধ পদ্ধতি বা যুক্তি

এটি যে রেখাটি হাইলাইট করছে তা হ'ল ".কমেন্ডটাইপ = 0"

Comments

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

— ʜιᴇcʜιᴇ007

এছাড়াও, দয়া করে আপনার অংশটি করুন। আপনি যে ত্রুটিটি পাচ্ছেন তার বিষয়ে আপনি কী গবেষণা করেছেন? এটি সমাধানের জন্য আপনি ইতিমধ্যে কী চেষ্টা করেছেন?

— ʜιᴇcʜιᴇ007

আমার সমস্ত কোডে .কম্যান্ডটাইপ = 0 নিয়ে আমার সমস্যা হচ্ছে। আমি যখনই আমার কোডটি সম্পাদনা করার চেষ্টা করি তখন এটি কাজ করে না। আমি অনুমান করেছি যে আপনার কোডটি সম্ভবত আমার চেয়ে কম ত্রুটি করেছে তাই সমস্যাটি কী তা দেখতে সহজ হবে

— ব্যবহারকারী 3481670

আমি দেখেছি কিছু লোক ডিফল্ট, এসকিউএল বা 1 এর মধ্যে 0 পরিবর্তন করে সাফল্য

— পেয়েছে

Answer 1

কোয়েরিটেবিল.কম্যান্ডটাইপ সম্পত্তি (এক্সেল) সম্পর্কিত এমএসডিএন এন্ট্রি থেকে :

আপনি কেবলমাত্র কমান্ডটাইপ সম্পত্তি সেট করতে পারেন যদি ক্যোরি সারণি বা পিভটটেবল ক্যাশে জন্য কোয়েরি টাইপ বৈশিষ্ট্যের মান xlOLEDBQuery হয়।

আপনি একটি OLEDB ক্যোয়ারী তৈরি করছেন না তাই কোয়েরিটাইপ অন্যরকম কিছু। যেহেতু এটি অন্য কিছু, সুতরাং আপনি কমান্ডটাইপ সেট করতে পারবেন না, কেবল এটি মুছে ফেলুন।

Answer 2

আমি একই "রান টাইম ত্রুটি 5" পেয়েছিলাম " এক্সেল ইউজার ইন্টারফেসে কোয়েরি তৈরি করার সময় কোনও ওয়েব পৃষ্ঠাগুলির অনুসন্ধানের কোডটি প্রথমে ম্যাক্রো রেকর্ড করে তৈরি করা হয়েছিল। আপনি ভাববেন যে সমস্ত পরামিতি সঠিকভাবে পূরণ হয়েছে! আমি ".কমেন্ডটাইপ = 0" মন্তব্য করেছি এবং ক্যোয়ারি কাজ করে।