Check if a word exists in a list of words established in the vba code

Visor · #4 07-14-2020, 04:40 AM

I'm sorry!!

Excellent works perfect !! I am very grateful, ... But I thought I could adapt it to the way I require it, however I have not succeeded ... Actually I have three groups of verbs Low level, Medium level and High level and it does not allow me to distinguish with Elseif I thought that if I could, here I put the three verb levels

I put the code in the previous post

Podrías echarle un vistazo nuevamente??

Quote:

Originally Posted by gmaxey

Code:

Private Sub CommandButton1_Click()
Dim palabra As String
  palabra = "Calcar,Citar,Encontrar,Enumerar,Etiquetar,Fijar,Localizar,Memorizar,Mostrar,Recitar,Recordar,Relatar,Repetir,Reproducir,Señalar,Subrayar,Comentar,Describir,Determinar,Dibujar,Diferenciar,Explicar,Expresar,Generalizar,Identificar,Ilustrar,Informar,Leer,Observar,Parafrasear,Reconocer,Resumir,Revisar,Secuenciar,Sintetizar"
  If InStr(palabra, TextBox1) > 0 Then
    MsgBox "Si Existe ese verbo:" & TextBox1
  Else
    MsgBox "No Existe ese verbo:" & TextBox1
  End If
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
check for duplicates of a word within next 100 words	sylvio	Word VBA	19	06-27-2023 04:10 PM
Pass each of the rows from Excel to Word rtf in paragraphs in established order	Visor	Word VBA	5	06-30-2020 02:19 AM
How to find (highlight) two and more words in a list of 75k single words in Word 2010	Usora	Word	8	05-29-2018 03:34 AM
Check if named Content Control field exists and add missing	sylvio	Word VBA	2	08-29-2017 04:08 AM
VBA Code for Grammar Check Not Working in Word 2016	PSSMargaret	Word VBA	2	06-11-2016 10:53 PM