Xin hàm tự tạo giúp phát hiện một ô có phải là công thức hay không

hktanh · 29/10/19

Chào các bạn, các bạn giúp mình bài toán về hàm tự tạo này nhé, đó là mình muốn có một hàm tự tạo có thể phát hiện một ô có chứa công thức hay không, mình lấy ví dụ các ô kiểu như sau: Các ô chứa =1+2 ; ="a"&"b" ; =9/0 (tuy là lỗi nhưng vẫn là công thức) ; =A2+1 ; =SUM(A1:A10) trả về kết quả là TRUE, còn các ô mà mình gõ tay trực tiếp kiểu như: abc ; 999 sẽ trả về FALSE nhé.
Cấu trúc hàm kiểm tra ô có phải công thức không, do mình đề xuất là =Tên hàm(ô cần kiểm tra) , nếu là công thức trả về TRUE, còn không phải trả về FALSE
- Nếu gõ trực tiếp công thức vào trong hàm, ví dụ: =Tên hàm(SUM(A1:A10)) -> Trả về TRUE (tất nhiên rồi) . Mình cảm ơn nhé

stao · 29/10/19

Vầy đúng yêu cầu không bạn

hktanh · 29/10/19

stao đã viết:
Vầy đúng yêu cầu không bạn

Bạn khôn thật đấy %#^#$

Bài đã được tự động gộp: 29/10/19

stao đã viết:
Vầy đúng yêu cầu không bạn

Bạn ơi lúc mình viết dạng chuỗi là '=abc chẳng hạn thì nó vẫn trả về TRUE bạn nhé, bạn xem lại giúp mình với, mà không biết có cách nào có thể xử lý triệt để được việc kiểm tra có phải công thức không nhỉ, dù sao thì cách nghĩ của bạn cũng rất hay :sweatdrop:

batman1 · 29/10/19

=kiemtra(H4) trả về TRUE dù H4 chỉ là ô diễn giải.

stao · 29/10/19

hktanh đã viết:
Bạn khôn thật đấy

Bài đã được tự động gộp: 29/10/19

Bạn ơi lúc mình viết dạng chuỗi là '=abc chẳng hạn thì nó vẫn trả về TRUE bạn nhé, bạn xem lại giúp mình với, mà không biết có cách nào có thể xử lý triệt để được việc kiểm tra có phải công thức không nhỉ, dù sao thì cách nghĩ của bạn cũng rất hay

Fix luôn lỗi dạng diễn giải nha. Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào.

batman1 · 29/10/19

Sao lại rắc rối thêm làm gì?
G4 =SUM(A1:A10) và hàm trả về FALSE

ct.HasFormula là được

stao · 29/10/19

batman1 đã viết:
Sao lại rắc rối thêm làm gì?
G4 =SUM(A1:A10) và hàm trả về FALSE

ct.HasFormula là được

Thử đi rồi biết.
Bản chất .HasFormula là tính sau dấu "=" là formula. Nên kiểu cắt cớ là "=abc" = False phải thêm vậy đó bạn.

befaint · 29/10/19

stao đã viết:
Vầy đúng yêu cầu không bạn

Chắc chắc là không có đúng và không cần VBA gì. MS Excel có sẵn hàm ISFORMULA siêu xịn rồi.

=ISFORMULA(G4)
Vậy là được.

Hàm của bạn sai khi nhập vào chuỗi có dạng: '=1+1 (có dấu nháy ở trước dấu =)

batman1 · 29/10/19

stao đã viết:
Thử đi rồi biết.
Bản chất .HasFormula là tính sau dấu "=" là formula. Nên kiểu cắt cớ là "=abc" = False phải thêm vậy đó bạn.

Thử gì nữa?
Trong G4 rõ ràng có công thức mà hàm trả về FALSE thì rõ như ban ngày rồi còn gì phải lăn tăn. Người ta mong đợi TRUE mà nhận được FALSE thì sai rồi chứ thử gì nữa?
.

Bài đã được tự động gộp: 29/10/19

befaint đã viết:
Chắc chắc là không có đúng và không cần VBA gì. MS Excel có sẵn hàm ISFORMULA siêu xịn rồi.

=ISFORMULA(G4)
Vậy là được.

Đây là box Lập trình mà.
Và người ta có thể muốn kiểm tra trong khi chạy một đoạn code nào đó.

stao · 29/10/19

batman1 đã viết:
Thử gì nữa?
Trong G4 rõ ràng có công thức mà hàm trả về FALSE thì rõ như ban ngày rồi còn gì phải lăn tăn. Người ta mong đợi TRUE mà nhận được FALSE thì sai rồi chứ thử gì nữa?
.

Bài đã được tự động gộp: 29/10/19

ây là box Lập trình mà.
Và người ta có thể muốn kiểm tra trong khi chạy một đoạn code nào đó.

Bình tĩnh xem lại đi bạn. Chủ thớt người ta đã xác nhận kết quả rồi kìa
Đọc kỹ đoạn này của mình: "Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào. "

be_09 · 29/10/19

hktanh đã viết:
Chào các bạn, các bạn giúp mình bài toán về hàm tự tạo này nhé, đó là mình muốn có một hàm tự tạo có thể phát hiện một ô có chứa công thức hay không, mình lấy ví dụ các ô kiểu như sau: Các ô chứa =1+2 ; ="a"&"b" ; =9/0 (tuy là lỗi nhưng vẫn là công thức) ; =A2+1 ; =SUM(A1:A10) trả về kết quả là TRUE, còn các ô mà mình gõ tay trực tiếp kiểu như: abc ; 999 sẽ trả về FALSE nhé.
Cấu trúc hàm kiểm tra ô có phải công thức không, do mình đề xuất là =Tên hàm(ô cần kiểm tra) , nếu là công thức trả về TRUE, còn không phải trả về FALSE
- Nếu gõ trực tiếp công thức vào trong hàm, ví dụ: =Tên hàm(SUM(A1:A10)) -> Trả về TRUE (tất nhiên rồi) . Mình cảm ơn nhé

Sử dụng công cụ có sẳn, rất nhanh lẹ:
Chọn vùng cần kiểm tra, nhấn Ctrl + G, nhấn nút Special > chọn FormuLas rồi nhấn OK, nó sẽ chọn tất cả các cell có chứa hàm (hình 1), xong click phải chuột tô cho nó một màu để phân biệt (hình 2).

Hình 1.

Hình 2.

snow25 · 29/10/19

stao đã viết:
Bình tĩnh xem lại đi bạn. Chủ thớt người ta đã xác nhận kết quả rồi kìa
Đọc kỹ đoạn này của mình: "Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào. "

Mình thấy nếu hàm mà không sử dụng các dấu mà bạn khai báo thì sẽ sai kết quả trả về False.

befaint · 29/10/19

hktanh đã viết:
Đây là box Lập trình mà.
Và người ta có thể muốn kiểm tra trong khi chạy một đoạn code nào đó.

Em căn cứ vào câu cuối (không biết câu đó chủ thớt chốt hạ chưa?)

batman1 · 29/10/19

stao đã viết:
Bình tĩnh xem lại đi bạn. Chủ thớt người ta đã xác nhận kết quả rồi kìa
Đọc kỹ đoạn này của mình: "Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào. "

Xem gì? Xác nhận kết quả gì? Yêu cầu đặt ra là nếu ô có công thức thì phải trả về TRUE. G4 rõ ràng có công thức =SUM(A1:A10) mà hàm trả về FALSE thì rõ ràng là sai chứ cần gì ông A ông B xác nhận hay không? Nếu ông A nói là ông ta hài lòng thì kết quả như thế vẫn là sai. Sự thật là sự thật, đâu phải là ông A gật đầu thì mới là sự thật, ông A lắc đầu thì đó không là sự thật.

Bạn à, tôi không viết thư riêng, không trao đổi riêng. Khi tôi trả lời trên GPE thì nếu tôi viết cho chủ chủ đề 1 thì viết cho những người khác 10. Nhiều khi viết nhưng chỉ viết, chỉ lưu ý cho những người khác, không trả lời trực tiếp cho chủ chủ đề.
Với một vấn đề đặt ra nhiều khi người hỏi hài lòng với giải pháp tạm bợ, không hoàn chỉnh. Nhiều trường hợp công thức, code đưa ra sai nhưng do người hỏi không test kỹ với những dữ liệu đa dạng nên viết: "Chuẩn không cần chỉnh", "Công thức hay quá". Đã nhiều lần tôi chỉ ra là "Công thức hay quá, chuẩn không cần chỉnh" kia sai. Vì thế tôi không quan tâm tới chuyện người hỏi hài lòng hay không. Nếu giải pháp đưa ra không giải quyết đúng yêu cầu được ghi rõ ràng trên giấy trắng mực đen thì tôi sẽ ý thức cho những người đọc bây giờ và trong tương lai. Tôi không quan tâm tới ý kiến của người hỏi vì nhiều khi họ không ý thức được là giải pháp chưa chuẩn hoặc họ hài lòng với những gì nhận được. Nhưng những người đọc khác có vấn đề tương tự thì chưa chắc họ hài lòng. Tôi ý thức cho những người như thế. Tôi không trao đổi riêng với người hỏi qua tin nhắn, thư riêng. Tôi viết trên diễn đàn có hàng nghìn người đọc. Không phải vô cớ mà người ta quyết định là tất cả các bài viết là tài sản chung của diễn đàn, phục vụ không chỉ người hỏi mà còn rất nhiều người khác nữa.

Bài đã được tự động gộp: 29/10/19

befaint đã viết:
Em căn cứ vào câu cuối (không biết câu đó chủ thớt chốt hạ chưa?)

View attachment 227365

Thì người ta có nói rõ đâu. Hàm có thể dùng để lúc này nhập trên sheet lúc khác để gọi trong code. Yêu cầu của người ta thế, và người ta hỏi trong Lập trình. Bài của tôi cũng chỉ là ý kiến như bài của bạn thôi.. Tôi không có ý gì khác.

be_09 · 29/10/19

Theo quan điểm của tôi thì kiểm tra và tô màu ngay các Cell chứa hàm luôn, chỉ cần nhìn lướt qua là biết chỗ nào có hàm rồi.
Nếu một bảng tính có vài chục cột có chứa hàm mà dùng cột phụ để kiểm tra từng cột thì chắc hết hơi.

Giả sử A3 là Cell chứa tiêu đề thì thử code sau:

Mã:

Sub ToMau_Ham()
    Sheet1.Range("A3").CurrentRegion.Interior.ColorIndex = xlNone
    Sheet1.Range("A3").CurrentRegion.SpecialCells(xlCellTypeFormulas, 23).Select
    With Selection.Interior
        .ColorIndex = 27
    End With
End Sub

hktanh · 30/10/19

stao đã viết:
Fix luôn lỗi dạng diễn giải nha. Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào.

Bạn ơi mình phát hiện ra vấn đề này trong hàm của bạn, đó là nếu gõ công thức đơn giản kiểu =D13 hoặc ="abc" ; =99 chẳng hạn thì hàm của bạn vẫn trả về False nhé, bạn giúp mình sửa lỗi này với :sweatdrop:

befaint · 30/10/19

hktanh đã viết:
Bạn ơi mình phát hiện ra vấn đề này trong hàm của bạn, đó là nếu gõ công thức đơn giản kiểu =D13 hoặc ="abc" ; =99 chẳng hạn thì hàm của bạn vẫn trả về False nhé, bạn giúp mình sửa lỗi này với

Còn cố đấm ăn xôi gì nữa bạn. Không lại được với hàm có sẵn của MS Excel đâu. Người ta đã thôi rồi, bạn còn níu kéo làm khó người ta.

Hàm ISFORMULA() là chuẩn cho bạn rồi.

hktanh · 30/10/19

befaint đã viết:
Còn cố đấm ăn xôi gì nữa bạn. Không lại được với hàm có sẵn của MS Excel đâu. Người ta đã thôi rồi, bạn còn níu kéo làm khó người ta.

Hàm ISFORMULA() là chuẩn cho bạn rồi.

Excel 2010 mình không thấy có hàm IsFormula nhé

Bài đã được tự động gộp: 30/10/19

stao đã viết:
Fix luôn lỗi dạng diễn giải nha. Bản chất sau dấu bằng là formula, còn muốn chi tiết và có thành phần toán tử nào nữa thì bạn có thể thêm vào.

Mình sửa lại hàm của bạn như vậy có được không nhỉ :")) mình mầy mò chút chứ mình phát hiện ra là nếu hàm của bạn mà gặp phải công thức đơn giản như =D13 hoặc =99 hoặc ="abc" thì sẽ trả về False ý

Function kiemtra(ct As Range) As Variant
'If Left(ct.Formula, 1) = "=" Then kiemtra = True Else kiemtra = False
If ct.HasFormula = True And (InStr(ct.Formula, Address) > 0 Or InStr(ct.Formula, Value) > 0 Or InStr(ct.Formula, Text) > 0 Or InStr(ct.Formula, "(") > 0 Or InStr(ct.Formula, "+") > 0 Or InStr(ct.Formula, "-") > 0 Or InStr(ct.Formula, "*") > 0 Or InStr(ct.Formula, "/") > 0 Or InStr(ct.Formula, "&") > 0) Then
kiemtra = True
Else
kiemtra = False
End If
End Function

be_09 · 30/10/19

hktanh đã viết:
Bạn ơi mình phát hiện ra vấn đề này trong hàm của bạn, đó là nếu gõ công thức đơn giản kiểu =D13 hoặc ="abc" ; =99 chẳng hạn thì hàm của bạn vẫn trả về False nhé, bạn giúp mình sửa lỗi này với

Sao bạn hay lăng tăng thế nhĩ:
1/ Bài 11 và 15 tôi đã đưa ra 02 cách để bạn có thể lựa chọn 1 cách cho phù hợp.
2/ Với cách làm trên có mấy cái thuận lợi sau:
- Tìm ngay tới những chỗ hoặc Cell nào có chứa hàm một cách nhanh chóng nhất (nếu sử dụng dấu = trong tính toán hoặc Link bất kỳ chỗ nào).
- Có thể áp dụng cho File có nhiều cột và quá quá nhiều dòng chứa dữ liệu.
- Không làm cho File bị ì ạch khi sử dụng.

hktanh · 30/10/19

be09 đã viết:
Sao bạn hay lăng tăng thế nhĩ:
1/ Bài 11 và 15 tôi đã đưa ra 02 cách để bạn có thể lựa chọn 1 cách cho phù hợp.
2/ Với cách làm trên có mấy cái thuận lợi sau:
- Tìm ngay tới những chỗ hoặc Cell nào có chứa hàm một cách nhanh chóng nhất (nếu sử dụng dấu = trong tính toán hoặc Link bất kỳ chỗ nào).
- Có thể áp dụng cho File có nhiều cột và quá quá nhiều dòng chứa dữ liệu.
- Không làm cho File bị ì ạch khi sử dụng.

tôi đang hỏi dùng công thức cho nó tự động chứ không phải mấy cái mà cậu vừa nố đâu, hơn nữa thì số ô chứa công thức rất nhiều, tôi có bị điên đâu mà tô màu tất cả những ô này cho hoa mắt à

Xin hàm tự tạo giúp phát hiện một ô có phải là công thức hay không

Thành viên bị đình chỉ hoạt động

File đính kèm

Thành viên hoạt động

File đính kèm

Thành viên bị đình chỉ hoạt động

File đính kèm

Thành viên gạo cội

Thành viên hoạt động

File đính kèm

Thành viên gạo cội

Thành viên hoạt động

|||||||||||||

Thành viên gạo cội

Thành viên hoạt động

Biên Hòa, Đồng Nai

Thành viên gạo cội

|||||||||||||

Thành viên gạo cội

Biên Hòa, Đồng Nai

Thành viên bị đình chỉ hoạt động

File đính kèm

|||||||||||||

Thành viên bị đình chỉ hoạt động

Biên Hòa, Đồng Nai

Thành viên bị đình chỉ hoạt động

Facebook

Group