各位老師好。請幫我看怎么改代碼。我把問題描述一下：當單擊‘單擊查找’按鈕，在查詢視窗里面用姓名的首字母查找“吳維藝”，雙擊“吳維藝”后所定位的是在“吳國華”這一行。這個要怎么解決？金額這一列只要有數字是相同的就會導致不準確。
EXCEL檔案論壇不能上傳，請到這個地域下載http://club.excelhome.net/thread-1483916-1-1.html，或者直接聯系我QQ245557980
uj5u.com熱心網友回復：
最后一個程序改成這樣試試:
Private Sub ListView1_DblClick()
Dim bh$, r1
bh = ListView1.SelectedItem.Text
Set r1 = Sheet1.Range("a:a").Find(bh, , , 1)
If Not r1 Is Nothing Then
Cells(r1.Row, 1).Select
End If
Unload Me
End Sub
你的這個檔案我這里無法除錯,老是蹦莫名其妙的錯誤...
uj5u.com熱心網友回復：
樓上正解。原因如下：
你原來的代碼中
bh = ListView1.SelectedItem.SubItems(1)
Set r1 = Sheet1.Range("b:b").Find(bh, , , 1)
你的這兩句就是要在金額列里面找與你選擇的那個人（吳維斌）的金額（800）相同的那一條資料，當然直接定位到“李明”了。至于定位到“吳國華”那一行，那是你自己點的吧
建議按姓名查找，修改為樓上給出的代碼
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/30202.html
標籤：VBA