Sửa dữ liệu trong form

[Phạm Trường 80]

Bạn cần đăng nhập để thấy link

Chào Các anh chị,tôi có file sửa dòng trong Form.Nếu bấm dòng 12,13 thì form hiện đúng,bấm thêm dòng 14 thì hiện sai.Tôi muốn bấm dòng 12,13,14 thì form hiện 1 kết quả và 15,16,17 cũng hiện 1 kết quả trên form.Bác nào đi ngang giúp e với,e chưa biết làm

 

[phuongnamhp92]

nếu đây là file bạn tự làm, thì có thể sửa theo cách như sau:
1. phải xác định vùng dữ liệu bắt đầu từ đâu (cố định, ví dụ từ dòng số 12)
2. trong form , chỗ tìm dòng sửa TextBox_Cells, hãy thêm logic để giới hạn phạm vi nhập số vào,
ví dụ: dữ liệu nhập vào đó phải là số, phải lớn hơn hoặc bằng 12...
3. dữ liệu của 1 giá trị bắt đầu từ dòng 12 và kết thúc là dòng 14, nghĩa là 1 giá trị chiếm 3 dòng, vậy hãy viết logic để trả về dòng chứa tên sản phẩm trước khi tìm kiếm. ví dụ:

Function FindNameIndex(RowIndex As Integer) As Integer
Dim FirstRow As Integer
FirstRow = 12
If RowIndex < FirstRow Then
FindNameIndex= FirstRow
Else
FindNameIndex = FirstRow + Int((RowIndex - FirstRow ) / 3) * 3
End If
End Function
trong nút tìm kiếm,sửa để áp dụng :vtsheet = FindNameIndex(TextBox_Cells.Text)