वीबीए का उपयोग करके एक्सेल में एक्सेस डेटा निर्यात करें (छवियों और कोड के साथ)
यह क्या है?
यह VBA कोड आपको डेटा निर्यात करने में मदद करता है पहुँच एक क्लिक में एक्सेल की तालिका।
क्यों यह है?
You can upload or export Access data to Excel without even opening the Excel Workbook.
एक्सेल में एक्सेस डेटा कैसे निर्यात करें
स्टेप 1: Open the Access DB and got to VBA code builder (Alt + F11) and Open a New Module.
चरण दो: इसमें नीचे दिए गए कोड को कॉपी करके पेस्ट करें।
सब एक्सपोर्टToXl() ऑन एरर GoTo ErrorHandler Dim dbTable As String Dim xlWorkSheetPath As String xlWorkSheetPath = "C:\" 'xlWorkbook पथ का उल्लेख करें xlWorkSheetPath = xlWorkSheetPath & "xlWorkbookName.xlsx" ''xlWorkbookName.xlsx' को अपनी कार्यपुस्तिका नाम dbTable से बदलें = "tblMaster" 'tblMaster' को एक्सेस DB में उस तालिका से बदलें, जहां से आप डेटा निर्यात करना चाहते हैं DoCmd.TransferSpreadशीट ट्रांसफरटाइप:=acExport, स्प्रेडशीटटाइप:=acस्प्रेडशीटटाइपExcel12, टेबलनाम:=dbTable, फ़ाइलनाम:=xlवर्कशीटपाथ, hasfieldnames:= सही ErrorHandlerExit: सब से बाहर निकलें ErrorHandler: MsgBox "त्रुटि संख्या: " और त्रुटि संख्या और "; विवरण: " और त्रुटि विवरण फिर से शुरू करें ErrorHandlerExit अंत उप
चरण 3: रन बटन या F5 या कमांड बटन पर क्लिक करें जिससे आपने यह कोड संबद्ध किया है!
यदि आप कमांड बटन पर कोड निर्दिष्ट कर रहे हैं तो सुनिश्चित करें कि कोड निजी/सार्वजनिक Sub_Event() के भीतर है; नीचे जैसा कुछ
निजी उप निर्यातToXl_Click()
एक्सेस डीबी रिकॉर्ड एक्सेल में सफलतापूर्वक अपलोड कर दिए गए हैं, अपनी एक्सेल वर्कबुक खोलें और डेटा की जांच करें।
टिप्पणी: सुनिश्चित करें कि 'Microsoft ActiveX डेटा ऑब्जेक्ट लाइब्रेरी' सक्षम है औजार – संदर्भ (नवीनतम संस्करण का उपयोग करें [इस पोस्ट के अनुसार 6.1])।
मुझे यकीन है कि आप बहुत सारे एक्सेल डेटा, एमएस एक्सेस और वीबीए पर काम करते हैं, इसलिए मैं दृढ़ता से आपको एक्सेस डेटाबेस के साथ नीचे दिए गए अल्टीमेट एक्सेल वीबीए यूजरफॉर्म से जुड़ने की सलाह देते हैं! यह अपने आप में एक सार्थक निवेश है! अभी करो!
अपना खुद का रियल वर्ल्ड प्रोग्राम बनाएं, रियल एक्सेल वीबीए (मैक्रोज़) सीखें, संपूर्ण प्रोजेक्ट के साथ एक्सेल की सीमाओं को पार करें
3 प्रतिक्रियाएं
वीबीए कोड के लिए धन्यवाद. लेकिन इसने एक बार काम किया. मुझे निम्न त्रुटि मिल रही है "त्रुटि संख्या। 3027. अद्यतन नहीं किया जा सकता. डेटाबेस या ऑब्जेक्ट केवल पढ़ा जाता है
मैं स्प्रैडशीट में मासिक रूप से जोड़ना चाहता हूं। डेटा को विशिष्ट प्रारूप में जाना होगा. मैंने सोचा कि एक कमांड है जिसमें पंक्ति/स्तंभ तर्क हैं। एक बार सेल एड्रेस को स्टेप करते हुए रिकॉर्ड के माध्यम से लूप करने के लिए एक कार्यक्षेत्र का उपयोग किया गया। क्या मैं सपना देख रहा था? धन्यवाद