Cum să găsiți șirul de text exact într-o coloană a foii folosind codul Excel vba (Programare, Vba, Excel)

ashish vb a intrebat.

Cum pot găsi șirul de caractere exact care se potrivește cu o anumită valoare a celulei folosind Excel VBA. De exemplu, dacă vreau să caut „userid” (numai șirul întreg) în coloana A. Sunt capabil să scriu câteva linii de cod, dar programul nu este capabil să găsească întregul cuvânt, chiar dacă scriu câteva litere din șirul care se potrivește cu întregul cuvânt. Codul este cel prezentat mai jos:

Private Sub CommandButton1_Click()
Dim Username As String, password As String
Dim FindRow1 As Range, FindRow2 As Range
Dim WB As Workbook

Username = "user"
password = "pass"
Set WB = ThisWorkbook

With WB.Sheets("Master_Data")
Set FindRow1 = .Range("A:A").Find(What:=Username, LookIn:=xlValues)
Set FindRow2 = .Range("B:B").Find(What:=password, LookIn:=xlValues)
End With
MsgBox FindRow1
MsgBox FindRow2

Aici primesc ieșire în msgbox ca userid și parolă chiar dacă trec valorile ca username = „user” și password = „pass”, ceea ce este logic greșit.

1 răspunsuri
Filogeneza

Utilizați LookAt parametru de Range.Find():

Set FindRow1 = .Range("A:A").Find(What:=username, LookIn:=xlvalues, LookAt:=xlWhole)
Set FindRow2 = .Range("B:B").Find(What:=password, LookIn:=xlvalues, LookAt:=xlWhole)

Comentarii

  • LookAt:=xlwhole funcționează pentru mine și economisește mult timp. Phylogenesis mulțumesc pentru ajutor!!!! –  > Por ashish vb.
  • @ashishvb Marcați răspunsul ca fiind soluția de lucru, dacă funcționează pentru dvs. –  > Por mielk.
  • această soluție Funcționează pentru mine . –  > Por 404 Not found.

Tags:,