वीबीए त्रुटि एक्सेल में काम नहीं कर रहा है

मुझे वीबीए के साथ ज्यादा अनुभव नहीं हुआ है, लेकिन मैं कभी-कभी इसे काम पर उपयोग करता हूं। हाल ही में, मुझे एक ऐसी समस्या का सामना करना पड़ा है जो नहीं होना चाहिए, और न तो मेरे मालिक और न ही मैं समझ सकता हूं।वीबीए त्रुटि एक्सेल में काम नहीं कर रहा है

असल में, मुद्दा यह है कि Application संपत्ति DisplayAlerts डिफ़ॉल्ट रूप से True पर सेट है और किसी कारण से बदला नहीं जा सकता है। संभवतः संबंधित यह है कि जब मैंने कोई त्रुटि मारा, तो यह हमेशा एंड | डीबग | सहायता अलर्ट प्रदर्शित करता है और कभी भी लागू त्रुटि प्रबंधन को हिट नहीं करता है।

मैं 64-बिट विंडोज 7 मशीन पर 64-बिट Office 2010 चला रहा हूं। हालांकि, मुझे विश्वास नहीं है कि यह एक मंच मुद्दा है, क्योंकि मैंने कई अलग-अलग प्लेटफार्मों, ऑपरेटिंग सिस्टम और सॉफ्टवेयर क्रमपरिवर्तनों पर परीक्षण किया है और किसी अन्य मशीन में यह त्रुटि नहीं है; सिर्फ मेरा।

मैंने किसी नमूने कोड को बनाया है या किसी भी विचार के मामले में मैंने कुछ नमूना कोड बनाया है। केवल एक चीज जिसे मैं सोच सकता हूं, यह है कि मेरे पास मेरी मशीन पर कुछ स्थापित है जो इसका कारण बन रहा है। लेकिन एक कार्यक्रम के बाद और कई पुनरारंभ करने के बाद, मैं यह समझने के करीब नहीं हूं कि यह क्या हो सकता है।

Public Sub TestErrorHandler() 

    ' Suppress alerts 
    Application.DisplayAlerts = False 

    Dim strArray(1) As String 
    strArray(0) = "Hello" 
    strArray(1) = "World" 

    ' Set up error handler 
    On Error GoTo ErrHandler 

    For i = 0 To 3 
     MsgBox strArray(i) 
    Next 

    ' Strip the error handler 
    On Error GoTo 0 

    ' Unsuppress alerts 
    Application.DisplayAlerts = True 

    Exit Sub 

    ErrHandler: 

    MsgBox "Error: " & Err.Description 

    Resume Next 

End Sub

त्रुटि (एकदम सही ढंग से) for-loop के तीसरे गणन पर फेंक दिया है। त्रुटि का प्रकार अप्रासंगिक है, प्रासंगिक क्या है कि मुझे त्रुटि मिलती है और कभी भी त्रुटि हैंडलर को हिट नहीं करती है।

इस पर कोई सुझाव या सहायता की सराहना की जाएगी।

बहुत धन्यवाद!

स्रोत

2010-08-09 Samuel Slade