SELECIONAR SOMENTE PARTE DO NOME NO LISTVIEW
NÃO CONSIGO SELECIONAR PARTE DO NOME DE UMA PESSOA NO LISTVIEW COMO FAÇO Jà  TENTEI DE TUDO E COM ESSES CODIGOS ABAIXO TAMBéM:
Private Sub lvFuncionario_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
Dim Verf As Boolean
Verf = False
If ColumnHeader.Text = "Nome" Then
For x = 1 To lvFuncionario.ListItems.Count
If InStr(1, lvFuncionario.ListItems.Item(x).Text, Terminal) > 0 Then
x = lvFuncionario.ListItems.Count
End If
Next
Terminal = InputBox("Enter com o Nome que Deseja Localizar", "Localizar", , ScaleWidth / 2)
If Terminal <> "" Then
Dim itmFound As ListItem
Set itmFound = lvFuncionario.FindItem(Terminal, lvwSubItem, , lvwPartial)
If itmFound Is Nothing Then
MsgBox "Não Foi Possivel Localizar o Nome", vbInformation, "Aviso"
Exit Sub
Else
itmFound.EnsureVisible
itmFound.Selected = True
End If
End If
End If
End Sub
Private Sub lvFuncionario_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
Dim Verf As Boolean
Verf = False
If ColumnHeader.Text = "Nome" Then
For x = 1 To lvFuncionario.ListItems.Count
If InStr(1, lvFuncionario.ListItems.Item(x).Text, Terminal) > 0 Then
x = lvFuncionario.ListItems.Count
End If
Next
Terminal = InputBox("Enter com o Nome que Deseja Localizar", "Localizar", , ScaleWidth / 2)
If Terminal <> "" Then
Dim itmFound As ListItem
Set itmFound = lvFuncionario.FindItem(Terminal, lvwSubItem, , lvwPartial)
If itmFound Is Nothing Then
MsgBox "Não Foi Possivel Localizar o Nome", vbInformation, "Aviso"
Exit Sub
Else
itmFound.EnsureVisible
itmFound.Selected = True
End If
End If
End If
End Sub
NINJAVB
Que parte do nome você quer localizar?
O funcionário está cadastrado num BD?
Seu ListBox é carregado com dados de um BD?
Por favor dê mais detalhes do que você está pretendendo fazer.
t+
Que parte do nome você quer localizar?
O funcionário está cadastrado num BD?
Seu ListBox é carregado com dados de um BD?
Por favor dê mais detalhes do que você está pretendendo fazer.
t+
NINJAVB
Embora você não tenha repondido a primeira pergunta: (Que parte do nome você quer localizar?), ou arricar um palpite.
Dê uma olhadinha no projetinho que postei aqui no site com o nome EXEMPLO PESQUISA FONéTICA (aproveite enquanto ainda está na atualização). Acredito que deverá te dar uma pequena idéia do troço.
Boa sorte e t+
Embora você não tenha repondido a primeira pergunta: (Que parte do nome você quer localizar?), ou arricar um palpite.
Dê uma olhadinha no projetinho que postei aqui no site com o nome EXEMPLO PESQUISA FONéTICA (aproveite enquanto ainda está na atualização). Acredito que deverá te dar uma pequena idéia do troço.
Boa sorte e t+
Tópico encerrado , respostas não são mais permitidas