如何使用VBA将计算列添加到PowerPivot数据模型的表中？

Question

我知道我们可以使用ThisWorkbook.Model对象从VBA向数据模型添加/编辑度量。有没有办法使用模型对象使用VBA添加计算列？