Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2782 / 76735

←次へ　｜　前へ→


	【79593】最終行が取得できません...

［名前なし］ - 18/1/31(水) 12:19 -


	引用なし

	パスワード

最終行が取得できません...
VBAでヒストグラムを作ろうとしていて、最終行が変化する可能性のあるデータを対象とするため、最終行を関数？で取得して範囲を設定しようと思っています。しかし、以下のマクロではエラーとして「ヒストグラムデータ区間を指定してください」と表記されます。VBAを学び始めたばかりなので、どうかご教授ください。
- - - - - - - - -

Sub Histogram()
LASTROW = Cells(Rows.Count, 1).End(xlUp).Row
c_addr1 = 1　　'開始行
c_addr2 = LASTROW　 '最終行
start_cell = "$B$" & c_addr1　
end_cell = "$E$" & c_addr2
data_range = start_cell & ":" & end_cell

Application.Run "ATPVBAEN.XLAM!Histogram", ActiveSheet.Range(data_range) _
, "", ActiveSheet.Range("$G$1:$G$10"), False, False, True, False

End Sub

5 hits

▼

【79593】最終行が取得できません... ［名前なし］ 18/1/31(水) 12:19