Tạo form nhập liệu trên dữ liệu có sẵn (1 người xem)

[toangiaphat]

Mình có bảng nhập liệu với các dữ liệu có sẵn. Mình nhờ các bạn tạo giúp Form nhập liệu thêm các chỉ tiêu còn thiếu trong hàng.

Ví dụ: khi mình click vào 1 mã Mã KH nào đó thì nó sẽ hiện ra Form nhập liệu cho mình nhập các chỉ tiêu còn thiếu của KH đó.
Cám Ơn!

 

[ChanhTQ@]

Tạm thời là vầy;
Một số cột/trường ở cuối chưa rõ bạn sẽ nhập gì vô đó, nên còn để trống!

 

[toangiaphat]

tạm thời là vầy;
một số cột/trường ở cuối chưa rõ bạn sẽ nhập gì vô đó, nên còn để trống!

bạn ơi! Mình click vô mã kh nó không hiện form nhập liệu để mình thêm các số liệu khác.
Bạn cứ tạo các dòng nhập cho các cột cuối luôn nhé. Mình sẽ chỉnh sữa lại (bạn cứ đặt tên 1,2,3,4 .v.v....

 

[toangiaphat]

tạm thời là vầy;
một số cột/trường ở cuối chưa rõ bạn sẽ nhập gì vô đó, nên còn để trống!

bạn xem file đính kem giúp mình nhé. Mình đã vẽ form mẫu
(Nó giống chức năng Form có sẵn của Excel ý, nhưng mở rộng ra, mình chọn dòng nào thì nhập liệu cho dòng đó.
Cám ơn

 

[be_09]

bạn xem file đính kem giúp mình nhé. Mình đã vẽ form mẫu
(Nó giống chức năng Form có sẵn của Excel ý, nhưng mở rộng ra, mình chọn dòng nào thì nhập liệu cho dòng đó.
Cám ơn

Có 1 vấn đề bạn không nêu rỏ đó là mỗi khách hàng khi nhập liệu chỉ duy nhất 1 loại hàng hóa hay nhập nhiều loại hàng hóa cùng lúc,

Lưu ý: Nếu có nhiều loại hàng hóa thì phải có 1 sheet liệt kê danh mục loại hàng hóa, đơn vị tính, đơn giá nếu không có danh mục hàng hóa thì biết dựa vào đâu để lấy dữ liệu nhập vào vùng từ J đến V của sheet NHAPLIEU.

 

[ChanhTQ@]

Trong trang 'NhapLieu' bạn ghi như sau:

CÁC MÃ SỐ KH DO MÌNH SẼ TỰ COPY TAY VÀO

Vậy bạn hãy làm những gì mình viết đi;

(Hoặc cứ để chuột vô ô nào đó trong khoảng từ [E2:E9] & bấm {ENTER} xem sao.)

 

[toangiaphat]

Trong trang 'NhapLieu' bạn ghi như sau:
(Hoặc cứ để chuột vô ô nào đó trong khoảng từ [E2:E9] & bấm {ENTER} xem sao.)

Có 1 trục trặc nhỏ Bạn ơi! Nếu mình chọn ô từ E2:E15, hiện Form thì OK, còn bây giờ mình phải để dấu nháy vào và khi Enter thì nó mất thuộc tính test của cột E.
1 vấn đề nữa là trên Form có hiện Mã KH đang nhập liệu giùm mình nhé.
Thanks

 

[ChanhTQ@]

Cách xài:
Chọn 1 ô bất kỳ trong hàng muốn nhập liệu;
Bấm {CTRL}+{SHIFT}+M để mở form
Chọn mã khách hàng;
Nhập đủ các ô dữ liệu & [Lưu]

 

[be_09]

Tôi thấy bài #2 bạn nhấn nút Cám ơn, đến bài này bạn lại chơi vầy???

Thanks

 

[toangiaphat]

Cách xài:
[Lưu]

Gần đúng rồi, bạn chỉnh ít nữa giúp mình nhé. Mình đã vễ lại Form. bạn xem file đính kèm nhé.
Bạn cho mình gõ đúng số ký tự là Ok rồi, ko cần quy định text hay số nhé.

(Nhờ bạn mà mình biết thêm vài chiêu VBA)
Thanks

 

[ChanhTQ@]

[thongbao]Gần đúng rồi, bạn chỉnh ít nữa giúp mình nhé. Mình đã vễ lại Form. bạn xem file đính kèm nhé. [/thongbao]

Còn ít nữa mà bạn nói đó thì bạn tiếp tục đi; Không rỗi hơi để chạy theo bạn ba bốn lần hoài như vậy!

Hơn nữa:

Bạn cho mình gõ đúng số ký tự là Ok rồi, ko cần quy định text hay số nhé.

Với mình, không thể muốn nhập kiểu dữ liệu bất kỳ nào vô 1 trường/cột; Chỉ có thể là 1 mà thôi!

Hẹn tái ngộ!

 

[be_09]

[thongbao].............[/thongbao]

Còn ít nữa mà bạn nói đó thì bạn tiếp tục đi; Không rỗi hơi để chạy theo bạn ba bốn lần hoài như vậy!
........
Hẹn tái ngộ!

Bài #5 tôi góp ý nhưng chẳng thấy Chủ Topic trả lời, trả vốn gì???

Nhận định: Chủ Topic cố thủ, vì người ta nghĩ sao làm vậy, mà không lường trước được các sự việc phát sinh sau này, nếu a thần phù giúp thì sẽ còn phát sinh dài dài nữa.

Vì vậy tôi chỉ góp ý 1 lần không thấy động tịnh thì dọt lẹ, để tránh sự dây dưa phiền phức.

 

[toangiaphat]

[thongbao]

Hẹn tái ngộ!

Dù sao mình cũng cám ơn bạn đã hổ trợ mình 2 ngày nay. Vì sự giúp đỡ là tự nguyện. Mình sẽ cố gắng hoàn thành công đoạn còn lại

 

[toangiaphat]

Nhờ Bác nào ghé ngang kiểm tra giúp Mình Code và Form đã làm hết rồi nhưng nó ko chạy.
Cám Ơn!

 

[SA_DQ]

Dòng lệnh này đang sai:

 Cells(Rws, "e").Value = Me!CbBMaKH.Text

Vì trong form bạn không/chưa có ComboBox này;
Bạn chỉ có 1 ComboBox với tên la CbBID

Ở bên dưới nữa của macro cũng cần xem lại tên các TextBox fải nhật thiết trùng với tên ghi trong macro;
Như TxtMucDichVay,. . . .

 

[toangiaphat]

[QUOTE
Ở bên dưới nữa của macro cũng cần xem lại tên các TextBox fải nhật thiết trùng với tên ghi trong macro;
Như TxtMucDichVay,. . . .[/QUOTE]
Mình đã chỉnh lại rồi. Bạn xem giúp nhé

 

[SA_DQ]

Mình đã chỉnh lại rồi. Bạn xem giúp nhé

Xem giúp là NTN?, mình thấy macro chạy bình thường tồi mà!

Xin góp với bạn mẹo nhỏ về cách gán tên cho các Contrl, tham biến, Tên (Name). . . trong ecel

 Cells(Rws, "J").Value = Me!Txthangxom.Text
 Cells(Rws, "K").Value = Me!Txtchungtu.Text
 Cells(Rws, "L").Value = Me!Txtphuthuoc.Text
 Cells(Rws, "M").Value = Me!Txtmucdich.Text
 Cells(Rws, "O").Value = Me!Txtquimo.Text
 Cells(Rws, "P").Value = Me!Txtxacminh.Text
 Cells(Rws, "Q").Value = Me!Txtketqua.Text
 Cells(Rws, "R").Value = Me!Txtlydo.Text
 Cells(Rws, "S").Value = Me!Txtghichu.Text
 Cells(Rws, "T").Value = Me!Txtadashome.Text
 Cells(Rws, "U").Value = Me!Txtadaswork.Text
 Cells(Rws, "V").Value = Me!Txtsms.Text

Gán tên cho các control như vầy không thỏa lắm, vì chưa tận dụng hết nguồn lực do VBE đem lại cho bạn;
Là người quen xài tiếng Việt, thì chúng ta nên gán tên là

Cells(Rws, "J").Value = Me!TxtHangXom.Text
hơn là: Cells(Rws, "J").Value = Me!Txthangxom.Text
Thứ nhất: dễ mường tượng nó là cái gì tương ứng trong Form

Thứ hai & quan trọng hơn (theo mình)
Gán tên như vậy cho Coltrol xong thì
ta nhập Cells(Rws, "J").Value = Me!Txthangxom.Text
& sau khi xuống dòng để bắt đầu viết lệnh khác thì chương trình sẽ chỉnh cho ta;
Như vậy ta tránh được sai sót không đáng.

Viết như bạn nhanh được vài fần của giây, nhưng có thể mất hàng giờ sau này!

 

[toangiaphat]

Mình nhập vào nó ko ghi. Mình ki biết lỗi ở đâu!

 

[be_09]

Xem giúp là NTN?, mình thấy macro chạy bình thường tồi mà!

Có nghĩa là khi chọn ComboBox với tên CbBid thì dữ liệu liên quan phải được Load vào Form rồi thực hiện những công việc tiếp theo...v...v...và nhiều thứ nữa.

Nêu đại vấn đề 1 cái rồi dọt lẹ cho chắc ăn, chứ chủ Topic mà tóm lấy thì chắc đau khổ dài dài.

 

[SA_DQ]

[Thongbao]Mình nhập vào nó ko ghi. Mình ki biết lỗi ở đâu!�[/Thongbao]

Viết thế này thì thua bạn thật!

Mình vẫn thấy nhập bình thường mà!

Vậy chắc bạn cần viết hết các công đoạn bạn thực hiện xem sao