ベストアンサー エクセルＶＢＡでコマンドボタンをロックしたい 2006/07/03 20:20 表題のとおりなんですが、コマンドボタンが１、２とあった場合、１をクリックすると、２はクリック出来なくなるような方法ありませんか？初心者ですがよろしくお願いします。 みんなの回答 （1） 専門家の回答 質問者が選んだベストアンサー ベストアンサー GreatDragon ベストアンサー率46% (186/402) 2006/07/03 20:31 回答No.1 こんばんは。 こんな↓コードでいけると思います。 Private Sub CommandButton1_Click() CommandButton2.Enabled = False End Sub 元に戻す時はどこかのコードに CommandButton2.Enabled = True を記述してください。 質問者 お礼 2006/07/04 21:25 ありがとうございます。非常に助かりました 広告を見て全文表示する ログインすると、全ての回答が全文表示されます。 通報する ありがとう 0 カテゴリ パソコン・スマートフォンソフトウェアオフィス系ソフト 関連する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 解決方法のご教授をお願い致します。 Excelマクロ ボタンをクリックするだけで、保存せずにシートを閉じる こんにちは やっと勉強する気になった超初心者です 表題の通りなのですが １、コマンドボタンをクリック ２、Bookを保存せずに閉じる という作業をしたいのですが 記録ではできない・・・と思いますので どなたかご教授下さい エクセル2010のvbaとコマンドボタンについて vbaで押されたコマンドボタンの （ActiveXコントロールのイメージやラベルなど） 名前を取得することはできますか？ ActiveControl.NameはSheets(1)をつけると オブジェクトは、このプロパティまたはメゾットをサポートしていません とエラーが出て、Sheets(1).を取るとオブジェクトが必要です とエラーが出て上手くいきません フォームコントロールのボタンは右クリックできないので ActiveXコントロールのコマンドボタンを使用しています 回答お願いします 携帯料金を賢く見直す！格安SIMと端末選びのポイントは？ OKWAVE コラム エクセルＶＢＡでコマンドボタンを選択したい。 すいません。私はエクセルのＶＢＡが初心者なのですが、例えば、sheet1にコントロールツールのコマンドボタン１があるとして、いまセルA1が選択されている状態の時、キーボードの"Enter"を押すと、通常はセルA2が選択されるところを、コマンドボタン１を選択するようにしたいのですが、なにかいい方法はありませんか？よろしくお願いします。 マクロ コマンドボタンを押すともう一つコマンドボタン マクロ初心者です。宜しくお願いします。 コマンドボタンをクリックしたら、指定して開いたファイル上にもうひとつコマンドボタンを追加で表示させることは可能でしょうか？ ＜詳細＞ ・コマンドボタンを押す ・エクセルのファイルを指定して開く ・指定して開いたファイルの「Sheet1のA1」に新たにコマンドボタンを出現させる。 ・「Sheet1のA1」に現れたコマンドボタンを押すとそのファイルを印刷する。 みたいな事をしたいのですが、可能でしょうか？？ 宜しくお願いします。 Excel VBA コマンドボタン教えてください 例えば Sheet1で複数のコマンドボタンを作ります。 ボタン1からsheet9へ ボタン2からsheet10へ ボタン3からsheet11へ とジャンプしたいのですがcommand buttonでこのようなことが出来ますか 出来ないようでしたら他の方法がありましたら御教授お願い致します。 エクセルのコマンドボタンについて教えてください。 エクセルのワークシートにコマンドボタンを配置してマクロを登録したとします。 任意のセルを複数選択したのち、コマンドボタンをクリックすると、セルの選択が解除されてしまいます。 選択を解除されない方法ってあるのでしょうか？ どなたか、詳しい方がいらっしゃいましたら教えて頂けないでしょうか？宜しくお願い致します。 VBAコマンドボタンに登録したマクロについて VBA初心者です。宜しくお願いします。 コマンドボタンにマクロを登録しているのですが、 急に使えなくなりました。 原因はウィンドウの固定をしてからのようなのですが、 解除後も状況はかわりません。 コマンドボタンの編集はできるがクリックできない感じです。 sheetを保護しても処理を実行できない？みたいです。 sheet1にコマンドボタンを配置し、 sheet2,sheet3に処理結果をだすプログラムです。 Sheetの保護やウィンドウの固定をしてもコマンドボタンを使う方法はありませんでしょうか？ また、ユーザーフォームのテキストボックスに、 今日の日付を表示したいのですが、西暦を省き、 月/日 または 月/日/曜日 のように表示できる方法はないでしょうか？ よろしくお願いいたします。 Excel VBA 複数のコマンドボタンをキーボードで操作できませんか？ ExcelVBAでUserFormにコマンドボタンを作成し、 仮にコマンドボタン1、コマンドボタン2とすると、 数字キー「1」を押した時にコマンドボタン1をクリック、 数字キー「2」を押した時にコマンドボタン2をクリック という動作は可能でしょうか？ キーボードは数字キーではなく「a」や「F1」等でもかまいません。 ご教授宜しくお願いします。 コマンドボタンがきかなくなる アクセスのフォーム上にコマンドボタンがいくつかあります。 たまにですが、コマンドボタンを押しても何も反応しなくなる時があります。 プロパティでクリック時に[イベント プロシージャ]と書いてあり、 VBE画面を見てみると ちゃんとイベントが記載してあります。 しかしフォームビューにしてそのコマンドボタンをクリックすると何も起きません。 新規にコマンドボタンを作って、vbe画面で同じイベントを張り付けると 新規のコマンドボタンのほうではクリックしてイベントが実行されます。 だから、その新規のコマンドボタンの名前を変えて使い続けるのですが、 しばらくするとほかのコマンドボタンがまたきかなくなる時があります。 これはアクセスのバグでしょうか？ 原因がわかりません。 バージョンは２０１０です。 エクセル２００７VBAでコマンドボタンのプロパティ表示 いつもお世話になります。最近エクセル２００７でVBAを使うようになりました。フォームコントロールからコマンドボタンを挿入したのですが、コマンドボタンのプロパティを表示しようとしても表示できません。２００３では表示できます。２００３では、コマンドボタンを選択して右クリック→プロパティでEnabledやVisibleを設定できました。２００７ではどうすればコマンドボタンのプロパティを表示できるのでしょうか？ エクセル コマンドボタン １）Sheet1でコマンドボタンを作成。クリックするとフォームが表示さ れます。そのフォームの中のテクストボックスに数字を入れ、それ をSheet2のB2に挿入したいです。どうすればいいのですか？ ２）Sheet2にコマンドボタンを作りました。Sheet2へ戻るようなボタン を作りたいのですがどうすれば良いですか？ 以上２つの質問です。是非教えてください。 ヤバいパソコンが壊れたかも！？事前に知っておきたい3つの兆候と対策 OKWAVE コラム コマンドボタンを押すと・・・ ｖｂの超初心者なのですが、フォームにコマンドボタンを何度か設置したら Private Sub Button1_Click(sender As System.Object,・・・ というのと Private Sub Button1_Click_1(sender As System.Object,・・・ というのが出来上がっていて、コマンドボタンをクリックすると Private Sub Button1_Click_1 のほうのコードが実行されるのですが、 Private Sub Button1_ClickとPrivate Sub Button1_Click_1 の違いはなんでしょうか？ Private Sub Button1_Clickは、どのコマンドボタンを押せば実行されるのでしょうか？ コマンドボタンの長押し コマンドボタンのクリック処理についてです。 コマンドボタンのクリックは取得できると思うのですが、 長押しを行った場合、それを認識することなんてできるのでしょうか？ コマンドボタンによる数値入力を行いたく、 長押しができれば、任意の数値が入力できると思いまして。 すいませんが、どなたかお願いいたします。 Accessのコマンドボタンについて Accessのコマンドボタンのプロパティには、 背景色の設定がありません。 ネットで検索すると、２つの方法を発見しましたが、 問題が発生します。 以下２つの方法以外に、背景色の設定ができますでしょうか？ 【１つ目】 ・方法 コマンドボタンのピクチャプロパティで、 ビットマップを設定することです。 ・問題点 標題より、ピクチャが前面に出るので、標題が見えない！ （大問題です） 【２つめ】 ・方法 ActineXのmicrosoftformsのボタンを使う ・フォントサイズを設定できない！ （大問題です） VBAのコマンドボタンについて エクセルVBAのコマンドボタンをシートに配置してあるのですが、セルの操作(他シートからのコピペ)によってそれの大きさが変わらないようにしたいです。 コマンドボタンのオプションで、『セルに合わせて移動やサイズ変更をしない』にチェックをいれてあるのですが、他のシートからコピペした際にコマンドボタンの位置とサイズが変わってしまいます。 コピーする元のシートのセルサイズに引きずられて、大きさが変わってしまいます（値だけコピーにすれば大丈夫）。 元に戻すボタンを押してもコマンドボタンの大きさは元に戻ってくれないので困っています。 シートの保護で行と列の大きさを保つように保護することも試みたのですが、それだとコピペができなくなってしまいました。 コピペした際に コマンドボタンの大きさと位置が変わらなければどんな方法でも大丈夫です。 (1)コマンドボタンの設定のミス？なので設定を変更する (2)常時、「形式を選択して貼り付ける」の際に"値のみ"しか選べないようにする(もしくは単に「貼り付け」した時に値だけ貼り付けるように設定する)、 (3)行と列の高さ・幅の変更を禁止したままコピペ等が出来るようにする ・・・などなど 詳しい方よろしくお願いします。 ＥＸＣＥＬでコマンドボタンを繰り返す方法を教えてください。 ＥＸＣＥＬでコマンドボタンを作りました。 「テスト」と言う名前のボタンをつくったのですが、 その際「テスト」という名前のコマンドボタンを 100回続けて自動的にクリックすると言ったような やり方はありますでしょうか？ Excel VBA コマンドボタン 質問させて頂きます。 現在コマンドボタンを作成したいと考えているのですがツールボックスからでは無く、コーディングで作ろうと考えています。 現在は下記のコードでコマンドボタンの作成までは出来たのですが ＋ コマンドボタンの背景色/フォントカラー/フォントサイズの調整も加えたいと思っています。 下記のコードに上記要望を可能にする為にはどのようなコードを記述すれば宜しいでしょうか？ よろしくお願いします。 With ActiveSheet.Buttons.Add(省略しました) .Name = "" .Caption = "" .OnAction = "" End With EXCEL コマンドボタン 説明が解りにくかったらごめんなさい。 Excelでよくコマンドボタンを作成してマクロを割り当てて使っていました。そのときはカーソルが指マークになって、右クリックするとメニューの中に「マクロの登録」があったのですが、突然、特別なことをした覚えはないのですが、右クリックしたメニューの中から「マクロの登録」は消え、ダブルクリックをするとvisual Basic editorのデザインが現れます。フォームのコマンドボタンから作っているのですが、オブジェクトがちょっと以前と変わってきているような感じです。 基本的には一緒なのですが、以前の方が使いやすく、戻したいのですがどのようにしたらよいでしょうか？ エクセル既存のコマンドをユーザー定義のコマンドボタン等に割り付けたい。 エクセル既存のコマンドをユーザー定義のコマンドボタン等に割り付けたい。 お世話になります。 どなたか教えてください。 他のアプリケーションから画像をキャプチャーし、 それをエクセルに貼り付け、そこにオートシェイプなどを使い修正指示等を描きこむ作業をしています。 少しでも楽にしようと、ユーザーフォーム上に配置したコマンドボタン・ピクチャ等に既存のコマンドを割付て見ました。 オートシェイプ 線 の場合 Application.CommandBars.FindControl(, 130).Execute これで(上記の作成した)ボタンを左クリックした時に、オートシェイプのツールバー内の“線”コマンドと同じように1本の線がひけました。 ただ、オートシェイプのツールバー内の“線”コマンドを使用した時は、 シングルクリックの時は線を一本描くとコマンドが終了、ダブルクリックの時は線が連続して描けます。 自分で追加したボタンでもこのように動作させる方法は無いでしょうか？ (ダメとは思いつつダブルクリックのイベントに上記コードを記述しましたが、、、やはりダメでした。） さらにexcel2003の場合は上記コードが動作したのですが、 2007の場合は動作せず、線が描けません。なぜでしょうか？ 以上2点かなり調べましたが解らず、行き詰まってしまいました。 どなたか教えてください。 よろしくお願いいたします。 注目のQ&A 「You」や「I」が入った曲といえば？ Part2 結婚について考えていない大学生の彼氏について 関東の方に聞きたいです 大阪万博について 駅の清涼飲料水自販機 不倫の慰謝料の請求について 新型コロナウイルスがもたらした功績について教えて 旧姓を使う理由。 回復メディアの保存方法 好きな人を諦める方法 小諸市（長野県）在住でスキーやスノボをする方の用具 カテゴリ パソコン・スマートフォン ソフトウェア Excel（エクセル）Word（ワード）PowerPoint（パワーポイント）Access（アクセス）その他MS Office製品オフィス系ソフトPhotoshop（フォトショップ）Illustrator（イラストレーター）その他Adobe製品画像・動画・音楽編集ホームページ作成ソフト筆まめ・はがき作成フリーウェア・フリーソフトその他(ソフトウェア) カテゴリ一覧を見る OKWAVE コラム 突然のトラブル？プリンター・メール・LINE編 携帯料金を賢く見直す！格安SIMと端末選びのポイントは？ 友達って必要？友情って何だろう 大震災時の現実とは？私たちができる備え 「結婚相談所は恥ずかしい」は時代遅れ！負け組の誤解と出会いの掴み方 あなたにピッタリな商品が見つかる！ OKWAVE セレクト コスメ化粧品 化粧水・クレンジングなど 健康食品・サプリ コンブチャなど バス用品 入浴剤・アミノ酸シャンプーなど スマホアプリ マッチングアプリなど ヘアケア 白髪染めヘアカラーなど インターネット回線 プロバイダ、光回線など
お礼
ありがとうございます。非常に助かりました