PDA

View Full Version : Hỏi thêm về file nhập mã của anh Lê Văn Duyệt



phankhang
08-01-08, 09:50 AM
Trước hết xin cám ơn anh Lê Văn Duyệt đã có bài hướng dẫn về tạo bảng chọn dữ liệu
( Xem http://www.levanduyetexcel.netfirms.com/Data_Selector.htm )

Mình đã theo cách của anh tạo thử 1 bảng chọn dữ liệu nhưng có một ý thêm là sau khi chọn dữ liệu xong rồi ( xuất dữ liệu ra 1 ở 1 cell cột A ) , nếu muốn chọn dữ liệu cho ô kế tiếp thì phải tắt bảng chọn , chọn ô kế cho xuất hiện bảng chọn rồi mới chọn dữ liệu

Cho mình hỏi thêm giả sử như mình muốn nhập dữ liệu liên tiếp , tức là nếu đầu tiên nhập từ bảng chọn vô ô A2 , sau đó chọn tiếp dữ liệu thì nó sẽ nhập vô ô A3 , .... A 570

Mình đang tự học VBA thông qua GPE , rất mong được chỉ giáo

Cám ơn các bạn

nguyentuhp
08-01-08, 01:43 PM
Private Sub cmdOK_Click()
Dim bGiatrichon
On Error Resume Next
bGiatrichon = LVDataSelector.SelectedItem.Text
ActiveCell.Value = bGiatrichon 'Dat gia tri ban chon vao o hien tai
' Bạn thêm dòng sau trong cmdOK_Click
ActiveCell.offset(1, 0).Select ' Xuống 1 dòng
End Sub

phankhang
08-01-08, 02:08 PM
Ok , mình làm được rồi , cám ơn bạn