एक्सेल में छुपी हुई शीट को कैसे कॉपी करें?
एक्सेल में, हम किसी शीट को वर्तमान या अन्य कार्यपुस्तिका में जल्दी और आसानी से स्थानांतरित और कॉपी कर सकते हैं, लेकिन क्या आपने कभी किसी छिपी हुई शीट को सक्रिय कार्यपुस्तिका में कॉपी करने का प्रयास किया है? इस लेख में, मैं आपके लिए एक विशिष्ट छिपी हुई शीट को सक्रिय एक्सेल फ़ाइल में कॉपी करने के लिए एक वीबीए कोड पेश करूंगा।
VBA कोड के साथ एक छुपी हुई वर्कशीट को सक्रिय वर्कबुक में कॉपी करें
VBA कोड के साथ एक छुपी हुई वर्कशीट को सक्रिय वर्कबुक में कॉपी करें
किसी कार्यपुस्तिका से छिपी हुई शीट की प्रतिलिपि बनाने और उसे एक नाम देने के लिए, निम्नलिखित VBA कोड आपकी मदद कर सकता है:
1. दबाए रखें ALT + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।
वीबीए कोड: एक छिपी हुई वर्कशीट को सक्रिय वर्कबुक में कॉपी करें:
Sub DupSheet()
'Updateby Extendoffice 20161109
Dim Actsheet As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Sheets("Sheet12").Visible = True
ActiveWorkbook.Sheets("Sheet12").Copy _
after:=ActiveWorkbook.Sheets("Sheet12")
ActNm = ActiveSheet.Name
ActiveSheet.Name = InputBox("Enter the name for the new sheet.")
Sheets(ActiveSheet.Name).Visible = True
ActiveWorkbook.Sheets("Sheet12").Visible = False
Application.ScreenUpdating = True
End Sub
नोट: उपरोक्त कोड में, शीट 12 यह छिपी हुई शीट है जिसे आप कॉपी करना चाहते हैं, कृपया इसे अपनी आवश्यकता के अनुसार बदलें।
3. और फिर दबाएं F5 इस कोड को चलाने के लिए कुंजी, एक प्रॉम्प्ट बॉक्स आपको छिपी हुई वर्कशीट की नई प्रतिलिपि के लिए एक नाम निर्दिष्ट करने की याद दिलाने के लिए पॉप अप होगा, स्क्रीनशॉट देखें:
4। तब दबायें OK बटन, और छिपी हुई शीट को तुरंत सक्रिय कार्यपुस्तिका में नए नाम के साथ कॉपी कर दिया गया है।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!