• ベストアンサー

Excel VBA ボタンを非アクティブにするには

Excel VBAにおいて、sheet上に製作したコマンドボタンを表示したり、非表示にしたりするコードはわかるのですが。ツールバーに作成したボタンを表示したり、非表示にしたりするコードがわかりません。ご存知でしたら御教授下さい。よろしくお願いします

質問者が選んだベストアンサー

  • ベストアンサー
  • sam_inoue
  • ベストアンサー率47% (27/57)
回答No.1

同様にEnabledやVisibleプロパティで制御しますが、 CommandBarButtonに対してではなく、 CommandBarControlに対して行ないます。 参考URLの後半でEnabledプロパティを制御しているので ご覧下さい。

zyakatu
質問者

お礼

大変良くわかりました。ありがとうございました。何度もお世話になってしまい誠に申し訳ありません。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • Excel VBA　---　コマンドボタンが表示上で消える　---

    Excel VBAの初心者です。 今回、マニュアル本を見ながら試行錯誤でマクロにチャレンジしています。 用語や説明が上手くできないかもしれませんがよろしくお願いします。 OSはWindows2000、Excelのバージョンは2000です。 sheet1をメニュー画面として、コマンドボタンをいくつか貼り付けて、そのシート名を表示したコマンドボタンをクリックすると別のシートに 飛ぶようにしています。 別のシートに飛んで、そこで作業を終えたら、今度はそのシート上に貼り付けた『メニューに戻る』コマンドボタンをクリックしてsheet1のメニュー画面に戻るようにマクロを組みました。 ところが、作業用のシートからメニューに戻ると前回クリックしたコマンドボタンが表示上消えてしまっています。 そのコマンドボタンがあった位置にカーソルを持って行ってクリックするとちゃんとコマンドボタンの動作をします。 同じような質問がないか検索してみましたら『コマンドボタン上の文字の表示がおかしくなる』という質問があって、下記コードを入れたら解決したそうなので、Sheet1に下記のようなコードを入れてみました。 でもダメでした。 Private Sub Worksheet_Activate() Application.ScreenUpdating = False ActiveWindow.ScrollRow = 100 ActiveWindow.ScrollRow = 1 End Sub 解決方法のご教授をお願い致します。

  • エクセル　VBA　

    エクセル　VBA　 Sheet上にコマンドボタンをクリックさせたら 電卓表示させるにはどのように記述をしたら良いですか？ (1)勿論、VBAで電卓作成したいのですが…何か良いサイトはありますか？それか 　作り方を教えて欲しいです。 (2)ツール⇒すべてのプログラム⇒アクセサリ⇒電卓 　で表示できますよね！それをコマンドボタンクリックで 　表示させるには、どのように記述したら良いですか？ 　 すいません教えてください！

  • excel97のVBAについて

    始めまして、ＭＶ3307と申します。 さて下記内容を、VBAでコードを書くつもりですが、マクロ初心者で記載 方法が分からないので是非ご教授お願いいたします。 　　　　記 (1)EXCELの"Sheet1"の数式バーに式が表示してあります。 (2)VBAの"コマンドボタン"をクリックして、数式バーの式をTexBoxに取得する。 以上です、宜しくお願いします。 　　　

  • エクセルＶＢＡのボタン操作について

    sheet1にコマンドボタン(CommandButton1)を貼り付けて sheet2にもコマンドボタン(CommandButton1)を貼り付けています。 sheet1のコマンドボタンを押すとVBAで処理をして sheet2を表示後 自動的にsheet2のコマンドボタンにかかれたVBAの処理をしたいのですがうまくいきません。 教えてください。 環境windows2000 office 2000 sheet1のボタンの最後 Sheets("2").Select ActiveSheet.Shapes("CommandButton1").Select でうまくいきません。

  • VBAエクセルのフォームについて

    お世話になっております。 VBAエクセルのフォームについて教えていただきたいのです。 VBAで入力のフォームを作ったのですが（TEXT BOXが4つ、コマンドボタン1つ、コマンドボタンを押したときに登録される用にしたい） 各シートの集計にしたい為、各シート（31のシートがあります）に入力フォームがあります、その各シートでの入力結果を1つのシートに 集計したいのですが、どの様なコードにしたらようか判りません。 素人のためお手数ですが、なるべく判りやすくお願いします。 よろしくお願いします。

  • VBA(エクセル)で自動的にボタンをクリックさせるには

    いつもお世話になっております。 下記のことがしたいのですがどうやって良いのかがわからなくって困っております。 やりたいこと。 AブックとBブックが有るとします。(双方ともエクセルファイル) エクセルのVBAで、Aブックのシート上のコマンドボタンを押すと Bブックのシート上のコマンドボタンをクリックするという動きを VBAでさせたいのですがどうしてもクリックさせることができません。 試したこと。 初めは、AのボタンをクリックするとBのボタンをセレクトして SendKeysでENTERを送ってみたりしたのですがうまくいきませんでした。 何かやり方が有りましたら、お教えいただけませんでしょう。 宜しくお願いいたします。

  • エクセル、コマンドボタンについて

    素人な質問ですみません。 シート１にコマンドボタンを作成しています。 このコマンドボタンを押すと、シート２のＡ１セルからＥ１０セルに入力してある５０の文字列から、ランダムにコマンドボタンのあるシート１のＡ１セルに表示させるようにしたいのですが。 このようなことは出きるでしょうか？ ＶＢＡの知識もほとんどなく困ってます。 簡単に言うと、コマンドボタンを使って、別シートに入力してある文字列を表示させる方法ということになるでしょうか。 よろしくお願いします。

  • PowerPoint VBAコマンドボタンでのマクロ

    PowerPointでVBAを使ったフォームを作製しました。 そのフォームを表示させるためマクロを書き、スライド上に コマンドボタンを配置させマクロを実行させたいと思っています。 ExcelのVBAですとコマンドボタンにマクロを割り当てるのは ツールバーのフォームのコマンドボタンで設置すると簡単ですが PowerPoint VBAですとコントロールツールボックスでのコマンド ボタンしかなくボタンにマクロを割り当てる方法が分かりません。 どなたかコマンドボタンにマクロを割り当てて実行する方法を 教えて下さい。 宜しくお願い致します。

  • Excel VBA で自作ツールバーにマクロを登録する際のテクニック

    Excel VBAで新たなツールバーを作成ならびに表示をするマクロを記述しました。ツールバーにはコマンドボタンを貼り付け、さらにコマンドボタンには他のマクロを登録しています。 処理の実行自体はうまくいったのですが、実際にツールバーが現れたときに、ボタンのイメージだけではなく、 テキストも同時に表示させたいのですが、なかなかうまくいきません。 （手作業に言い換えると「選択したボタンの編集」ボタンから「イメージとテキストを表示」にチェックをつけたい） ちなみに記述したコードは次のとおりで、私の予想では ★の部分に何か追加するのではないかと思うのですが。 色々と調べてみたのですが、なかなか良い答えが見つけられず・・・・ どうぞ、よろしくお願いいたします。 **↓ Dim MyCombar As CommandBar Dim MyBtn AsCommandBarButton ' ツールバー「シート初期化」作成 Set MyCombar = Application.CommandBars.Add(Name:="シート初期化") '「シート初期化」の表示場所 With MyCombar .Top = 200 .Left = 400 .Visible = True End With ' シート初期化」にマクロ『Clear_Sheet』登録 Set MyBtn = MyCombar.Controls.Add(Type:=msoControlButton, ID:=2950) With MyBtn .OnAction = "Clear_Sheet" .Caption = "シート初期化" '★→ここの部分に、何か追加？ End With

  • VBAでエクセルからエクセルのファイルを開くには？

    D:\に db1.mdb Book1.xls があります。 db1.mdbのフォームのコマンドボタンをクリックして Book1.xlsを開きたいのですが ＶＢＡコードをご教授いただけますか？ （マクロではなくＶＢＡコードが知りたいです） エクセルからエクセルのファイルを開くなら Workbooks.Open ファイルのフルパス で出来ました。 ご回答よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する