[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『Worksheet関数について』(kao)
web上で探し以下作成してみました
Rangeメソットは失敗しました エラーがでます
お解りの方 教えて下さい
Sub 合計()
Dim lastRow As Long lastRow = Range("E" & Rows.Count).End(xlUp).Row
Dim fSum As Variant
fSum = Format(WorksheetFunction.Sum(Range("E2:E"), lastRow, "\\#,##0;\\▲#,##0")) ★ MsgBox "合計数は" & fSum & "です" End Sub
< 使用 Excel:Excel2010、使用 OS:Windows7 >
>fSum = Format(WorksheetFunction.Sum(Range("E2:E"), lastRow, "\\#,##0;\\▲#,##0")) ★ ↓ fSum = Format(WorksheetFunction.Sum(Range("E2:E" & lastRow)), "\\#,##0;\\▲#,##0")
(半平太) 2015/11/25(水) 20:21
(kao) 2015/11/25(水) 20:56
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.