dùng vba vẽ graph theo điều kiện (5 người xem)

[vic_it]

Kính gửi Anh/Chị,
E có 2 case chắc cần sử dụng đến vba, vẽ graph theo điều kiện ban đầu. (Chi tiết mô tả có trong file Excel)

Case1
Bài toán Cho 1 khung hình vuông chia làm 12 ô, dữ liệu chứa trong các ô vàng
Nếu ô vàng có dữ liệu, sẽ thực hiện vẽ graph mũi tên đến các cung theo quy tắc vẽ mũi tên 1> 5,7,9
Ví dụ 1 tại ô 1, nguồn là A
đích 1: Ô 1 +4 (1+4=5). Vẽ kết nối đến ô 5
đích 2: ô 1, +6 (1+6=7). Vẽ kết nối đến ô 7
đích 3: ô 1, +8 (1+8=9). Vẽ kết nối đến ô 9
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.
Tương tự công thức cho 12 ô còn lại, khi ô cần xét có dữ liệu. Tuy nhiên, vì có 12 ô nên số vượt ngưỡng 12 thì phải tính lại. Ví dụ dưới
Ví dụ 2 tại ô 8, nguồn là B
đích 1: ô 8+4 (8+4=12). Vẽ kết nối đến ô 12
đích 2: ô 8, +6 (8+6=14), 14-12=2 . Vẽ kết nối đến ô 2
đích 3: ô 8, +8 (8+8=16), 16-12=4 . Vẽ kết nối đến ô 4
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.

Case 2
Đọc dữ liệu trong các ô màu xanh
Nếu dữ liệu là Táo, vẽ vòng oval quanh giá trị
Nếu dữ liệu là Cam, vẽ hình chữ nhật quanh giá trị
Có thể điều chỉnh màu, độ dày mỏng….

Cả 2 case thêm 1 nút để bật tắt việc hiển thị/ẩn graph.

Nhờ Anh/Chị có kinh nghiệm hỗ trợ giúp em.

Em cám ơn nhiều.

 

[Gà Con yêu VBA]

Kính gửi Anh/Chị,
E có 2 case chắc cần sử dụng đến vba, vẽ graph theo điều kiện ban đầu. (Chi tiết mô tả có trong file Excel)

Case1
Bài toán Cho 1 khung hình vuông chia làm 12 ô, dữ liệu chứa trong các ô vàng
Nếu ô vàng có dữ liệu, sẽ thực hiện vẽ graph mũi tên đến các cung theo quy tắc vẽ mũi tên 1> 5,7,9
Ví dụ 1 tại ô 1, nguồn là A
đích 1: Ô 1 +4 (1+4=5). Vẽ kết nối đến ô 5
đích 2: ô 1, +6 (1+6=7). Vẽ kết nối đến ô 7
đích 3: ô 1, +8 (1+8=9). Vẽ kết nối đến ô 9
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.
Tương tự công thức cho 12 ô còn lại, khi ô cần xét có dữ liệu. Tuy nhiên, vì có 12 ô nên số vượt ngưỡng 12 thì phải tính lại. Ví dụ dưới
Ví dụ 2 tại ô 8, nguồn là B
đích 1: ô 8+4 (8+4=12). Vẽ kết nối đến ô 12
đích 2: ô 8, +6 (8+6=14), 14-12=2 . Vẽ kết nối đến ô 2
đích 3: ô 8, +8 (8+8=16), 16-12=4 . Vẽ kết nối đến ô 4
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.

Case 2
Đọc dữ liệu trong các ô màu xanh
Nếu dữ liệu là Táo, vẽ vòng oval quanh giá trị
Nếu dữ liệu là Cam, vẽ hình chữ nhật quanh giá trị
Có thể điều chỉnh màu, độ dày mỏng….

Cả 2 case thêm 1 nút để bật tắt việc hiển thị/ẩn graph.

Nhờ Anh/Chị có kinh nghiệm hỗ trợ giúp em.

Em cám ơn nhiều.

Mô tả của bạn còn rất nhiều điểm không hiểu, mình mới đọc vài dòng đầu có câu hỏi bạn
ở case1 ví dụ 1 :
1. Vẽ mũi tên luôn luôn từ ô 1 nguồn A đến các ô 5,7,9 có phải không?
nếu phải thì diễn đạt "Ô 1 +4 (1+4=5). Vẽ kết nối đến ô 5 " để làm gì ?
Nếu không phải thì quy tắc vào để biết vẽ từ ô 1 đến ô nào ? ( giải thích 1+ 4 =5 là gì?)


Mình nghĩ case này còn phải hỏi cả trăm câu hỏi nữa á

 

[vic_it]

Dạ, để e mô tả cách hàm chạy tương ứng từ ô 1 đên ô 12, nếu ô nguồn có dữ liệu, sẽ sinh ra các graph theo logic đó.

 

[Maika8008]

Kính gửi Anh/Chị,
E có 2 case chắc cần sử dụng đến vba, vẽ graph theo điều kiện ban đầu. (Chi tiết mô tả có trong file Excel)

Case1
Bài toán Cho 1 khung hình vuông chia làm 12 ô, dữ liệu chứa trong các ô vàng
Nếu ô vàng có dữ liệu, sẽ thực hiện vẽ graph mũi tên đến các cung theo quy tắc vẽ mũi tên 1> 5,7,9
Ví dụ 1 tại ô 1, nguồn là A
đích 1: Ô 1 +4 (1+4=5). Vẽ kết nối đến ô 5
đích 2: ô 1, +6 (1+6=7). Vẽ kết nối đến ô 7
đích 3: ô 1, +8 (1+8=9). Vẽ kết nối đến ô 9
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.
Tương tự công thức cho 12 ô còn lại, khi ô cần xét có dữ liệu. Tuy nhiên, vì có 12 ô nên số vượt ngưỡng 12 thì phải tính lại. Ví dụ dưới
Ví dụ 2 tại ô 8, nguồn là B
đích 1: ô 8+4 (8+4=12). Vẽ kết nối đến ô 12
đích 2: ô 8, +6 (8+6=14), 14-12=2 . Vẽ kết nối đến ô 2
đích 3: ô 8, +8 (8+8=16), 16-12=4 . Vẽ kết nối đến ô 4
Khi 2 đầu đều có dữ liệu, thì vẽ mũi tên 2 chiều. Khi đầu đích không có dữ liệu, vẽ mũi tên 1 chiều.

Case 2
Đọc dữ liệu trong các ô màu xanh
Nếu dữ liệu là Táo, vẽ vòng oval quanh giá trị
Nếu dữ liệu là Cam, vẽ hình chữ nhật quanh giá trị
Có thể điều chỉnh màu, độ dày mỏng….

Cả 2 case thêm 1 nút để bật tắt việc hiển thị/ẩn graph.

Nhờ Anh/Chị có kinh nghiệm hỗ trợ giúp em.

Em cám ơn nhiều.

Mới chỉ vẽ thôi đấy. Chạy thử thì biết

 

[vic_it]

Mới chỉ vẽ thôi đấy. Chạy thử thì biết

Dear Anh/Chị, e đã chạy code và xin comment dưới (chi tiết mô tả trong file excel)
Ví dụ 1, chỉ có các ô 1,5,7 có dữ liệu nguồn. Nên chỉ vẽ khi nguồn có dữ liệu. Ô 9 ko có dữ liệu nguồn nên chỉ vẽ với nguồn chiếu đến.
Kết quả sau khi vẽ từ các ô 1,5,7 đi thì sẽ được kết quả cuối cùng.
Với dữ liệu trùng lặp:
ô 1 và 5 nguồn/đích đều có dữ liệu 2 chiều, nên dùng lại graph từ ô 1.
ô 1 và 7 nguồn/đích đều có dữ liệu 2 chiều, nên dùng lại graph từ ô 1.
Ví dụ 2: thực hiện tương tự.

Lưu ý là code sẽ chạy 1 vòng check từ ô 1 đến ô 12, ô nào có dữ liệu nguồn là vẽ graph. Hiện tại code đang nhập thủ công.

Em cám ơn,

 

[Maika8008]

Dear Anh/Chị, e đã chạy code và xin comment dưới (chi tiết mô tả trong file excel)
Ví dụ 1, chỉ có các ô 1,5,7 có dữ liệu nguồn. Nên chỉ vẽ khi nguồn có dữ liệu. Ô 9 ko có dữ liệu nguồn nên chỉ vẽ với nguồn chiếu đến.
Kết quả sau khi vẽ từ các ô 1,5,7 đi thì sẽ được kết quả cuối cùng.
Với dữ liệu trùng lặp:
ô 1 và 5 nguồn/đích đều có dữ liệu 2 chiều, nên dùng lại graph từ ô 1.
ô 1 và 7 nguồn/đích đều có dữ liệu 2 chiều, nên dùng lại graph từ ô 1.
Ví dụ 2: thực hiện tương tự.

Lưu ý là code sẽ chạy 1 vòng check từ ô 1 đến ô 12, ô nào có dữ liệu nguồn là vẽ graph. Hiện tại code đang nhập thủ công.

Em cám ơn,

Ùi, phức tạp quá. Mà tải file về bị antivirus trảm, không dùng được