बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा कैसे आयात/कॉपी करें?
हमारे लिए किसी खुली हुई वर्कशीट से डेटा कॉपी करना और उसे दूसरी खुली हुई वर्कबुक में पेस्ट करना आसान है, लेकिन, क्या आपने कभी किसी बंद वर्कबुक से डेटा को खुली हुई वर्कबुक में आयात करने का प्रयास किया है? इस लेख में, मैं एक बंद कार्यपुस्तिका से डेटा आयात करने के तरीके के बारे में बात करूंगा।
VBA कोड के साथ बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
एक्सेल के लिए कुटूल के साथ बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
VBA कोड के साथ बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
निम्नलिखित वीबीए कोड आपको किसी कार्यपुस्तिका से डेटा को सक्रिय खुली कार्यपुस्तिका में खोले बिना कॉपी करने में मदद कर सकता है, कृपया निम्नलिखित चरणों का पालन करें:
1. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.
वीबीए कोड: बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
Sub ImportDatafromcloseworkbook()
'Updateby Extendoffice
Dim xWb As Workbook
Dim xAddWb As Workbook
Dim xRng1 As Range
Dim xRng2 As Range
Set xWb = Application.ActiveWorkbook
xTitleId = "KutoolsforExcel"
With Application.FileDialog(msoFileDialogOpen)
.Filters.Clear
.Filters.Add "Excel 2007-13", "*.xlsx; *.xlsm; *.xlsa"
.AllowMultiSelect = False
.Show
If .SelectedItems.Count > 0 Then
Application.Workbooks.Open .SelectedItems(1)
Set xAddWb = Application.ActiveWorkbook
Set xRng1 = Application.InputBox(prompt:="Select source range", Title:=xTitleId, Default:="A1", Type:=8)
xWb.Activate
Set xRng2 = Application.InputBox(prompt:="Select destination cell", Title:=xTitleId, Default:="A1", Type:=8)
xRng1.Copy xRng2
xRng2.CurrentRegion.EntireColumn.AutoFit
xAddWb.Close False
End If
End With
End Sub
3। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और में फ़ाइल खोलें विंडो, उस कार्यपुस्तिका का चयन करें जिसका डेटा आप आयात करना चाहते हैं, स्क्रीनशॉट देखें:
4। तब दबायें प्रारंभिक बटन, और KutoolsforExcel डायलॉग बॉक्स आपको डेटा की एक श्रृंखला का चयन करने की याद दिलाने के लिए पॉप आउट होता है जिसे आप अन्य कार्यपुस्तिका में आयात करना चाहते हैं, स्क्रीनशॉट देखें:
5. और फिर क्लिक करें OK बटन, पॉप आउट डायलॉग बॉक्स में, उस सेल का चयन करें जहां आप डेटा डालना चाहते हैं, स्क्रीनशॉट देखें:
6. और क्लिक करें OK, बंद कार्यपुस्तिका में डेटा को वर्तमान कार्यपुस्तिका में आयात किया गया है।
एक्सेल के लिए कुटूल के साथ बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
वीबीए कोड हमारे एक्सेल शुरुआती के लिए कुछ हद तक कठिन हो सकता है, इसलिए, यहां, मैं आपको एक उपयोगी टूल सुझाऊंगा-एक्सेल के लिए कुटूल, के साथ अपने कर्सर पर फ़ाइल डालें सुविधा, आप किसी बंद कार्यपुस्तिका से कार्यपत्रक की संपूर्ण सामग्री को जल्दी और आसानी से सम्मिलित कर सकते हैं।
एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क. |
स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया निम्नानुसार करें:
1. क्लिक करें कुटूल्स प्लस > आयात निर्यात > कर्सर पर फ़ाइल डालें, स्क्रीनशॉट देखें:
2. में कर्सर पर फ़ाइल डालें संवाद बॉक्स में, निम्नलिखित कार्य करें:
(1.) क्लिक करें उस सेल का चयन करने के लिए बटन जहां आप आयातित डेटा रखना चाहते हैं;
(2.) क्लिक करें उस कार्यपुस्तिका का चयन करने के लिए बटन जिसका आप डेटा आयात करना चाहते हैं।
नोट: केवल मान (कोई सूत्र नहीं): यदि आप इस विकल्प को चेक करते हैं, तो केवल मूल्य आयात किया जाएगा, और सूत्र आयात नहीं किए जाएंगे।
फ़ॉर्मेटिंग स्थानांतरित न करें: इस विकल्प को चेक करने से डेटा बिना फ़ॉर्मेट किए वर्कशीट में आयात हो जाएगा।
अभी एक्सेल के लिए कुटूल डाउनलोड करें और निःशुल्क परीक्षण करें!
3। तब दबायें OK, यदि कार्यपुस्तिका में एक से अधिक कार्यपत्रक हैं, a एक वर्कशीट चुनें डायलॉग बॉक्स खुलेगा, कृपया एक वर्कशीट निर्दिष्ट करें जिसमें आप डेटा आयात करना चाहते हैं, स्क्रीनशॉट देखें:
4। और फिर क्लिक करें OK बटन, चयनित वर्कशीट में डेटा को वर्तमान वर्कबुक में आयात किया गया है।
कर्सर पर फ़ाइल सम्मिलित करें सुविधा के बारे में अधिक विवरण जानने के लिए क्लिक करें।
एक्सेल के लिए कुटूल अभी डाउनलोड करें और निःशुल्क परीक्षण करें!
डेमो: एक्सेल के लिए कुटूल के साथ बंद कार्यपुस्तिका से वर्तमान कार्यपुस्तिका में डेटा आयात करें
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!