cách gán công thức chứa function trong vba

[truonghagpex]

các anh, chị cho em hỏi em đang tập lập trình trong vba nhưng em muốn gán công thức cho một cell bất kỳ công thức như sau: =IF(truonghass($H$5)=truonghass(C18);(F18);"-"), trong đó truonghass là function mà em đã lập vậy làm cách nào vàcó cách nào hay không để em có thể làm được điều này vì bảng tính của em rất nhiều ô cần làm như vậy không thể làm bằng thủ công được. mong anh chị giúp đỡ em với. em cảm ơn nhiều

 

[Hai Lúa Miền Tây]

các anh, chị cho em hỏi em đang tập lập trình trong vba nhưng em muốn gán công thức cho một cell bất kỳ công thức như sau: =IF(truonghass($H$5)=truonghass(C18);(F18);"-"), trong đó truonghass là function mà em đã lập vậy làm cách nào vàcó cách nào hay không để em có thể làm được điều này vì bảng tính của em rất nhiều ô cần làm như vậy không thể làm bằng thủ công được. mong anh chị giúp đỡ em với. em cảm ơn nhiều

Bạn làm như sau:

DiaChiCell.Formula = "=HamCuaBan"

 

[cadafi]

các anh, chị cho em hỏi em đang tập lập trình trong vba nhưng em muốn gán công thức cho một cell bất kỳ công thức như sau: =IF(truonghass($H$5)=truonghass(C18);(F18);"-"), trong đó truonghass là function mà em đã lập vậy làm cách nào vàcó cách nào hay không để em có thể làm được điều này vì bảng tính của em rất nhiều ô cần làm như vậy không thể làm bằng thủ công được. mong anh chị giúp đỡ em với. em cảm ơn nhiều

Ở ngoài sheet gõ như thế nào thì trong VBA bạn viết y như vậy.

Sub Test()
.....
Range("A1").value = "=IF(truonghass($H$5)=truonghass(C18);(F18);""-"")"
......
End Sub

 

[truonghagpex]

vậy thì 2 cách trên .value là giá trị và .formular là công thức nó sẽ khác nhau trong trường hợp này như thế nào của ai hay hơn

 

[Hai Lúa Miền Tây]

vậy thì 2 cách trên .value là giá trị và .formular là công thức nó sẽ khác nhau trong trường hợp này như thế nào của ai hay hơn

Cái này bạn nên thử và đưa ra câu trả lời nhé.

 

[Đình Phán]

Cái này bạn nên thử và đưa ra câu trả lời nhé.

Nếu để Formular thì tại ô của bạn chi trỏ chuột vào sẽ hiện công thức trên thanh Formular của excel (fx) trong khi Value chỉ hiện giá trị thôi.
Giống như bạn Paste Value vậy.

 

[Đình Phán]

Ở ngoài sheet gõ như thế nào thì trong VBA bạn viết y như vậy.

Sub Test()
.....
Range("A1").value = "=IF(truonghass($H$5)=truonghass(C18);(F18);""-"")"
......
End Sub

Các anh cho em hỏi với.
Giả sử em có nhiều địa chỉ cần gán công thức, mỗi địa chỉ lại có công thức khác nhau
(khoảng hơn 100 dòng)
Nếu làm theo cách của anh Cadafi thì code dài quá. Các anh cho em xin giải pháp nào tốt hơn được không ạ?

Em cảm ơn!