Hiroshi Yoshizawa
注文ボタン
お世話になります。
注文ボタンについて何方かご存知の方がおられましたらば
アドバイスをお願いいたします。
VBAで、以下のコマンドを実行して
注文可能ボタンを「可」にしています。
Application.CommandBars("岡三RSS2").Controls(4).Execute
ところが、これが知らぬ間に「不可」になってしまっていました。
慌てて、手動で可にしたのですが、
暫くするとまた、「不可」になってしまいました。
このボタンが「不可」の場合か否かチェックする方法を
どなたかご存知ないでしょうか？
よろしくお願いいたします。
2017年04月05日
アップロードされたファイルにはウイルスチェックを行っておりますが、未知のウイルス等に感染されている場合がありますので、アップロードされたファイルのご利用はご注意ください。
また、取引パスワード等の重要な情報を投稿内容に含めないようご注意ください。
なお、アップロードされたファイルの利用や投稿内容によって、投稿者自身や他の利用者が被った損害に対して当社は一切責任を負いません。
また、セキュリティの関係上、一部コマンド等を含む内容を送信するとエラー画面が表示され、投稿ができない場合がございます。何卒ご了承ください。
岡三RSS集いの広場では、複数の単語による検索が可能です。
例）関数 and サンプル
→AND検索となり、「関数」および「サンプル」を含む検索結果が表示されます。
例）関数 or サンプル
→OR検索となり、「関数」または「サンプル」を含む検索結果が表示されます。
例）関数 not サンプル
→NOT検索となり、「関数」を含むが「サンプル」は含まない検索結果が表示されます。
※and、or、notの前後は半角スペースで区切ってください。
※単語の間を半角スペースで区切るだけだと、OR検索となります。
小笠原聖史
吉澤さま
以下で、注文可能になっているか、注文不可になっているかを調べることができます。ご参考になれば幸いです。
Sub 注文可能可否チェック()
If CommandBars("岡三RSS2").Controls(4).TooltipText = "注文できません" Then
Cells(1, 1) = "注文不可"
End If
If CommandBars("岡三RSS2").Controls(4).TooltipText = "注文可能" Then
Cells(1, 1) = "注文可能"
End If
End Sub
2017年04月06日
Hiroshi Yoshizawa
小笠原聖史様
お世話になります。
吉澤でございます。
いつも貴重な情報をアドバイスして頂きありがとうございました。
うまくいきましたm(__)m
今後ともご指導のほどお願いいたします。
2017年04月06日