VBA "சமமாக இல்லை" ஆபரேட்டர் | VBA இன் படிப்படியான எடுத்துக்காட்டுகள் "சமமாக இல்லை"

VBA இல் ஒரு ஆபரேட்டர் அல்ல, இது ஒரு நிராகரிப்பு ஆபரேட்டர் என்றும் அழைக்கப்படலாம், இது ஒரு தர்க்கரீதியான செயல்பாடு, எனவே இந்த செயல்பாட்டின் மூலம் வெளியீடு உண்மை அல்லது தவறானது, சம ஆபரேட்டர் “=” இது எங்களுக்குத் தெரியும், ஆனால் இது சமமாக இல்லை “ VBA இல் எனவே சம ஆபரேட்டரிடமிருந்து நாம் பெறும் மதிப்பு எதுவாக இருந்தாலும் சமமான ஆபரேட்டரைப் பயன்படுத்தி சரியான எதிர் மதிப்பைப் பெறுவோம்.

VBA இல் “சமமாக இல்லை” ஆபரேட்டர்

வழக்கமாக, நாம் ஒரு தர்க்கரீதியான சோதனையை செய்கிறோம் “ஏதாவது மற்ற விஷயத்திற்கு சமமா இல்லையா”. சில சந்தர்ப்பங்களில், நாம் செய்ய வேண்டும் “சமத்துவமின்மை” சோதிக்கவும்.சமத்துவமின்மை சோதனை என்பது சமமான சோதனை அல்ல. பொதுவாக, எதையாவது மற்ற விஷயங்களுக்கு சமமாக இருக்கிறதா இல்லையா என்று நாங்கள் சொல்கிறோம், அது சமமாக இருந்தால் ஒருவிதமான பணியை வேறுபட்ட பணியாக இல்லாவிட்டால் செய்கிறது. இதேபோல் சமத்துவமின்மை சோதனை நாம் ஒருவித செயல்பாடு செய்ய முடியும். VBA இல் உள்ள “NOT EQUAL” என்பது சின்னங்களை விட அதிகமான மற்றும் குறைவான கலவையால் குறிக்கப்படுகிறது. இந்த இரண்டு ஆபரேட்டர்களும் இணைந்தால் அது சம அடையாளமாக மாறாது, அதாவது. “”.

எக்செல் வி.பி.ஏ-வில் எவ்வாறு வேலை செய்வது சமம்?

VBA சமமாக இல்லை ஆபரேட்டருக்கு சமமான தர்க்கத்திற்கு நேர்மாறாக செயல்படுகிறது. ஆபரேட்டருக்கு சமமானது வழங்கப்பட்ட சோதனை திருப்தி அடைந்தால் அது உண்மைக்குத் திரும்பும். எடுத்துக்காட்டாக, நீங்கள் 10 = 10 என்று சொன்னால் அது உண்மைக்கு திரும்பும், இல்லையெனில் FALSE.

மறுபுறம் “சமமாக இல்லை” எதிர் திசையில் இயங்குகிறது, எக்செல் இல் வழங்கப்பட்ட தருக்க சோதனை சமமாக இல்லாவிட்டால், அது மட்டுமே உண்மையானது அல்லது பொய்யானது.

எடுத்துக்காட்டாக, நீங்கள் 10 10 என்று சொன்னால் அது பொய்யானது, ஏனெனில் 10 10 க்கு சமம். உண்மையான முடிவைப் பெற ஒரு மதிப்பு மற்ற மதிப்புக்கு சமமாக இருக்கக்கூடாது.

எக்செல் வி.பி.ஏ.யில் சமமாக இல்லை என்பதற்கான எடுத்துக்காட்டுகள்

எக்செல் விபிஏவில் ஆபரேட்டருக்கு சமமாக இல்லை என்பதற்கான எடுத்துக்காட்டுகள் கீழே.

எடுத்துக்காட்டு # 1

நடைமுறையில் VBA Not Equal () அடையாளத்தை எவ்வாறு பயன்படுத்துவது என்பதை இப்போது பார்ப்போம். கீழே உள்ள குறியீட்டைப் பாருங்கள்.

குறியீடு:

 துணை NotEqual_Example1 () மங்கலான k சரம் k = 100 100 MsgBox k End Sub 

100 என்ற எண் 100 க்கு சமமாக இல்லையா என்பதை இங்கே சோதிக்கிறோம். நிச்சயமாக எண் 100 என்பது 100 க்கு சமம் என்று எங்களுக்குத் தெரியும், எனவே இதன் விளைவாக பொய்யானது.

இப்போது நான் சமன்பாட்டை மாற்றுவேன்.

குறியீடு:

 துணை NotEqual_Example1 () மங்கலான k சரம் k = 100 99 MsgBox k End Sub 

எண் 100 என்பது 99 க்கு சமமாக இல்லையா என்பது இப்போது சோதனை. எனவே இதன் விளைவாக உண்மை இருக்கும்.

எடுத்துக்காட்டு # 2

நிகழ்நேர எடுத்துக்காட்டுகளில் இந்த சமமான ஆபரேட்டரை எவ்வாறு பயன்படுத்துவது என்பதை இப்போது பார்ப்போம். ஆர்ப்பாட்டத்திற்காக, நான் சில தரவை உருவாக்கியுள்ளேன்.

எங்களிடம் இரண்டு மதிப்புகள் உள்ளன, “மதிப்பு 1” மற்றும் “மதிப்பு 2”.

இப்போது எனது தேவை என்னவென்றால், மதிப்பு 1 மதிப்பு 2 க்கு சமமாக இல்லாவிட்டால், எனக்கு முடிவு “வேறுபட்டது” தேவை, இல்லையெனில் “அதே” என முடிவு தேவை.

படி 1: ஒரு மாறியை ஒரு முழு எண்ணாக வரையறுக்கவும்.

குறியீடு:

 துணை NotEqual_Example2 () Dim k as Integer End Sub 

படி 2: 2 முதல் 9 வரை அடுத்த பார்வைக்கு திறக்கவும்.

குறியீடு:

 துணை NotEqual_Example2 () மங்கலான k என்பது k = 2 முதல் 9 வரை முழு எண்ணாக அடுத்த k முடிவு துணை 

படி 3: வளையத்தின் உள்ளே, மதிப்பு 1 மதிப்பு 2 க்கு சமமாக இல்லையா என்பதை நாம் சோதிக்க வேண்டும். எங்களுக்கு எங்கள் சொந்த முடிவுகள் தேவை என்பதால், நாம் IF நிபந்தனையைப் பயன்படுத்த வேண்டும்.

குறியீடு:

 துணை NotEqual_Example2 () மங்கலான k என்பது k = 2 முதல் 9 வரை கலங்கள் (k, 1) கலங்கள் (k, 2) பின்னர் கலங்கள் (k, 3). மதிப்பு = "வேறுபட்ட" மற்ற கலங்கள் (k, 3). மதிப்பு = "அதே" முடிவு என்றால் அடுத்த கே முடிவு துணை 

மதிப்பு 1 மதிப்பு 2 க்கு சமமாக இல்லையா என்பதை சோதித்தால். சமமாக இல்லாவிட்டால் அது “வேறுபட்டது”, சமமாக இருந்தால் அது “அதே” என்று திரும்பும்.

கீழே உள்ள VBA குறியீட்டை நகலெடுத்து ஒட்டலாம்.

இந்த குறியீட்டை உங்கள் தொகுதிக்கு நகலெடுத்து F5 விசையைப் பயன்படுத்தி அல்லது கைமுறையாக இயக்கவும். இது போன்ற ஒரு முடிவை இது வழங்கும்.

சமமான அடையாளத்துடன் தாள்களை மறைக்கவும் மறைக்கவும்

சமமான பாடலைப் பயன்படுத்துவதற்கான பல்வேறு வழிகள் மகத்தானவை. எங்கள் தேவைகளை பூர்த்தி செய்ய இந்த அடையாளத்தைப் பயன்படுத்தலாம்.

# 1 - ஒரு தாள் தவிர அனைத்து தாள்களையும் மறைக்கவும்

இந்த மாதிரியான சூழ்நிலையை நாம் பலமுறை பார்த்திருக்கிறோம். குறிப்பிட்ட தாளைத் தவிர அனைத்து தாள்களையும் மறைக்க வேண்டியிருந்தது.

எடுத்துக்காட்டாக, “வாடிக்கையாளர் தரவு” என்ற தாளின் பெயரைத் தவிர அனைத்து தாள்களையும் மறைக்க விரும்பினால், நீங்கள் இந்த குறியீட்டைப் பயன்படுத்தலாம்.

குறியீடு:

 ActiveWorkbook.Worksheets இல் Ws.Name "வாடிக்கையாளர் தரவு" என்றால் Ws.Visible = xlSheetVeryHidden End அடுத்த Ws முடிவுக்கு வந்தால் துணை Wide_All () மங்கலான Ws. 

குறிப்பு: பணித்தாள் பெயரை உங்கள் பணித்தாள் பெயராக மாற்றவும்.

# 2 - ஒரு தாள் தவிர அனைத்து தாள்களையும் மறைக்கவும்

இதேபோல், ஒரு தாளைத் தவிர அனைத்து தாள்களையும் நாம் மறைக்க முடியும். இதைச் செய்ய பின்வரும் குறியீட்டைப் பயன்படுத்தவும்.

குறியீடு:

 ActiveWorkbook.Worksheets இல் Ws.Name "வாடிக்கையாளர் தரவு" என்றால் Ws.Visible = xlSheetVisible End என்றால் அடுத்த Ws முடிவு துணை 

இந்த VBA ஐ எக்செல் வார்ப்புருவுக்கு சமமாக பதிவிறக்கம் செய்யலாம் - VBA சமமான ஆபரேட்டர் வார்ப்புரு அல்ல