अन्य शीट सेल का संदर्भ देते समय सेल फ़ॉर्मेटिंग कैसे रखें?
आम तौर पर, सेल अन्य सेल को संदर्भित करते समय केवल सेल मान रखता है, लेकिन इस आलेख में, मैं किसी अन्य सेल को संदर्भित करते समय सेल मान और फ़ॉर्मेटिंग को बनाए रखने के लिए एक वीबीए कोड पेश करता हूं, और सेल मान और फ़ॉर्मेटिंग नीचे दिए गए अनुसार संदर्भ सेल में परिवर्तन के रूप में बदलता है। स्क्रीनशॉट दिखाया गया.
VBA के साथ किसी अन्य सेल को संदर्भित करते समय सेल फ़ॉर्मेटिंग रखें
VBA के साथ किसी अन्य सेल को संदर्भित करते समय सेल फ़ॉर्मेटिंग रखें
इस कार्य को संभालने के लिए, आपको बस नीचे दिए गए कोड को चलाने की आवश्यकता है।
1. आपके द्वारा उपयोग की जाने वाली कार्यपुस्तिका को सक्षम करें, दबाएँ ऑल्ट + F11 सक्षम करने की कुंजी अनुप्रयोग के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, और शीट नाम पर डबल क्लिक करें जिसमें आप संदर्भ सेल रखेंगे परियोजना-वीबीएपरियोजना रिक्त स्क्रिप्ट दिखाने के लिए फलक। इस मामले में, मैं सेल का उल्लेख करना चाहता हूं A1 में Sheet1. स्क्रीनशॉट देखें:
2. नीचे दिए गए कोड को स्क्रिप्ट में चिपकाएँ, और VBA कोड में, अपनी आवश्यकतानुसार सेल संदर्भ निर्दिष्ट करें।
वीबीए: किसी अन्य सेल को संदर्भित करते समय फ़ॉर्मेटिंग और मान रखें
Private Sub Worksheet_Activate()
'UpdatebyExtendoffice20101024
Application.EnableEvents = True
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count > 1 Or Target.Value = "" Then Exit Sub
Application.EnableEvents = False
If Not Intersect(Target, Range("A1")) Is Nothing Then 'Range("A1") the reference cell
Target.Copy
ActiveWorkbook.Sheets("Sheet2").Range("B1").PasteSpecial xlPasteAllUsingSourceTheme
'Range("B1")the cell linked to reference cell,ActiveWorkbook.Sheets("Sheet2")the sheet which contains linked cell
Application.CutCopyMode = False
Target.Select
End If
Application.EnableEvents = True
End Subनोट: A1 संदर्भ कक्ष है, B1 in शीट 2 वह सेल है जिसे आप संदर्भ सेल से लिंक करना चाहते हैं और Shee1 में A1 के साथ मान और फ़ॉर्मेटिंग रखना चाहते हैं।
फिर जब आप शीट1 में सेल A1 में मान या फ़ॉर्मेटिंग बदलते हैं, तो संदर्भ सेल पर दो बार क्लिक करने पर शीट1 में सेल B2 बदल जाएगा।
रंग के अनुसार गिनती करें
|
| कुछ मामलों में, आपके पास कई रंगों के साथ कैल्यूज़ की एक श्रृंखला हो सकती है, और आप जो चाहते हैं वह एक ही रंग के आधार पर मानों की गणना/योग करना है, आप जल्दी से गणना कैसे कर सकते हैं? - एक्सेल के लिए कुटूल's रंग के अनुसार गिनती करें, आप रंग के आधार पर कई गणनाएँ शीघ्रता से कर सकते हैं, और परिकलित परिणाम की एक रिपोर्ट भी तैयार कर सकते हैं। |
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
