ExcelVBA：外部プログラム動作中もマウスカーソルを砂時計のままにするには？

Question

ExcelVBAからttl(tera termマクロ)を呼び出しています。

objShell.Runを使っています。

それを使う理由は、ttlマクロの戻り値を得るためです。

しかし、ttlマクロ呼び出し中にマウスカーソルが砂時計から

矢印に戻ってしまい困ってます。

マウスカーソルを砂時計のままに出来ないでしょうか？

※WindowsAPIでマウスカーソルを砂時計に固定出来ないかと思って、

ネット上を探してみましたが、今のところ見つけられません。

    Application.Cursor = xlWait

    Set objShell = CreateObject("WScript.Shell")

    rtnCode = objShell.Run("ttlマクロ起動", 0, True)

    'rtnCode別に処理

    ・・・・

    Application.Cursor = xlDefault

以上、よろしくお願いします。

Answer 1

大沢さん、こんにちは。

VBA フォーラムで質問をしてみます。

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

Answer 2

hama1 さん、こんにちは。

マイクロソフト コミュニティをご利用いただき、ありがとうございます。

Excel VBA で、 ttl マクロ呼び出し中に、マウスカーソルを砂時計のままにできるかという質問ですね。

手元で情報がないか調べてみたのですが、該当するような情報はこちらでも見つけることができなかったです。

VBA については、専門の VBA フォーラムがありますので、こちらのフォーラムにも投稿をし情報を集めてみてはいかがでしょう。

そうすることで経験が豊富な方からも有力なアドバイスが得られやすくなると思います。

Visual Basic for Application (VBA)

投稿される場合は、同じように作成済みのコードを書き込み投稿されるとよいと思います。

よろしければご活用くださいね。