Excel VBA質問箱 IV

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

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


102 / 13165 ツリー ←次へ | 前へ→

【79572】組み込み定数について Excel2003使用者 18/1/14(日) 11:13 質問[未読]
【79573】Re:組み込み定数について γ 18/1/14(日) 18:54 回答[未読]
【79574】Re:組み込み定数について Excel2003使用者 18/1/14(日) 22:18 お礼[未読]
【79577】Re:組み込み定数について w101709x 18/1/16(火) 5:00 発言[未読]
【79579】Re:組み込み定数について Excel2003使用者 18/1/16(火) 20:31 お礼[未読]

【79572】組み込み定数について
質問  Excel2003使用者  - 18/1/14(日) 11:13 -

引用なし
パスワード
   組み込み定数をプロージャに渡す場合、下記のように、
変数の宣言は無指定つまりVarientで使用してますが、
これでよいのでしょうか?

Public Sub Set系列Line(myChart As Chart, 系列 As Long, LineStyl, 色 As Long, 太さ, MarkerStyl)
  With myChart.SeriesCollection(系列)
    .Smooth = True
    .Border.ColorIndex = 色     '紺11/白2
    .Border.Weight = 太さ      '線の太さ'xlHairline
    .Border.LineStyle = LineStyl  '線表示'xlContinuous
    .MarkerStyle = MarkerStyl    'xlNone
  End With
End Sub

組み込み定数をネットで調べたら

組み込み定数は「vbYesNo」や「vbOK」など頭の文字が「vb」から始まるものと、
「xlLeft」などxlから始まるものの2種類があります。

この違いは、ExcelのVBA内で用意されているものは「xl」から始まり、
Visual Basicで用意されているものは「vb」から始まります。
このようにそれぞれ用意されている場所が異なります。

とありましたが、変数の宣言については、見つけられなかったので質問しました。

【79573】Re:組み込み定数について
回答  γ  - 18/1/14(日) 18:54 -

引用なし
パスワード
   (1)オブジェクトブラウザで 例えば xlHairlineを検索してみてください。
Excel.XlBorderWeight のメンバ とあり、他のメンバーの値も分かります。
Longでいいだろうと推測がつきます。

(2)またイミディエイトウインドウで
?TypeName(xlHairline)
とすると、
Long
と返ってきます。

結論:
オブジェクトブラウザの活用、TypeNameの活用などをトライしてみて下さい。

【79574】Re:組み込み定数について
お礼  Excel2003使用者  - 18/1/14(日) 22:18 -

引用なし
パスワード
   γさん、回答ありがとうございます。
今までオブジェクトブラウザはちらっと目に入るくらいで、
しっかり見て活用していませんでした。

オブジェクトブラウザで 
Excel.XlBorderWeightクラス のメンバにxlHairline
を見つけました。

イミディエイトウインドウで
?TypeName(xlHairline)
でLongを確認しました。

これからはオブジェクトブラウザの活用、TypeNameの活用を心がけます。

すっきりしました。ありがとうございました。




【79577】Re:組み込み定数について
発言  w101709x  - 18/1/16(火) 5:00 -

引用なし
パスワード
   そのまま

Public Sub Set系列Line(myChart As Chart, 系列 As Long, LineStyl As Excel.XlLineStyle, 色 As Long, 太さ As Excel.XlBorderWeight, MarkerStyl As Excel.XlMarkerStyle)

と使える気がしますが。

【79579】Re:組み込み定数について
お礼  Excel2003使用者  - 18/1/16(火) 20:31 -

引用なし
パスワード
   >Public Sub Set系列Line(myChart As Chart, 系列 As Long, LineStyl As Excel.XlLineStyle, 色 As Long, 太さ As Excel.XlBorderWeight, MarkerStyl As Excel.XlMarkerStyle)

これでもOKですか。参考にします。
w101709x さん、ありがとうございます。

102 / 13165 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free