ここから本文です

Excelのマクロでデータ分析のヒストグラムを実行したいのですが,VBAは初心者なの...

kaz********さん

2018/4/1122:21:06

Excelのマクロでデータ分析のヒストグラムを実行したいのですが,VBAは初心者なので見よう見まねで書いてみたところうまく動かなかったので何が間違っているのか教えてほしいです.

コードは以下のようになります.

Sub Histogram()

Application.Run "ATPVBAEN.XLAM!Histogram", ActiveSheet.Range(Selection, Selection.End(xlDown)), ActiveSheet.Range(Selection.Offset(-1, 1)), , False, False, False, False

End Sub

いろいろやってうまくいかないのはActiveSheet.Range(Selection.Offset(-1, 1))の部分であることはわかっていますが,選択したセルの右上のセルに結果を出力したいのですがどう書けばよいのでしょうか?

閲覧数:
197
回答数:
1
お礼:
500枚

違反報告

ベストアンサーに選ばれた回答

プロフィール画像

カテゴリマスター

taihenda****さん

2018/4/1205:39:45

3番目のデータ区間は省略できないのではないでしょうか?
ActiveSheet.Range(Selection.Offset(-1, 1))も変ですね。

データ区間をA2:A6(緑)
選択したセルはB2セル(黄色)として検証、

これで添付図のようになります。


Sub Histogram()
Application.Run "ATPVBAEN.XLAM!Histogram", _
ActiveSheet.Range(Selection, Selection.End(xlDown)), _
ActiveCell.Offset(-1, 1), _
ActiveSheet.Range("$A$2:$A$6"), _
False, False, False, False
End Sub

3番目のデータ区間は省略できないのではないでしょうか?...

質問した人からのコメント

2018/4/12 14:30:10

なんとか出来ました!!

ActiveSheet.Range(Selection.Offset(-1, 1))

ActiveCell.Offset(-1, 1)

と書き直したら右上のセルに結果が出力されました!

どうやらデータ区間は省略できるみたいです.

ご協力ありがとうございました!!

みんなで作る知恵袋 悩みや疑問、なんでも気軽にきいちゃおう!

Q&Aをキーワードで検索:

Yahoo! JAPANは、回答に記載された内容の信ぴょう性、正確性を保証しておりません。
お客様自身の責任と判断で、ご利用ください。
本文はここまでです このページの先頭へ

「追加する」ボタンを押してください。

閉じる

※知恵コレクションに追加された質問は選択されたID/ニックネームのMy知恵袋で確認できます。

不適切な投稿でないことを報告しました。

閉じる