0

セルを優れたものにするためにパターンを埋める方法は？

このフォーラムのいくつかの投稿に基づいて、私は以下を使用しようとしましたが、これまでのところ成功していません。

a）

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"

どんな助けでも本当にありがたいです。

ありがとう

4

1 に答える 1

0

この（Excel VSTO）コードは機能します：

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

「計算」はスタイルの名前です。

于 2012-12-28T08:00:51.080 に答える