Diễn giải công thức!

[hoquangvinh]

Cảm ơn 2 ngôi nhà GPE mình đã làm được rồi

 

[constructxda]

Giả sử mình có bảng dữ liệu như sau:

View attachment 86454

Hiện tại phần diễn giải mình phải nhập bằng tay, bạn nào biết cách tạo hàm cho cái này chạy tự động giúp mình với !

Từ bản office 2013 trở lên bạn dùng hàm FORMULATEXT, còn không thì bạn dùng đoạn code trong file "dien giai cong thuc cuc hay"của bác khoavu87 là được mà

 

[constructxda]

ở đây em có bảng đề nghị thanh toán cho công trình xây lắp, tại cột ghi chú em đang tính đặt hàm tự động cho nó bắt công thức rồi diễn giải ra cách tính. nhưng bị vướng cái trong công thức phải dùng dấu nháy để cho nó bắt ký tự thay thế ra tên giá trị nên khi coppy công thức đi chỗ khác thì vẫn phải sửa nội dung trong dấu nháy này. Nếu dùng address thì hàm dài lắm. Bác nào có cách khác giúp em với ạ.

 

[thanhdatx2bk]

b

Excel 2013 có hàm formulatext. VD: C1=A1+B1, hàm formulatext(C1) sẽ cho kết quả =A1+B1. Nếu muốn thêm địa chỉ của ô lấy công thức thì nối một số hàm lại là xong: =SUBSTITUTE(ADDRESS(ROW(C1);COLUMN(C1));"$";"")&FORMULATEXT(C1), kết quả trả về C1=A1+B1
Nếu dùng 2003 thì đành dùng add-ins (hoặc gắn trực tiếp vào file) với hàm sau:

Function Diengiai(a As Range) As String
Diengiai = Replace(a.Address, "$", "") & a.Formula
End Function

hay lắm bác, quá nhanh quá nguy hiểm

 

[quangcda]

Từ bản office 2013 trở lên bạn dùng hàm FORMULATEXT, còn không thì bạn dùng đoạn code trong file "dien giai cong thuc cuc hay"của bác khoavu87 là được mà

Mình tải file của khoavu87 đó thử thì ok. Nhưng muốn đưa addin hay gì đó sang file khác để dùng thì phải làm thế nào vậy. mình ko rành vba.

Từ bản office 2013 trở lên bạn dùng hàm FORMULATEXT, còn không thì bạn dùng đoạn code trong file "dien giai cong thuc cuc hay"của bác khoavu87 là được mà

 

[quangcda]

Thử xem sao. Cái này của diễn đàn

Muốn dùng được ở các file khác thì làm tn hả bác. em chỉ làm dc trong file này thôi a.

 

[NGOC310]

=IFERROR(AGGREGATE(15;6;AU$10:AU$183/(AU$10:AU$183>0);ROWS(BJ$193:BJ194));"")
=IFERROR(INDEX(BJ$194:BJ$346;MATCH(;INDEX(COUNTIF(BC$193:BC193;BJ$194:BJ$346);;"")
Có bác nào giải thích giúp em công thức trong file này ko ạ

 

[hskcs.doi3]

Thử xem sao. Cái này của diễn đàn

Xin mã code cho công thức diễn giải

 

[vanle33]

Xin mã code cho công thức diễn giải

Tôi mở file / nhấn Alt+F11 thấy đọc được code trong Module 1. Không có pass VBA. Bạn thử như vậy xem.