कोड में लाइन ब्रेक
VBA का उपयोग करते समय, जब आपको एक साथ कई वेरिएबल्स को परिभाषित करना होता है या फ़ंक्शन के पैरामीटर को परिभाषित करना होता है, तो क्या आपको एक लंबी लाइन में कोड लिखना पड़ता है?
इस स्थिति में, यदि आप कोड को बीच में तोड़ सकते हैं, तो प्रोग्राम की पठनीयता बढ़ाई जा सकती है।
इस लेख में, हम VBA में कोड को बीच में तोड़ने के तरीके की व्याख्या करेंगे और वास्तविक प्रोग्राम और उपयोग के उदाहरण भी प्रस्तुत करेंगे।
बीच में कोड तोड़ने का तरीका
VBA में कोड को तोड़ने के लिए, कोड के बीच में स्पेस + अंडरस्कोर डालकर अगले लाइन में कोड जारी रखना संभव है।
उदाहरण के लिए, यदि आपके पास निम्नलिखित कोड है,
Sub Sample()
MsgBox "Hello, World!"
End Sub
यदि आप इसे बीच में तोड़ते हैं, तो यह इस प्रकार होगा:
Sub Sample()
MsgBox "Hello, " & _
"World!"
End Sub
उपयोग के दृश्य
फ़ंक्शन के पैरामीटर की परिभाषा
जब आप एक फ़ंक्शन को परिभाषित करते हैं, तो यदि आपको कई पैरामीटर की आवश्यकता होती है या वैकल्पिक पैरामीटर प्रदान करने होते हैं, तो कोड लंबा हो सकता है।
Public Sub SampleProcess(ByRef sheet As Worksheet, ByRef previousRange As String, Optional ByRef currentRange As String = "", Optional ByRef newRange As String = "")
'--------------
'...प्रोसेसिंग...
'--------------
End Sub
यदि आप इसे तोड़ते हैं, तो यह इस प्रकार होगा: वेरिएबल्स की संख्या और सामग्री को संरेखित किया जाता है, जिससे पठनीयता बढ़ती है।
Public Sub SampleProcess( _
ByRef sheet As Worksheet, _
ByRef previousRange As String, _
Optional ByRef currentRange As String = "", _
Optional ByRef newRange As String = "")
'--------------
'...प्रोसेसिंग...
'--------------
End Sub
जटिल IF स्टेटमेंट
जब आप IF स्टेटमेंट में जटिल शर्तें निर्दिष्ट करते हैं, तो एक लाइन लंबी हो सकती है।
Sub SampleProcess(ByVal num1 as Long, ByVal num2 as Long, ByVal num3 as Long)
Dim result As String
If num1 > 0 And num2 > 0 And num3 > 0 And num1 + num2 + num3 > 50 Then
result = "True"
Else
result = "False"
End If
MsgBox result
End Sub
यदि आप इसे तोड़ते हैं, तो यह इस प्रकार होगा: ब्रेक पॉइंट स्वतंत्र हैं, लेकिन IF स्टेटमेंट के मामले में, शर्तों के बजाय, एक निश्चित संख्या के आधार पर ब्रेक करना अधिक पठनीय हो सकता है।
Sub SampleProcess(ByVal num1 as Long, ByVal num2 as Long, ByVal num3 as Long)
Dim result As String
If num1 > 0 And num2 > 0 And _
num3 > 0 And num1 + num2 + num3 > 50 Then
result = "True"
Else
result = "False"
End If
MsgBox result
End Sub
ध्यान देने योग्य बातें
VBA में कोड को बीच में तोड़ने से पठनीयता बढ़ती है, जैसा कि पहले बताया गया है। हालांकि, बीच में तोड़ते समय निम्नलिखित बातों का ध्यान रखना चाहिए:
ब्रेक पॉइंट पर ध्यान दें
ब्रेक केवल शब्दों के बीच में किया जा सकता है
अन्यथा, यदि आप पहले बताए गए तरीके से ब्रेक करते हैं, तो अप्रत्याशित व्यवहार हो सकता है।
उदाहरण के लिए, यदि ब्रेक पॉइंट स्ट्रिंग के बीच में है, तो स्ट्रिंग बीच में कट सकती है।
इंडेंटेशन को संरेखित करें
जब आप बीच में तोड़ते हैं, तो इंडेंटेशन को संरेखित करना वांछनीय है। उदाहरण के लिए, फ़ंक्शन पैरामीटर का उदाहरण अच्छा है।
इंडेंटेशन को संरेखित करने से कोड ब्लॉक को अलग करना आसान हो जाता है और कोड की पठनीयता बढ़ती है।
कोडिंग मानकों का पालन करें
यदि कई लोग एक ही Excel फ़ाइल पर काम कर रहे हैं, तो “इस शर्त पर ब्रेक करें” जैसे कोडिंग मानकों को एकीकृत करना चाहिए।
प्रोजेक्ट में एक सुसंगत कोडिंग शैली का उपयोग करने से, आप पठनीय और रखरखाव योग्य कोड लिख सकते हैं।
इन ध्यान देने योग्य बातों को ध्यान में रखते हुए, VBA में कोड को बीच में तोड़कर पठनीयता बढ़ाएं।