主题：请教：如何在Excel报表中设定自动行高，类似于VBA中的EntireRow.AutoFit？

假设：

Dim Book As New XLS.Book("c:\reports\test.xls")

Dim Sheet As XLS.Sheet = Book.Sheets(0)

Sheet(0,0).Style.WordWrap = True

Sheet(0,0).Value = "我是一个很长很长很长很长很长很长的句子"

Book.Save("c:\reports\test.xls")

我应该如何设定代码，以使得Sheet(0,0)能自动扩充单元格的高度来适应长句子？

就像VBA中的EntireRow.AutoFit指令所起的作用一样？

 做不到。

 必须用vba做。

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range = Ws.Cells
Rg.EntireColumn.AutoFit   '自动调整列宽
Rg.EntireRow.AutoFit  '自动调整行高
App.Visible = True

那么在VBA中有没有类似于