एक्सेल में सेल में चेकबॉक्स को ऑटो-सेंटर कैसे करें?
एक्सेल में सेल में चेक बॉक्स डालते समय, आप देख सकते हैं कि सभी चेकबॉक्स को व्यवस्थित रूप से व्यवस्थित करना कठिन है जैसा कि बाएं स्क्रीनशॉट में दिखाया गया है। दरअसल, आप सभी चेक बॉक्स को साफ-सुथरे ढंग से व्यवस्थित रखने के लिए उन्हें सेल सेंटर में ले जा सकते हैं। इस लेख में दी गई विधि आपकी मदद कर सकती है।
वीबीए कोड के साथ सेल में ऑटो-सेंटर चेकबॉक्स
वीबीए कोड के साथ सेल में ऑटो-सेंटर चेकबॉक्स
वर्तमान वर्कशीट में सभी चेकबॉक्स को स्वचालित रूप से कक्षों में केन्द्रित करने के लिए, कृपया निम्नानुसार कार्य करें।
1. वर्कशीट में, आपको सभी चेकबॉक्स को ऑटो-सेंटर में दबाना होगा ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया क्लिक करें सम्मिलित करें > मॉड्यूल. फिर VBA कोड को कॉपी करके कोड विंडो में पेस्ट करें।
VBA कोड: स्वचालित रूप से सभी चेकबॉक्स को कक्षों में केन्द्रित करें
Sub CenterCheckbox ()
Dim xRg As Range
Dim chkBox As OLEObject
Dim chkFBox As CheckBox
On Error Resume Next
Application.ScreenUpdating = False
For Each chkBox In ActiveSheet.OLEObjects
If TypeName(chkBox.Object) = "CheckBox" Then
Set xRg = chkBox.TopLeftCell
chkBox.Width = xRg.Width * 2 / 3
chkBox.Height = xRg.Height
chkBox.Left = xRg.Left + (xRg.Width - chkBox.Width) / 2
chkBox.Top = xRg.Top + (xRg.Height - chkBox.Height) / 2
End If
Next
For Each chkFBox In ActiveSheet.CheckBoxes
Set xRg = chkFBox.TopLeftCell
chkFBox.Width = xRg.Width * 2 / 3
chkFBox.Height = xRg.Height
chkFBox.Left = xRg.Left + (xRg.Width - chkFBox.Width) / 2
chkFBox.Top = xRg.Top + (xRg.Height - chkFBox.Height) / 2
Next
Application.ScreenUpdating = True
End Sub
3। दबाएं F5 चाबी। फिर नीचे दिखाए गए स्क्रीनशॉट के अनुसार सभी चेकबॉक्स को तुरंत कोशिकाओं के केंद्र में ले जाया जाता है।
नोट: यह वीबीए कोड चेकबॉक्स (एक्टिवएक्स कंट्रोल) और चेकबॉक्स (फॉर्म कंट्रोल) दोनों पर लागू किया जा सकता है।
सुझाव: यदि आप एक चयनित श्रेणी में एक साथ कई चेक बॉक्स सम्मिलित करना चाहते हैं, तो आप प्रयास कर सकते हैं बैच इंसर्ट चेक बॉक्स उपयोगिता पीएफ एक्सेल के लिए कुटूल. या बैच के साथ एकाधिक विकल्प बटन डालें बैच सम्मिलित करें विकल्प बटन उपयोगिता। इसके अलावा, आप सभी चेक बॉक्स को एक साथ हटा सकते हैं बैच हटाएँ चेक बॉक्स नीचे दिखाए गए स्क्रीनशॉट के अनुसार उपयोगिता। आप जा सकते हैं 30 दिनों में बिना किसी सीमा के सॉफ्टवेयर मुफ्त डाउनलोड करें.
संबंधित आलेख:
- एक्सेल में एकाधिक चेकबॉक्स के साथ ड्रॉप डाउन सूची कैसे बनाएं?
- Excel में चेकबॉक्स चेक होने पर निर्दिष्ट सेल मान या रंग कैसे बदलें?
- Excel में चेकबॉक्स के साथ सेल या पंक्ति को कैसे हाइलाइट करें?
- एक्सेल में सेल वैल्यू के आधार पर चेकबॉक्स को कैसे चेक करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!