निषेध मैं जो रात में ऊपर काटी है लगता है मेरे कोड के साथ एक समस्या है। इसके साथ कुछ विशिष्टताएं हैं इसलिए मैं जितना विस्तार कर सकता हूं उतना विस्तार देने की कोशिश करूंगा।VBA 'सेट typelib = CreateObject ("scriptlet.typelib")' अनुमति
सवाल में फ़ाइल एक Excel कार्यपुस्तिका जिसमें से पारित कर दिया डेटा से एक xml फ़ाइल उत्पन्न करता है। फ़ाइल को खोला जाता है, आबादी और एक मैक्रो के माध्यम से बचा लिया और इस खंड ठीक चलाता है।
समस्या तब होती है .xml के लिए एक GUID बनाते समय इस दिनचर्या में,:
Function GenGUID() As String
Dim strGUID As String
Dim TypeLib As Object
Set TypeLib = CreateObject("Scriptlet.TypeLib")
strGUID = TypeLib.guid
'dump the curly brackets
strGUID = Replace(strGUID, "{", "")
strGUID = Replace(strGUID, "}", "")
strGUID = Left(strGUID, Len(strGUID) - 2)
GenGUID = strGUID
End Function
विशेष रूप से, लाइन:
Set TypeLib = CreateObject("Scriptlet.TypeLib")
यह एक "रनटाइम त्रुटि 70 निकलती है: अनुमति अस्वीकृत "।
अब, विशेषताओं।
- 4 मशीनों में से फ़ाइल की कोशिश की गई थी, यह उनमें से एक पर काम करता है।
- 'काम करने वाली मशीन' के उपयोगकर्ता ने अन्य 3 मशीनों पर फ़ाइल चलाने का प्रयास नहीं किया है।
- 3 'टूटी हुई' मशीनों में से 2 में रात भर अपडेट अपडेट किए गए थे और दूसरे ने कुछ दिनों में अपडेट इंस्टॉल नहीं किए थे। 'काम करने वाली मशीन' में फरवरी से अपडेट अपडेट नहीं हुए हैं।
- व्यवस्थापक खाते ने रातोंरात अनुमति अद्यतन को रद्द करने के लिए फ़ाइल चलाने का प्रयास किया है।
- फ़ाइल टूटी हुई मशीनों में से एक पर कल (12 जुलाई 2017) ठीक चल रही थी।
- सभी संदर्भ पुस्तकालयों की जांच की गई है और वे 'काम करने वाली मशीन' से मेल खाते हैं।
- सभी 4 मशीनों पर उपयोग में एक्सेल संस्करण 2013 प्रो है।
उपरोक्त बाहर खड़े अपडेट मुद्दा है। लेकिन, जिस मशीन को फाइल कल ठीक से चल रही थी, वह 'टूटी हुई' मशीन रात भर अपडेट नहीं हुई थी, इस पर फैसला कर रहा था।
हम सब कुछ हम के बारे में सोच सकते हैं, जवाब के लिए इंटरनेट trawling के एक बहुत कुछ के साथ की कोशिश की है। सब कुछ के साथ आ रहा है।
क्या किसी के पास कोई विचार है?
किसी भी मदद के लिए अग्रिम धन्यवाद।
यही बात आज मुझे क्या हुआ: नीचे एमएस ऑफ़िस के अन्य संस्करणों के लिए केबीएस हैं। –
मुझे यह समस्या भी है।मुझे यहां GUID पीढ़ी के लिए वैकल्पिक कोड मिला, जो scheplet.typelib का उपयोग नहीं करता है (और अद्यतन को वापस रोल करने से बचाता है): [http://www.cpearson.com/excel/CreateGUID.aspx](http:// www.cpearson.com/excel/CreateGUID.aspx) ठीक काम करने के लिए प्रकट होता है। इसका उपयोग करने का कोई कारण नहीं है? –
@AlexBloom, यह विकल्प Office 2013 – juanmah