Giúp em hoàn thiện form nhập liệu (1 người xem)

[quoc nhat]

Chào các anh chị.
Em có cái Form mà chưa thể hoàn thiện vì không biết làm thế nào gồm các vấn đề sau:
1, Thanh cuôn trên listbox không tự cuộn xuống hàng cuối cùng khi có dữ liệu mới mới được tham chiếu vào nên thường bị che khuất phải dùng chuột để kéo rất bất tiện.

2, Có thể chọn dữ liệu từ Listbox và đưa lên các Textbox 1,2,3,4 để sửa và sau đó lưu dữ liệu vào dòng dl củ đã chọn trên Listbox.

3. Giúp em lệnh trong nút "IN" in sheet1 trang 1 đến trang 2
Trên đây là các vấn đề mà em đang vướng mắc khi hoàn thiện Form này.
Kính mong các anh chị giúp đỡ em với

 

[viehoai]

Chào các anh chị.
Em có cái Form mà chưa thể hoàn thiện vì không biết làm thế nào gồm các vấn đề sau:
1, Thanh cuôn trên listbox không tự cuộn xuống hàng cuối cùng khi có dữ liệu mới mới được tham chiếu vào nên thường bị che khuất phải dùng chuột để kéo rất bất tiện.

2, Có thể chọn dữ liệu từ Listbox và đưa lên các Textbox 1,2,3,4 để sửa và sau đó lưu dữ liệu vào dòng dl củ đã chọn trên Listbox.

3. Giúp em lệnh trong nút "IN" in sheet1 trang 1 đến trang 2
Trên đây là các vấn đề mà em đang vướng mắc khi hoàn thiện Form này.
Kính mong các anh chị giúp đỡ em với

1. Câu hỏi 1 không khiểu
2. Câu hỏi 2, 3:
[GPECODE=vb]Private Sub CommandButton3_Click()
Sheet1.PrintOut 1, 2, 1, , , , True
End Sub[/GPECODE]
[GPECODE=vb]Private Sub ListBox1_Click()

With Me.ListBox1
Me.TextBox1.Value = .List(.ListIndex, 0)
Me.TextBox2.Value = .List(.ListIndex, 1)
Me.TextBox3.Value = .List(.ListIndex, 3)
Me.TextBox4.Value = .List(.ListIndex, 2)
End With
End Sub[/GPECODE]

 

[quoc nhat]

1. Câu hỏi 1 không khiểu
2. Câu hỏi 2, 3:
[GPECODE=vb]Private Sub CommandButton3_Click()
Sheet1.PrintOut 1, 2, 1, , , , True
End Sub[/GPECODE]
[GPECODE=vb]Private Sub ListBox1_Click()

With Me.ListBox1
Me.TextBox1.Value = .List(.ListIndex, 0)
Me.TextBox2.Value = .List(.ListIndex, 1)
Me.TextBox3.Value = .List(.ListIndex, 3)
Me.TextBox4.Value = .List(.ListIndex, 2)
End With
End Sub[/GPECODE]

Câu 1: Ý em khi mình tham chiếu listbox xuống sheet 1 mà dữ liệu nhiều thì thanh cuộn sẽ tự động cuộn xuống dòng cuối cùng trong listbox
Câu 3: Code của anh chỉ cho phép chọn dữ liệu trong listbox và sửa trên textbox mà chưa có đoạn xoá dự liệu củ(bị sai)và ghi dữ liệu mới vào chính dòng dữ liệu vừa được chọn để sửa và khi nhập mới một loại nào đó thì tên thuốc, đơn vị, số lượng lại sai
Anh cố giúp em thêm với nhé!

 

[viehoai]

Câu 1: Ý em khi mình tham chiếu listbox xuống sheet 1 mà dữ liệu nhiều thì thanh cuộn sẽ tự động cuộn xuống dòng cuối cùng trong listbox
Câu 3: Code của anh chỉ cho phép chọn dữ liệu trong listbox và sửa trên textbox mà chưa có đoạn xoá dự liệu củ(bị sai)và ghi dữ liệu mới vào chính dòng dữ liệu vừa được chọn để sửa và khi nhập mới một loại nào đó thì tên thuốc, đơn vị, số lượng lại sai
Anh cố giúp em thêm với nhé!

Thế như file dưới đây đúng không?