VBA com a operador (exemples fàcils) | Com s'utilitza "M'agrada" a Excel VBA?

VBA com a operador

Like és un operador de VBA i aquest és un operador de comparació que compara una cadena donada com a argument en un conjunt de cadenes i coincideix amb el patró, si el patró coincideix, el resultat obtingut és cert i si el patró no coincideix, el resultat obtingut és fals, és un operador incorporat a VBA.

L'operador "LIKE" és l'operador més infrautilitzat malgrat el seu ús meravellós. No he vist molta gent que utilitzi aquest operador en la seva totalitat en la seva codificació, de fet, sóc un d’ells que no utilitza aquest operador amb molta freqüència. L'operador "VBA LIKE" ens permet fer coincidir el patró de la cadena amb la cadena completa. Utilitzant l’operador VBA LIKE podem comparar dues cadenes amb el patró donat. Podem comprovar si la cadena conté una subcadena a VBA o també si la cadena conté algun format específic. Si el patró coincideix amb la cadena, l'operador VBA LIKE retorna TRUE o bé FALSE.

Mentre coincidim les cadenes, hem d’utilitzar caràcters comodins al patró que especifiquem. A continuació es mostren els comodins que fem servir a l’operador VBA LIKE.

  • Signe d'interrogació (?): S'utilitza per fer coincidir qualsevol caràcter de la cadena. Per exemple, si tenim una cadena "CAT" i el patró és "C? T", l'operador VBA LIKE retorna TRUE. Si la cadena és "CATCH i els patrons són" C? T ", l'operador VBA LIKE retorna FALS.
  • Asterisc (*): Això coincideix amb zero o més caràcters. Per exemple, si la cadena és "Bona" i el patró és "G ** d", l'operador VBA LIKE retorna TRUE.
  • Suports ([]): Això coincideix amb qualsevol caràcter especificat entre claudàtors.
  • [Char-Char]: Això coincideix amb qualsevol caràcter del rang Char-Char.
  • [! Caràcters]: Això coincideix amb qualsevol caràcter que no estigui a la llista.
  • [! Char-Char]: Això coincideix amb qualsevol caràcter que no estigui dins del rang Char-Char.

Exemples d'operador VBA LIKE

Vegem ara alguns exemples d’operador VBA LIKE.

Podeu descarregar aquesta plantilla Excel VBA Like aquí: plantilla Excel VBA Like Excel

Exemple 1: amb signe d'interrogació

Codi:

 Sub QuestionMark_Example1 () Dim k As String k = "Bona" Si k li agrada "Vés? D" Llavors MsgBox "Sí" Altres MsgBox "No" Finalitza Si finalitza Sub 

Al codi anterior, hem proporcionat la cadena com a "Bona" i el patró és "Vés? D". Com que el signe d'interrogació pot coincidir amb un sol caràcter, es mostrarà el resultat com a "Sí".

Ara canviaré la cadena per "Bon dia".

Codi:

 Sub QuestionMark_Example1 () Dim k As String k = "Good Morning" If k Like "Go? D" Then MsgBox "Yes" Else MsgBox "No" End If End Sub 

En aquest cas, es mostrarà "No" perquè hem afegit una paraula més a la cadena, és a dir, al matí. Per fer coincidir qualsevol nombre de caràcters, hem d’utilitzar l’asterisc.

Exemple 2: amb Asterisk

Codi:

 Sub QuestionMark_Example2 () Dim k As String k = "Good Morning" If k Like "* Good *" Then MsgBox "Yes" Else MsgBox "No" End If End Sub 

A l'exemple anterior, he afegit dos asteriscs abans i després del caràcter "* Bé *". Això coincidirà amb la paraula "Bona" de la cadena "Bon dia" i es mostrarà "Sí".

Exemple 3: amb claudàtors []

Codi:

 Sub QuestionMark_Example3 () Dim k As String k = "Good Morning" If k Like "* [M] *" Then MsgBox "Yes" Else MsgBox "No" End If End Sub 

El codi anterior coincideix amb la lletra única esmentada en el claudàtor "M" i retorna el resultat com a Sí.

Exemple # 4: amb claudàtors i suports [A-Z]

Codi:

 Sub QuestionMark_Example4 () Dim k As String k = "Good Morning" If k Like "* [A-D] *" Then MsgBox "Yes" Else MsgBox "No" End If End Sub 

A l'anterior, he esmentat els personatges que coincideixen de l'A a la D.

Això retornarà "No" perquè no hi ha caràcters d'A a D a la cadena "Bon dia".

Ara canviaré el patró per [A-H]

Codi:

 Sub QuestionMark_Example4 () Dim k As String k = "Good Morning" If k Like "* [A-H] *" Then MsgBox "Yes" Else MsgBox "No" End If End Sub 

Això tornarà "Sí" perquè de A a H tenim un caràcter "G" a la cadena "Bon dia"

Així, podem utilitzar l'operador VBA "LIKE" per fer coincidir qualsevol cadena del patró amb caràcters comodins.