nhờ mọi người giúp code cho userform

[duynguyenkk]

nhờ mọi người giúp code cho mình với, lấy mã sản phẩm ở sheet"MAUCHUAN" , nút ghi để ghi vào listbox1 trong frame1, nút ghi đưa toàn bộ nội dung listbox1 vào excel sheet"TLuong DT".
em cám ơn ah

 

[SA_DQ]

Chưa tể hiểu các câu chữ của bạn;

 

[duynguyenkk]

Chưa tể hiểu các câu chữ của bạn;

Chổ anh chưa hiểu có phải chổ textbox và listbox anh tô màu đúng không, cái textbox để nhập tìm mã sản phẩm,khi bấm chọn sẽ ở list bõ này sẽ đưa mã sang text box bên dưới chỗ dòng mã sản phẩm, sau khi điền đủ thông tin xong được ghi sang listbox1 trong frame1 , và ghi vào excel sheet"TLuong DT".

 

[SA_DQ]

Trong file mình đưa lên, bạn gõ 3 kí tự vô TextBox thì sẽ 2 trường hợp:
Nếu 3 kí tự đó trùng với mã SF thì danh sách mã SF sẽ hiện lên ListBox;
Nếu không thì "Nothing"

 

[duynguyenkk]

Trong file mình đưa lên, bạn gõ 3 kí tự vô TextBox thì sẽ 2 trường hợp:
Nếu 3 kí tự đó trùng với mã SF thì danh sách mã SF sẽ hiện lên ListBox;
Nếu không thì "Nothing"

dạ đoạn đó thì đúng ý rồi anh, nhưng để đưa mã đó qua text box thì viết sao anh , với sau khi điền đủ thông tin xong được ghi sang listbox1 trong frame1 , và ghi vào excel sheet"TLuong DT". thì sao anh SA_DQ

 

[SA_DQ]

. . . . , (1) nhưng để đưa mã đó qua text box thì viết sao anh , (2) với sau khi điền đủ thông tin xong được ghi sang listbox1 trong frame1 , và (3) ghi vào excel sheet"TLuong DT". thì sao anh SA_DQ

Từ từ thôi, lẹ quá ngợp thở luôn!
(1) Qua TextBox nào? & qua đó để làm gì?
Danh sách hiện lên trong ListBox, ta có thể chọn 1 dòng trong vài dòng trong nớ.
Vậy bạn muốn dữ liệu dòng chọn này đi đến đâu?
Không lẽ vô ListBox1;
Mà bạn nên gán tên các Controls rỏ ràng hơn đển đỡ tốn thời gian hơn, cho bạn & cho mọi người.
Ta dứt điểm bước này xong đi; Lúc đó mới qua bước 2

 

[duynguyenkk]

Từ từ thôi, lẹ quá ngợp thở luôn!
(1) Qua TextBox nào? & qua đó để làm gì?
Danh sách hiện lên trong ListBox, ta có thể chọn 1 dòng trong vài dòng trong nớ.
Vậy bạn muốn dữ liệu dòng chọn này đi đến đâu?
Không lẽ vô ListBox1;
Mà bạn nên gán tên các Controls rỏ ràng hơn đển đỡ tốn thời gian hơn, cho bạn & cho mọi người.
Ta dứt điểm bước này xong đi; Lúc đó mới qua bước 2

Do em đang làm trên file đính kèm bên dưới nhưng khi chạy form nhưng không edit được giá trị trên userform nên em mới làm lại form mới và nhờ mọi giúp một tay (cái form trên là em sửa cái của người ta lại).

 

[SA_DQ]

Form trong file không fải là form trong hình; Vậy nên không hiểu bạn muốn đi hướng nào?

 

[duynguyenkk]

Form trong file không fải là form trong hình; Vậy nên không hiểu bạn muốn đi hướng nào?

cái hình em up cho bài #6 là trình tự (thủ tục) làm của form em muốn làm ở bài #1

 

[SA_DQ]

Đã xong nút "Ghi" cho bạn rồi đây
Các bạn xem file ở bài bên dưới (#17)

 

[SA_DQ]

Ở bài #9 anh đã giúp em nhưng vẫn chưa đúng ý em anh ah, em muốn nút CmdGhi sẽ thực hiện ghi vào ListBox1 ( ứng với ô số 13 trong hình ở bài #7 )

Ghi vô ListBox để làm gì? Hãy nêu lý do chuyện này & nếu là chính đáng mình sẽ cố tiếp tục; Mình chưa lần nào fải ghi dữ liệu từ các TextBox hay ComboBox lên ListBox như vậy cả!

 

[duynguyenkk]

Ghi vô ListBox để làm gì? Hãy nêu lý do chuyện này & nếu là chính đáng mình sẽ cố tiếp tục; Mình chưa lần nào fải ghi dữ liệu từ các TextBox hay ComboBox lên ListBox như vậy cả!

- Ghi vô ListBox để một lần có thể thêm nhiều loại cửa vào và có thể edit các thông số của loại cửa đó ( các thông số đó = rộng; cao ;hướng mở;...) nếu anh có hướng khác hay hơn thì bỏ phần này cũng được.
- Nội dung ở ListBox sẽ đưa xuống sheets"TLuong DT" (file ở bài #10 anh đưa vào Sheet"MAUCHUAN" thì chưa đúng ý của em; sheet"MAUCHUAN" giống như định mức dựa vào sheet này để phân tích loại vât tư anh ah) .
- Form này em muốn làm như dự toán bên xây dựng anh ah .

 

[SA_DQ]

Ghi lên ListBox, thì xin xem file ở bài dưới kế tiếp (17):

 

[duynguyenkk]

Ghi lên ListBox, thì đây:

Anh SA_DQ ơi làm sao để đưa hết dữ liệu vào ListBox và sau đó đưa vào excel như hình em đính kèm
1 nội dung cần lấy
2 nội dung trên form
3 kết quả mong muốn
em cám ơn ạ.

 

[SA_DQ]

Anh ơi, (1) làm sao để đưa hết dữ liệu vào ListBox và (2) sau đó đưa vào excel như hình em đính kèm

(1) Sau khi nhập dữ liệu cho các TextBox & chọn dữ liệu cho các ComboBox, thì ta nhấn nút;
Dữ liệu sẽ được chuyển từ các control này sang ListBox, trỡ thành 1 dòng dữ liệu
Tiếp tục lặp lại trình tự này cho đến khi chán.

(2) Đưa vào trang nào của Excel? & đưa nguyên các dòng trong ListBox vô trang tính?

Cứ viết kiểu không có địa chỉ này chỉ tốn thời gian mà thôi!

 

[duynguyenkk]

(1) Sau khi nhập dữ liệu cho các TextBox & chọn dữ liệu cho các ComboBox, thì ta nhấn nút;
Dữ liệu sẽ được chuyển từ các control này sang ListBox, trỡ thành 1 dòng dữ liệu
Tiếp tục lặp lại trình tự này cho đến khi chán.

(2) Đưa vào trang nào của Excel? & đưa nguyên các dòng trong ListBox vô trang tính?

Cứ viết kiểu không có địa chỉ này chỉ tốn thời gian mà thôi!

Do em không biết trình bày sao cho anh và mọi người dễ hiểu cả.
Em gửi lại file kết quả mong muốn và hình khi userform hoạt động , cho mọi người dễ hình dung.
Nội dung ở ListBox sẽ đưa xuống sheets"TLuong DT"
Và tiếp tục cho các mã sản phẩm khác.

 

[SA_DQ]

File tiếp theo của bạn đây;

Bổ sung sáng 22/8:
Sau khi ghi dữ liệu (DL) lên trang tính ta cần xóa DL nguồn cuả ListBox bằng câu lệnh sau:

. . . . . . End With

    Sheets("GPE").[b2].CurrentRegion.Offset(1).ClearContents    'Xóa Du Liêu Nguôn Trong ListBox  '

 

[duynguyenkk]

File tiếp theo của bạn đây;

Bổ sung sáng 22/8:
Sau khi ghi dữ liệu (DL) lên trang tính ta cần xóa DL nguồn cuả ListBox bằng câu lệnh sau:

. . . . . . End With

    Sheets("GPE").[b2].CurrentRegion.Offset(1).ClearContents    'Xóa Du Liêu Nguôn Trong ListBox  '

cám ơn anh nhiều nhé anh SA_DQ