Public Function wj(ByVal s As String) As Variant
wj = Application.Evaluate(s)
End Function
定義一個功能，名叫wj
代碼功能，代替evaluate實現對單元格內的公式進行計算並顯示結果。使用時，像公式一樣輸入。
在excel中利用宏替代evaluate
發表評論
所有評論
還沒有人評論，想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章
Public Function wj(ByVal s As String) As Variant
wj = Application.Evaluate(s)
End Function
定義一個功能，名叫wj
代碼功能，代替evaluate實現對單元格內的公式進行計算並顯示結果。使用時，像公式一樣輸入。