[算表] VBA相關問題

看板Office作者 (nanami)時間16年前 (2010/03/16 18:58), 編輯推噓1(102)
留言3則, 1人參與, 最新討論串1/1
軟體:EXCEL 版本:2003 小弟打用利用EXCEL及VBA作簡易的管理系統 但在製作「客戶資料查詢」這個功能按鈕時 我是利用下拉式選單去尋找客戶名稱的,但 是不管我選擇第幾位客戶,出現的電話,都 第一位的電戶的電話。 程式碼如下: Private Sub cust_Change() End Sub Private Sub cust_Exit(ByVal Cancel As MSForms.ReturnBoolean) Sheets("客戶資料").Select Range("a1").Select Cells.Find(What:="客戶", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _ xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _ , MatchByte:=False, SearchFormat:=False).Activate phone.Text = ActiveCell.Offset(1, 0).Range("B1").Text End Sub Private Sub exit1_Click() End End Sub Private Sub reentry_Click() cust.Text = "" cust.RowSource = "客戶" phone.Text = "" End Sub Private Sub UserForm_Click() End Sub 請用要修改哪個部份,才能讓客戶名字與電話相符呢?? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 219.81.229.38

03/19 14:17, , 1F
沒原始檔真的不好看,只能猜看看...
03/19 14:17, 1F

03/19 14:18, , 2F
cust_Exit 第二列指定range A1搜尋..所以沒其他資訊
03/19 14:18, 2F

03/19 14:20, , 3F
第七行 ActiveCell.Offset(1, 0) 後面為什麼還有range b1
03/19 14:20, 3F
文章代碼(AID): #1BdsHOTO (Office)
文章代碼(AID): #1BdsHOTO (Office)