1

Excel Interop（.NET）を使用して、1列おきに2つの異なるExcel数式をプログラムで設定するにはどうすればよいですか。例えば、

Range r = _sheet.get_Range(_sheet.Cells[1, 1], _sheet.Cells[I, J])  
r.Formula = "=something1"

すべてのセルに対してそれを行います。

ただし、列内でJは、他のすべての列に式が必要=something2です。

範囲のサイズは、実行時にのみわかります。

4

1 に答える 1

1

最初に、範囲を他のすべての列として定義する関数を作成します。これは、このバリアント(VBA) です。

Sub EveryOtherColumn()

   Dim rangeString As String
   Dim columnLetter As String
   Dim i As Long

   Dim firstCol, lastCol As Long
   firstCol = Selection.Column
   lastCol = Selection.Columns.Count + firstCol - 1

   For i = firstCol To lastCol Step 2
     columnLetter = Chr(i + 64)
     rangeString = rangeString & "," & columnLetter & ":" & columnLetter
   Next i

   rangeString = Mid(rangeString, 2)

   Range(rangeString).Select

End Sub

次に、数式をその範囲に割り当てるだけです。

于 2010-11-04T21:00:37.330 に答える