एक्सेल वर्कशीट में अवांछित पंक्तियों और स्तंभों को कैसे हटाएं
( यह पहली नज़र के रूप में लंबे समय तक नहीं लग सकता है और यह सुरक्षित है!)
नीचे दी गई प्रक्रिया में दो शीट निर्दिष्ट हैं।
चलो अपनी मूल शीट को कॉल करते हैं YourOriginalSheet(यह आपकी मूल शीट का वास्तविक नाम दर्शाता है )।
चलो दूसरी शीट को कॉल करते हैं ShortSheet, जिसमें केवल प्रासंगिक कोशिकाओं की एक प्रति होगी।
(1) में YourOriginalSheet, Selectऔर Copyसंबंधित कोशिकाओं की सीमा (अभी तक कहीं भी पेस्ट नहीं करें)।
(2) नाम की एक नई शीट जोड़ें ShortSheet, कर्सर को कॉपी किए जा रहे रेंज के ऊपरी-बाएँ-कोने के प्रतिनिधित्व वाले सेल में डालें (शायद A1), और इस तरह पेस्ट करें:
(2a) Paste Special...> Formulas[ऊपरी-बाएँ-कोने के सेल पर राइट-क्लिक करें]
(2 बी) Paste Special...>Values
(2 सी) Paste Special...>Formats
(2 डी) Paste Special...>Column Widths
(2e) अन्य Paste Specialविकल्पों को शामिल करें जो आपको लगता है कि शीट को बेहतर बनाने में मदद कर सकते हैं।
(3) यह सुनिश्चित करने के लिए कि यह सभी प्रासंगिक डेटा शामिल है Ctrl-Shift-End, निचले-दाएं कोने को खोजने के लिए दबाएं ।ShortSheet
(4) Saveकार्यपुस्तिका। ( Save As ...यदि आप बैकअप चाहते हैं तो एक नई फ़ाइल।)
(5) हटाएं YourOriginalSheet(संबंधित डेटा वर्तमान में सहेजा गया है ShortSheet।)
(६) ShortSheetअपनी मूल शीट के वास्तविक नाम का नाम बदलें ’।
वर्कबुक को बहुत छोटा बनाने के अलावा कुछ भी नहीं बदला है, इसलिए सभी मैक्रोज़, इस वर्कशीट के बाहरी संदर्भ आदि को अभी भी काम करना चाहिए।
यहाँ macro(2) में चरणों को पूरा करना है।
Sub pasteSpecialAll()
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End Sub
मैक्रो, Select और Copy प्रासंगिक रेंज का उपयोग करने से पहले , जैसा कि चरण (1) में किया गया था।
मैंने अपनी मैक्रो को अपनी Personal.xlsbकार्यपुस्तिका में भविष्य में उपयोग करने के लिए हर जगह सहेजा और Ctrl + Shift + Vइसे कीपर सौंपा ।