vb.net - 使用 VB.NET 填充模式到 Excel 单元格

Question

如何填充一个模式来excel单元格？

根据这个论坛上的一些帖子，我尝试使用以下功能，但到目前为止没有成功。

一个）

oWB1.Worksheets(i).Cells(7, 3).Interior.PatternIndex = 5

b)

Dim style As Microsoft.Office.Interop.Excel.Style
style = oWB1.Styles.Add("Style1")
style.Interior.Pattern = Microsoft.Office.Interop.Excel.XlPattern.xlPatternSolid
oWB1.Worksheets(i).Cells(7, 3).Style = "Style1"

任何帮助将不胜感激。

谢谢

Answer 1

此（Excel VSTO）代码有效：

Dim rng As Range = activeSheet.Range(1,1)
rng.Style = "Calculation"

“计算”是样式的名称。