photosdematures.com

Ang Not Equal ay isang operator sa VBA na maaari ring termed bilang isang negation operator, ito ay isang lohikal na pagpapaandar kaya ang output na ibinalik ng pagpapaandar na ito ay alinman sa totoo o mali, alam namin na ang pantay na operator ay "=" ito ngunit hindi pantay ay " ”Sa VBA kaya't anuman ang halagang makukuha natin mula sa pantay na operator makakakuha tayo ng eksaktong kabaligtaran na halaga gamit ang Hindi Pantay na operator.

"Hindi Pantay" na Operator sa VBA

Karaniwan, gumagawa kami ng isang lohikal na pagsubok na "kung ang isang bagay ay katumbas ng iba pang bagay o hindi". Sa ilang mga kaso, kailangan nating gawin ang "Hindi pagkakapantay-pantay" subukan din.Hindi pagkakapantay-pantay Ang pagsubok ay wala ngunit hindi pantay na pagsubok. Pangkalahatan, sinasabi namin kung ang isang bagay ay katumbas ng iba pang bagay o hindi, kung ito ay pantay na gumaganap ng ilang uri ng gawain kung hindi magkakaibang gawain. Katulad din ng paggamit ng Hindi pagkakapantay-pantay pagsubok din maaari naming gawin ang ilang mga uri ng operasyon. Ang "HINDI Pantay" sa VBA ay kinakatawan ng kumbinasyon ng mas malaki sa at mas mababa sa mga simbolo. Kung ang parehong mga operator ay pinagsama pagkatapos ito ay magiging hindi pantay na simbolo ibig sabihin “”.

Paano Hindi Katumbas sa Mga Trabaho sa Excel VBA?

Ang VBA Hindi pantay na gumagana ay eksaktong katapat ng lohika ng katumbas ng operator. Katumbas ng operator ay nagbabalik TRUE kung nasiyahan ang ibinigay na pagsubok ay hindi ito babalik ng MALI. Halimbawa, kung sasabihin mong 10 = 10 babalik ito ng TOTOO o kung hindi man ang MALI.

Sa kabilang panig ay gumagana ang "Not Equal" sa kabaligtaran na direksyon, kung ang naibigay na lohikal na pagsubok sa excel ay hindi pantay-pantay sa gayon ay babalik lamang ito ng TOTOO o kung hindi man ang MALI.

Halimbawa, kung sasabihin mong 10 10 babalik ito ng MALI sapagkat ang 10 ay katumbas ng 10. Upang makuha ang TUNAY na resulta ang isang halaga ay hindi dapat katumbas ng ibang halaga.

Mga halimbawa ng Hindi Katumbas sa Excel VBA

Nasa ibaba ang mga halimbawa ng hindi katumbas ng operator sa Excel VBA.

Halimbawa # 1

Ngayon ay makikita natin kung paano gamitin ang VBA Not Equal () na mag-sign ng praktikal. Tingnan ang piraso ng code sa ibaba.

Code:

 Sub NotEqual_Example1 () Dim k Bilang String k = 100 100 MsgBox k End Sub 

Narito namin sinusubukan kung ang bilang 100 ay hindi katumbas ng numero 100. Para bang alam naming ang bilang 100 ay katumbas ng 100, kaya't ang resulta ay MALI.

Ngayon babaguhin ko ang equation.

Code:

 Sub NotEqual_Example1 () Dim k Bilang String k = 100 99 MsgBox k End Sub 

Ngayon ang pagsubok ay kung ang bilang 100 ay hindi katumbas ng 99. Kaya't ang resulta ay magiging TUNAY.

Halimbawa # 2

Ngayon makikita natin kung paano gamitin ang hindi pantay na operator na ito sa mga halimbawa ng real-time. Para sa pagpapakita, lumikha ako ng ilang data.

Mayroon kaming dalawang halaga, "Halaga 1" at "Halaga 2".

Ngayon ang aking kinakailangan ay kung ang Halaga 1 ay hindi katumbas ng Halaga 2 pagkatapos ay kailangan ko ang resulta bilang "Iba't ibang" o kung hindi man kailangan ko ang resulta bilang "Pareho".

Hakbang 1: Tukuyin ang isang variable bilang isang Integer.

Code:

 Sub NotEqual_Example2 () Dim k Bilang Integer End Sub 

Hakbang 2: Buksan PARA SA SUSUNOD NA LOOP mula 2 hanggang 9.

Code:

 Sub NotEqual_Example2 () Dim k Bilang Integer Para sa k = 2 hanggang 9 Susunod k End Sub 

Hakbang 3: Sa loob ng loop, kailangan nating subukan kung ang halagang 1 ay hindi katumbas ng halagang 2. Dahil kailangan namin ng aming sariling mga resulta kailangan naming gamitin ang Kundisyon ng IF.

Code:

 Sub NotEqual_Example2 () Dim k Bilang Integer Para sa k = 2 hanggang 9 Kung Mga Cell (k, 1) Mga Cell (k, 2) Pagkatapos Mga Cell (k, 3). Halaga = "Iba't Ibang" Mga Iba Pang Cell (k, 3). Halaga = "Same" End Kung Susunod k End Sub 

Kung susubukan ng kundisyon kung ang halagang 1 ay hindi katumbas ng halagang 2 o hindi. Kung hindi pantay ibabalik nito ang "Iba't Ibang", kung pantay ibabalik nito ang "Pareho".

Maaari mong kopyahin at i-paste ang sa ibaba VBA code.

Kopyahin ang code na ito sa iyong module at patakbuhin ang paggamit ng F5 key o manu-mano. Magbabalik ito ng isang resulta tulad nito.

Itago at Itago ang Mga Sheet na Walang Pantay na Pag-sign

Ang iba't ibang mga paraan ng paggamit ng hindi pantay na pag-awit ay napakalaking. Maaari naming gamitin ang karatulang ito upang matupad ang aming mga pangangailangan.

# 1 - Itago ang Lahat ng Sheet maliban sa Isang Sheet

Nakita natin ang ganitong uri ng sitwasyon ng maraming beses. Kailangan naming itago ang lahat ng mga sheet maliban sa partikular na sheet.

Halimbawa, kung nais mong itago ang lahat ng mga sheet maliban sa pangalan ng sheet na "Data ng Customer" pagkatapos ay maaari mong gamitin ang code na ito.

Code:

 Sub Hide_All () Dim Ws Bilang Worksheet Para sa bawat Ws Sa ActiveWorkbook. Mga Worksheet Kung Ws.Name na "Data ng Customer" Pagkatapos Ws.Visible = xlSheetVeryHidden End Kung Susunod Ws End Sub 

# 2 - Itago ang Lahat ng Sheet maliban sa Isang Sheet

Katulad nito, maaari din nating ilabas ang lahat ng mga sheet maliban sa isang sheet. Gamitin ang code sa ibaba upang magawa ito.

Code:

 Sub Unhide_All () Dim Ws Bilang Worksheet Para sa bawat Ws Sa ActiveWorkbook. Mga Worksheet Kung Ws.Name "Data ng Customer" Pagkatapos Ws.Visible = xlSheetVisible End Kung Susunod Ws End Sub 

Maaari mong i-download ang template na VBA Not Equal to Excel na ito - VBA Not Equal Operator Template