[Nhờ giúp đỡ] VBA copy và chèn nội dung đã copy vào ô hiện tại. (1 người xem)

[M@trixs]

Thân nhờ A/C/E đi ngang giúp giùm Matrixs một số vấn đề với. Cơ bản là Matrixs ko biết về VBA, vấn đề như sau: Cấu trúc file đính kèm có 02 phần tạm gọi là phần "Dữ liệu" và phần "Nhập liệu".

1. Mong muốn: Tại Sheet [MongDon], đặt con trỏ chuột vào ô trống D33 - Phần "MÓNG ĐÚNG TÂM" trong vùng "Nhập liệu", click chuột phải chọn "Thêm Móng đúng tâm". VBA sẽ thực hiện chép nội dung đã có sẵn tương ứng ở phần "Dữ liệu" và chèn copy vào ô D33 trở xuống. Cũng tương tự vậy, khi click chuột phải chọn "Thêm Móng lệch 01 tâm", VBA sẽ copy nội dung tương ứng ở trên phần "Dữ liệu" và chèn copy vào vị trí D41

2. Mỗi sheet sẽ có menu chuột phải riêng tùy theo thành phần bảng dữ liệu. VD như ở sheet [MongDon], ta sẽ có menu chuột phải gồm 03 nội dung:
- Thêm móng đơn đúng tâm
- Thêm móng đơn lệch 01 tâm
- Thêm móng đơn lệch 02 tâm.

Xin chân thành cảm ơn A/C/E đã xem bài viết. mong nhận được sự giúp đỡ của mọi người. Chúc sức khỏe mọi người.

 

[PacificPR]

Thân nhờ A/C/E đi ngang giúp giùm Matrixs một số vấn đề với. Cơ bản là Matrixs ko biết về VBA, vấn đề như sau: Cấu trúc file đính kèm có 02 phần tạm gọi là phần "Dữ liệu" và phần "Nhập liệu".

1. Mong muốn: Tại Sheet [MongDon], đặt con trỏ chuột vào ô trống D33 - Phần "MÓNG ĐÚNG TÂM" trong vùng "Nhập liệu", click chuột phải chọn "Thêm Móng đúng tâm". VBA sẽ thực hiện chép nội dung đã có sẵn tương ứng ở phần "Dữ liệu" và chèn copy vào ô D33 trở xuống. Cũng tương tự vậy, khi click chuột phải chọn "Thêm Móng lệch 01 tâm", VBA sẽ copy nội dung tương ứng ở trên phần "Dữ liệu" và chèn copy vào vị trí D41

2. Mỗi sheet sẽ có menu chuột phải riêng tùy theo thành phần bảng dữ liệu. VD như ở sheet [MongDon], ta sẽ có menu chuột phải gồm 03 nội dung:
- Thêm móng đơn đúng tâm
- Thêm móng đơn lệch 01 tâm
- Thêm móng đơn lệch 02 tâm.

Xin chân thành cảm ơn A/C/E đã xem bài viết. mong nhận được sự giúp đỡ của mọi người. Chúc sức khỏe mọi người.

Mình làm thử Móng Băng. Bạn tham khảo xem
Click vào cột C để chọn dữ liệu

 

[M@trixs]

Mình làm thử Móng Băng. Bạn tham khảo xem
Click vào cột C để chọn dữ liệu

OK. Có một số điểm bạn đã làm vượt khả nang mong đợi của mình như:

1/ Làm hẵn 01 Forrm để lựa chọn, quá tuyệt vời. Thao tác chọn "cấu kiện" đơn giản chỉ là Double Click vào cột C càng tiện lợi hơn nữa. Tìm kiếm quá hay và tiện, như kiểu GooGle vậy, đang đánh nhảy ra luôn chứ ko cần Enter, điều này tôi không dám mơ tới, vì có thể sau này có Sheet sẽ nhiều cấu kiện hơn. Cảm ơn bạn đã bổ sung thêm điều tuyệt vời này.
=> Tuy nhiên Matrixs đang lăn tăn một chút: Bảng UserForm đó có tự hiểu là đang đứng trên Sheet nào để hiển thị nội dung của Sheet đó không bạn hay nó sẽ show ra dữ liệu của các Sheet luôn ??? Mình hỏi điều này vì mình đang trong quá trình xây dựng file tính toán nên sẽ còn bổ sung vào đó rất nhiều sheet của các cấu kiện khác nữa.

2/ VBA bạn có làm tổng quát cho các trường hợp không hay chỉ làm cho từng Sheet. Vì mình đang còn rất rất là nhiều sheet khác đang xây dựng thêm chứ không chỉ có 2 sheet như hiện tại. Nếu chỉ xây dựng cho từng sheet một thì mình sẽ khó khăn trong việc cập nhậpt tiếp.

3/ Phát sinh các vấn đề không mong muốn bạn ạ:
- Thứ 1: Việc chèn nội dung, bạn đã lập trình chèn luôn cả tiêu đề, nó thừa và gây khó khăn trong việc nhìn vào bảng dữ liệu. Nếu thêm 10 cấu kiện "MB_DC" thì nó cũng thêm 10 dòng tiêu đề "MÓNG ĐỀU CẠNH". Nếu được bạn nên cố định các nhóm lại như bảng dữ liệu giùm mình, sau đó nếu chọn cấu kiện nào thì sẽ tự chèm thêm vào dòng nhóm tương ứng chứ không để chèn "thoải mái" như vậy.
- Thứ 2: Nếu click đôi chuột vào vùng trống của cột C để chọn cấu kiện thì nó nhảy ra rất OK. Tuy nhiên nếu click vào 1 ô nào đó ở cột C đã có dữ liệu tương ứng ở cột D thì UserForm vẫn hiện ra cho chọn nhưng khi click đồng ý thì nó chỉ nhảy ra mã hiệu của cấu kiện.

Xin cảm ơn bạn thật nhiều

 

[M@trixs]

Mong A/C/E đi ngang giúp giùm với. Mình đang bí quá.....