Нот Екуал је оператор у ВБА који се такође може назвати негационим оператором, то је логична функција, тако да је излаз који враћа ова функција истинит или нетачан, знамо да је једнаки оператор „=“ ово, али не и једнако „ ”У ВБА, па без обзира на вредност коју добијемо од једнаког оператора, добићемо потпуно супротну вредност користећи оператор Неједнако.
Оператор „Није једнак“ у ВБА
Обично радимо логички тест „да ли је нешто једнако осталим стварима или не.“ У неким случајевима морамо да урадимо и тест „неједнакости“ . Тест неједнакости није ништа друго до није једнак тест. Генерално, кажемо ако је нешто једнако другој ствари или не, ако је једнако, извршава неку врсту задатка, ако не и другачији задатак. Слично томе, користећи тест неједнакости такође можемо извршити неку врсту операције. „НИЈЕ ЈЕДНАКО“ у ВБА представља комбинацију већих и мањих симбола. Ако се оба ова оператора комбинују, онда то постаје неједнаки симбол, тј. „.“
Како није једнако раду у Екцел ВБА?
ВБА Не једнак ради тачно супротно логици једнак оператору. Једнако оператеру враћа ТРУЕ ако је испоручени тест задовољан није, вратиће ФАЛСЕ. На пример, ако кажете 10 = 10, вратиће се ТРУЕ или ФАЛСЕ.
С друге стране, „Није једнако“ делује у супротном смеру. Ако испоручени логички тест у екцелу није једнак, тада ће вратити само ТРУЕ или ФАЛСЕ.
На пример, ако кажете 10 10, вратиће ФАЛСЕ јер је 10 једнако 10. Да бисте добили ИСТИНИТИ резултат, једна вредност не би требало да буде једнака другој вредности.
Примери који нису једнаки као у Екцел ВБА
Испод су примери који нису једнаки оператору у програму Екцел ВБА.
Пример # 1
Сада ћемо видети како практично да користимо знак ВБА Нот Екуал (). Погледајте доњи део кода.
Шифра:
Суб НотЕкуал_Екампле1 () Дим к Ас Стринг к = 100 100 МсгБок к Енд Суб
Овде тестирамо да ли број 100 није једнак броју 100. Сигурно знамо да је број 100 једнак 100, па ће резултат бити ФАЛСЕ.
Сада ћу променити једначину.
Шифра:
Суб НотЕкуал_Екампле1 () Дим к Ас Стринг к = 100 99 МсгБок к Енд Суб
Сада је тест да ли број 100 није једнак 99. Дакле, резултат ће бити ТАЧАН.
Пример # 2
Сада ћемо видети како да користимо овај неједнаки оператор у примерима у реалном времену. За демонстрацију сам створио неке податке.
Имамо две вредности, „Вредност 1“ и „Вредност 2“.
Сада је мој захтев ако вредност 1 није једнака вредности 2, онда ми је потребан резултат „Различит“, или ми је потребан резултат као „исти“.
Корак 1: Дефинишите променљиву као целобројно.
Шифра:
Суб НотЕкуал_Екампле2 () Дим к Ас Интегер Енд Суб
Корак 2: Отворите ФОР НЕКСТ ЛООП од 2 до 9.
Шифра:
Суб НотЕкуал_Екампле2 () Дим к као целобројно за к = 2 до 9 Следеће к Крај Суб
Корак 3: Унутар петље морамо да тестирамо да ли вредност 1 није једнака вредности 2. Пошто су нам потребни сопствени резултати, морамо да користимо ИФ Цондитион.
Шифра:
Суб НотЕкуал_Екампле2 () Дим к као цео број за к = 2 до 9 Ако су ћелије (к, 1) ћелије (к, 2) Затим ћелије (к, 3) .Валуе = "Различите" остале ћелије (к, 3) .Валуе = „Исти“ Крај ако је следећи к Крај Суб
Претпоставимо да услов тестира да ли вредност 1 није једнака вредности 2 или не. Ако није једнако, вратиће се „Другачије“. Ако је једнако, вратиће „Исто“.
Можете да копирате и налепите доле наведени ВБА код.
Копирајте овај код у свој модул и покрените помоћу тастера Ф5 или ручно. Ово ће вратити овакав резултат.
Сакриј и откриј листове са предзнаком који није једнак
Различити начини коришћења неједнаког синга су огромни. Овај знак можемо користити за испуњавање својих потреба.
# 1 - Сакриј све листове осим једног листа
Много пута смо видели овакву ситуацију. Морали смо да сакријемо све табаке, осим одређеног.
На пример, ако желите да сакријете све листове осим назива листа „Подаци купца“, онда можете да користите овај код.
Шифра:
Суб Хиде_Алл () Затамни В као радни лист за сваки Вс у АцтивеВоркбоок.Ворксхеетс Ако Вс.Наме "Подаци о купцу" Тада Вс.Висибле = клСхеетВериХидден Енд Иф Нект Вс Енд Суб
# 2 - Откриј све листове осим једног листа
Слично томе, такође можемо открити све листове осим једног листа. За то користите доњи код.
Шифра:
Суб Унхиде_Алл () Затамни В као радни лист за сваки В у АцтивеВоркбоок.Ворксхеетс Иф Вс.Наме "Цустомер Дата" Онда Вс.Висибле = клСхеетВисибле Енд Иф Нект Вс Енд Суб
Овде можете преузети овај предложак ВБА није једнако Екцел-у - ВБА није једнако оперативни образац.
