Giúp code để nhận biết 1 ô có công thức hay là không có công thức là text

[hondacrv2019]

Chào cả nhà . Chúc cả nhà năm 2019 phát tài rực rở
Cho em hỏi dùng đoạn code nào để phát hiện ô có công thức hay là text. nếu có công thức là TRUE ngược lại False ví dụ ô A1 chẳng hạn. Xin chân thành cảm ơn

 

[ppc0312]

Chào cả nhà . Chúc cả nhà năm 2019 phát tài rực rở
Cho em hỏi dùng đoạn code nào để phát hiện ô có công thức hay là text. nếu có công thức là TRUE ngược lại False ví dụ ô A1 chẳng hạn. Xin chân thành cảm ơn

Thử thuộc tính HasFormula của Range xem sao
Range.HasFormula
Xem link:

Range.HasFormula property (Excel)

-

 

[hondacrv2019]

Thử thuộc tính HasFormula của Range xem sao
Range.HasFormula
Xem link:

Range.HasFormula property (Excel)

-

Sub text()

If Range("A1").HasFormula = True Then
MsgBox ("khong co cong thuc")
Else
MsgBox (" co cong thuc")
End If

End Sub

Đã thử và không phân biệt được a

 

[ppc0312]

Sub text()

If Range("A1").HasFormula = True Then
MsgBox ("khong co cong thuc")
Else
MsgBox (" co cong thuc")
End If

End Sub

Đã thử và không phân biệt được a

Đọc lại đi, ngược rồi
Range("A1").HasFormula = True ==> CÓ CÔNG THỨC

 

[hondacrv2019]

Thử thuộc tính HasFormula của Range xem sao
Range.HasFormula
Xem link:

Range.HasFormula property (Excel)

-

Ak được rồi bạn ơi
Function isFormula(ByVal target As Range) As Boolean isFormula = target.HasFormula End Function Sub dada() If isFormula(Range("a1")) = True Then MsgBox ("Co cong thuc") Else MsgBox ("Khong cong thuc") End If End Sub

 

[be_09]

Chào cả nhà . Chúc cả nhà năm 2019 phát tài rực rở
Cho em hỏi dùng đoạn code nào để phát hiện ô có công thức hay là text. nếu có công thức là TRUE ngược lại False ví dụ ô A1 chẳng hạn. Xin chân thành cảm ơn

Cần gì phải code, làm thủ công đôi khi còn lẹ hơn nhờ trợ giúp chỉ có 1 Cell. Để chọn nhiều Cell chứa hàm thực hiện như sau:
Chọn vùng chứa dữ liệu và nhấn Ctrl + G cửa sổ hiện ra nhấn nút Special cửa sổ Go To Special hiện ra chọn Formulas rồi nhấn OK, những chỗ nào chứa hàm nó sẽ chọn, để đánh dấu thì tô cho nó 1 màu (xem hình).