![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.2ベストアンサー
- 回答日時:
#1です。
Dim cols() As Object = New Object(3) {1, 2, 3, 4}
Dim sum As New FarPoint.CalcEngine.SumFunctionInfo
Dim res As Object = sum.SumFunction.Evaluate(cols)
MessageBox.Show(res.ToString())
という使い方ができますので、セルの内容を配列で持ってくればできるかと。
ご参考とまで。
No.1
- 回答日時:
SPREADの関数はセルに埋め込んで使用するものです。
たとえばA1からC3のSUMをC4に出力する場合、
Spread.Sheets(n).Cells(3, 2).Formula = "SUM(A1:C3)"
と設定し、C4のValueを参照すると結果が得られます。
この回答への補足
有難うございます。
> SPREADの関数はセルに埋め込んで使用するものです。
EXCELのWorksheetFunctionの様な使い方が出来ないものか
と思い質問しました。
現在、次の様にやっています。
Private Sub gdRireki_SelectionChanged(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.SelectionChangedEventArgs) Handles gdRireki.SelectionChanged
Dim suryo As Integer = 0
Dim sr As Integer
Dim er As Integer
If e.Range.Row = -1 Then
sr = 0
er = gdRireki.Sheets(0).Rows.Count - 1
Else
sr = e.Range.Row
er = e.Range.Row + e.Range.RowCount - 1
End If
For r As Integer = sr To er
suryo += gdRireki.Sheets(0).Cells(r, 7).Value
Next r
end sub
別に問題なく動いているのですが、もっとスマートに出来ないものかと
質問しました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・「I love you」 をかっこよく翻訳してみてください
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・昔のあなたへのアドバイス
- ・かっこよく答えてください!!
- ・あなたが好きな本屋さんを教えてください
- ・スタッフと宿泊客が全員斜め上を行くホテルのレビュー
- ・【大喜利】【投稿~8/27】 こんなガソリンスタンド二度と来るか!なぜそう思った?
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・【お題】動物のキャッチフレーズ
- ・【お題】甲子園での思い出の残し方
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・「それ、メッセージ花火でわざわざ伝えること?」
- ・自分用のお土産
- ・人生で一番お金がなかったとき
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・ちょっと先の未来クイズ第1問
- ・ゴリラ向け動画サイト「ウホウホ動画」にありがちなこと
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel UserForm の表示位置
-
VBAマクロ実行時エラーの修正に...
-
C# DataGridViewで複数選択した...
-
VBAの一次元配列から二次元配列へ
-
マクロ初心者です。 マクロで範...
-
VBA 特定のセルからoffsetされ...
-
VBAでユーザーフォームにセル値...
-
Excel VBA : セルのコメントの...
-
特定の色のついたセルを削除
-
MS Accessのウインドウ内の右端...
-
複数指定セルの可視セルのみを...
-
お力添えください。
-
関数の引数でrangeを指定したとき
-
エクセルで選択したセルの内容...
-
PasteSpecial Paste:=[********...
-
VBAについて
-
webページ テーブルのセル中の...
-
ExcelVBA チェックボックスに値...
-
【VBA】写真の貼り付けコードが...
-
[C#]DataGridViewのVirtual Mod...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
エクセルVBA 配列からセルに「...
-
【Excel VBA】一番右端セルまで...
-
Excel UserForm の表示位置
-
特定の色のついたセルを削除
-
Excelで空白セル直前のセルデー...
-
【VBA】【ユーザーフォーム_Lis...
-
VBA:日付を配列に入れ別セルに...
-
VBA にて、条件付き書式で背景...
-
C# DataGridViewで複数選択した...
-
入力規則のリスト選択
-
Excel VBA IF文がうまく動作し...
-
【VBA】写真の貼り付けコードが...
-
Excel 範囲指定スクショについ...
-
EXCEL VBA 文中の書式ごと複写...
-
Excel VBAでCheckboxの名前を変...
-
EXCEL 2010 VBAでピボットで複...
-
飛び地セルの空白判定
-
エクセルのカーソルを非表示に...
-
CellEnterイベント仕様について
おすすめ情報