Form tính toán trên các textbox bằng công thức có sẵn hoặc công thức tự tạo. (1 người xem)

  • Thread starter Thread starter ptm0412
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

ptm0412

Bad Excel Member
Thành viên BQT
Administrator
Tham gia
4/11/07
Bài viết
14,681
Được thích
37,387
Donate (Momo)
Donate
Giới tính
Nam
Nghề nghiệp
Consultant
Nhân topic Code Công thức "cộng, trừ, nhân, chia", trong đó có quá nhiều các textbox để tính nhiều công thức khác nhau, nếu không dùng class thì phải tạo mấy chục cái sub giống nhau 1 cách nhàm chán.

Dùng Class dĩ nhiên là 1 ưu điểm, nhưng nếu biết cách, có thể hạn chế số lượng textbox xuống còn từ 4 đến 6 cái. Trong phạm vi 6 cái textbox thì viết code chưa đến nỗi nhàm chán.

Tôi tạo 1 form với 3 nhóm OptionButton, 4 textbox chính, 2 textbox phụ, đã có thể tính toán 9 công thức có sẵn khác nhau nhân với 4 option thành 36 công thức.

Ngoài ra, nếu cần tính công thức khác trong phạm vi 4 tham số, form cho phép gõ công thức trực tiếp vào 1 textbox khác, và VBA sẽ tính theo công thức đó:



Các textbox này đã ít, mà lại còn ẩn đi khi không dùng đến, khiến cho form không bị rối:











36 công thức mà tôi khoe không có gì ghê gớm: tính diện tích, thể tích, trọng lượng 1 vài vật thể hình học, 4 option chỉ là có nhân số lượng hay không và vật hình học có bị khoét lỗ hay không.

Tuy nhiên, người dùng có thể sửa công thức theo mục đích tính toán mình muốn, với những chọn lựa khác nhau không giới hạn.

Ngoài ra, với textbox công thức tự gõ, ta có thể tính bất cứ thứ gì, miễn là gõ đúng công thức ra.

Ghi chú:
Kết quả tự tính khi các tham số thay đổi hoặc gõ vào. Nút recalculate chỉ dùng khi thay đổi option, thêm bớt tham số mà thôi. Nếu thay đổi option đồng thời có thay đổi giá trị tham số, cũng không cần dùng đến nút ấy.
 

File đính kèm

Lần chỉnh sửa cuối:
Nếu tôi làm cái này thì tôi hiển thị luôn công thức sau khi nguời dùng chọn xong phần tính toán
Ví dụ nếu người dùng chọn diện tích hình chữ nhật thì tôi sẽ hiện ra một label: diện tích = dài x rộng
 
Upvote 0
Nếu tôi làm cái này thì tôi hiển thị luôn công thức sau khi nguời dùng chọn xong phần tính toán
Ví dụ nếu người dùng chọn diện tích hình chữ nhật thì tôi sẽ hiện ra một label: diện tích = dài x rộng

Bài này tôi viết chủ yếu là giới thiệu cách thực hiện tính toán rất nhiều công thức trên 1 số giới hạn các textbox (File có thể còn chưa bẫy lỗi hết). Do 1 textbox có thể dùng cho nhiều công thức khác nhau nên tôi giới thiệu cách thay đổi label của textbox theo công thức tương ứng.

Các cái râu ria trình bày thì tôi nghĩ ai làm cũng được nên không giới thiệu. Vả lại, có mấy ai lấy form này về xài luôn đâu, họ sẽ chỉ cần lấy ý tưởng.
 
Upvote 0
Công thức tự tính lại khi chọn lại option tính toán có thêm bớt tham số, nhưng nút Recalculate không bỏ đi.

Có thể chọn 1 ô trên bảng tính rồi gán kết quả xuống (mặc định là A1)
 

File đính kèm

Upvote 0
New Bitmap Image.jpg

chào bạn. mình cúng có một from gồm các textbox và 2 listbox, cùng các button
-sau khi mình nhập các số liệu cào listbox 1 (listbox ở trên) với các khoảng 2 dòng trong listbox1.
- mình nhấp button (xử lý) thì listbox2 (list phía dưới) sẽ tính toán (+,-,*,/..) các giá trị số trong listbox 1, và hiên các kết quả tính được lên listbox2.
bạn giúp mình nhe. thanks
 
Upvote 0
Công thức tự tính lại khi chọn lại option tính toán có thêm bớt tham số, nhưng nút Recalculate không bỏ đi.

Có thể chọn 1 ô trên bảng tính rồi gán kết quả xuống (mặc định là A1)
Em cần tạo một form tính toán giá thành sản xuất với khoảng 6 tham số nhưng không biết cách. Mong anh tu vấn giúp với. Em mới làm quen với Excel thôi hà. Thank you
 
Upvote 0

Bài viết mới nhất

Back
Top Bottom