質問掲示板
岡三RSS
集いの広場

イーサン様
私は一覧的なものを持っておりませんでして、ストレートなご回答ができずに申し訳ありません。
このような方法もある、という例を挙げさせていただきます。
　①vbaでRANKING_Mをセルに記述
　②vbaで更新ボタンを押す
もしご参考になれば幸いです。

2019年04月09日

小笠原さま

いつもながら迅速な回答ありがとうございます。深謝いたします。

さて、わたしの質問の仕方が悪かったのですが、今回知りたいのは
　VBAのソースから（セルに記述することなく）直接
　呼び出せる関数は何か？
ということです。

公式マニュアルにも目を通しましたが見当たらなく、ご存知の
関数だけでもご教示いただければ幸いです。

2019年04月09日

イーサンさん、こんにちは

横から失礼します。
自分も一覧はもっていないのですが、
岡三RSSの関数で『表示開始セル』の引数があるものは、VBAから呼ぶことができません。
逆に言いますと『表示開始セル』がないものはVBAから呼ぶことができます。

しかし、この時注意点が一点ありまして、
『表示開始セル』の引数が無いものでも、
発注系関数以外は、どこかのセルに記述しておかないと値が取れません。
※多分ですが、不要な情報取得のための通信をしないようになってる気がします。

どこかのセルに記述しておくと、その後はVBAからでも取得が可能でーす。

一覧というわけではないですが、ご参考になれば幸いです！！

2019年04月10日

Ryo Ohnoさん、こんにちは。

回答をいただきましてありがとうございます。

とても参考になりました。

Ryo Ohnoさん、小笠原さんも心強く大変感謝しております。

いつもありがとうございます。

2019年04月10日

QUOTEテスト.xlsx (31.3KB)

Ryo Ohnoさん、こんにちは。

10連休前の微妙な時期にすみませんが、2点ほど
おしえていただけますでしょうか。

添付の通り、ExcelシートにQUOTE関数を記述して
情報が取得できることは確認できたのですが、
VBAのソースからQUOTE関数を呼びだして、情報を取得する
方法が分かりませんでした。

下記のコードを実行すると
「Sub または Functionが定義されていません。」と出て
怒られます。

質問1：コードはどのように記述すればよいのでしょうか？
質問2：QUOTEの結果は、VBAのソースの中で値として
　　　　取得することはできるのでしょうか？



コード
-------------------------------------------------
Option Explicit

Sub QuoteTest()

Dim ws As Worksheet

Set ws = ThisWorkbook.Worksheets(1)

ws.Cells(2, 3) = QUOTE("9984", "", "銘柄コード")

End Sub
-------------------------------------------------
■備考
添付のファイルは、拡張子をxlsxからxlsmにして開いてください。

本当にすみませんがよろしくおねがいいたします。

2019年04月24日