• 締切済み
  • すぐに回答を!

WORD VBA オートシェイプにマクロを登録したい

オートシェイプ(四角)をクリックする度に 塗りつぶしの色が白→黒→白というように変わるように したいのですが。(チェックボックス代わりに使いたい) EXCELのオートシェイプには「マクロを登録する」と いう項目がありますが、WORDにはありません。 何かの方法でマクロを登録したいのですが 方法はありますか。 よろしくお願い致します。

noname#165268

共感・応援の気持ちを伝えよう!

  • 回答数2
  • 閲覧数3542
  • ありがとう数1

みんなの回答

  • 回答No.2
  • Wendy02
  • ベストアンサー率57% (3570/6232)

こんにちは。 enunokokoro さんが、ヒントとして与えていだいていたのですが、具体的に、もう一度、ここで展開します。 >オートシェイプでなく別の方法で対応してみては。 コントロールツールのラベルが最適かと思いました。 1. オートシェイプ(四角)→ラベル(大きさは自由) 2. クリックして、塗りつぶしの色が白→黒→白というように変わる。 コントロールツールバーを出して、ラベル(Aという文字をクリック)を引き出し、適当な大きさに貼り付けます。青い三角定規がオンになっているのを確かめて、ダブルクリックします。 そうすると、画面が変わります。 プロシージャ名のラベルの名前に中身のコードも、合わせてくださいね。 Label2 だったら、Label1.BackColor →Label2.BackColor (Label2)になります。 Private Sub Label1_Click()  If Label1.BackColor = wdColorWhite Then    Label1.BackColor = wdColorBlack  Else    Label1.BackColor = wdColorWhite  End If End Sub このままですと、ラベルの中に文字が残っていますので、ラベルが選択された状態でしたら、左下の表のプロパティの Caption というところに、Label1 と入っていますから、それを削除してください。 もちろん、ここCaptionに文字を入れれば、ラベルの中に文字も反映されます。表のドキュメントからでも、コントロールツールバーの青い三角定規がオンされた状態でしたら、 右クリック-ラベル・オブジェクトの編集(O) で、中身を書き換えることも出来ます。 最初、なれないとちょっと面倒かもしれませんが、コツを掴めばそんなに難しくありません。試してみてください。

共感・感謝の気持ちを伝えよう!

関連するQ&A

  • オートシェイプ(線)の色が透明になってしまう

    エクセル2000などのオートシェイプで線や四角を描こうとすると透明になってしまっていて困っています。 どなたか直す方法(黒に戻す)を教えてください。 (なぜイニシャルの色が透明になってしまったのでしょう?)

  • Wordでオートシェイプの設定

    Wordでオートシェイプで 図を入れようとすると、 四角のかこいがでてきて、その中に「描画をここに作成します」と書かれたものがでてきます。 これがとても不便で、その間文字は打てないし・・・ どなたかこの四角のかこいを出さなくする方法を 知りませんか? 知り合いのパソコンでは 四角のかこいが出ず、 普通にオートシェイプが挿入できます。 どなたかお願いします。

  • エクセル2000(EXCEL)で日毎で実行させるマクロをひとつのオートシェイプに登録する方法

    エクセル2000(EXCEL)でツール→マクロ→マクロの新しい記録(マクロの自動記録)を使用して日によって実行する内容の違うマクロ31個、つまり31日分のマクロを作ったとします。ひとつのオートシェイプを実行ボタンとして使いこれに日毎によって実行するマクロを変える様に登録する事ってできるのでしょうか?日付が変わっている条件としてはNOW関数で拾えるとしてこの条件を元にひとつのオートシェイプで日ごとに実行するマクロを変えるということはできますか?やっぱり実行ボタンとしてのオートシェイプを31個作りひとつづつマクロを登録していくしかないのでしょうか?またできない場合は他にどんな方法があるでしょうか?分かる方宜しくお願いいたします。

  • 回答No.1

マクロについて勉強不足で的確な回答は出来ませんが、 オートシェイプをExcelのようにボタン登録は出来ない と思いますよ。 オートシェイプでなく別の方法で対応してみては。 http://oshiete1.goo.ne.jp/kotaeru.php3?q=2395821 こちら↑で幾つかの方法が提示されていますから、好み のものを使ってみてはいかがでしょうか。

共感・感謝の気持ちを伝えよう!

関連するQ&A

  • オートシェイプをツールバーに登録したい

    会社で見積書を作成する際、項目部分に三角の中に数字を入れたものを 使用しています。 現在、セルに数字を入力した後、オートシェイプで三角形を作成し、 数字の上に重ねていますが(クリップアートで登録済み)、使う頻度が 多いため、ツールバー等に登録し、ワンクリックで出てくるようにしたいのです。 こちらの教えてgooや、ネットで検索したのですが、方法が見つかりませんでした。 できればマクロ等を使わない登録方法があれば知りたいです。 また、オートシェイプ以外でも方法があれば教えてください。 よろしくお願いします。

  • 【エクセル】 自作チェックボックス

    エクセルに標準であるチェックボックスは大きさが変えられないと聞きました。 なので、図形を使って四角を描いてそこをクリックすると真っ黒になり、またクリックすると白くなるっていう、マクロを組んで欲しいです おねがいします。 テキストは要りません。四角くてクリックするごとに黒、白と変化するものが欲しいです。大丈夫です。

  • Wordのオートシェイプで作った図形をそのまま動かしたいのですが。

    Wordのオートシェイプでせっかく線や四角を駆使して図形を作っても、移動させるとそこに残ったままで、ついて来てくれないんですね。 ひとかたまりにして移動させる方法ってみなさんご存知ですか? お教えください。m(__)m

  • Wordのオートシェイプをまとめて消去する方法

    Wordのファイルにオートシェイプがたくさんありまして、それらをまとめて消去したいのですが、図形描画ツールバーの矢印をクリックしてマウスで範囲していする以外に、マクロでまとめて消す方法はないでしょうか?

  • 【EXCEL VBA】オートシェイプをクリックした時にそのオートシェイプの名前を取得したい

    ワークシートに多数(60個程度)のオートシェイプが配置されています。それらにはひとつひとつ「名前」をつけています。(オートシェイプ1とかを1日とかに変更しました) これらのオートシェイプをボタン代わりにマクロを割り当てて実行しようとしています。 そこで、例えば”1日”と名前を定義したオートシェイプがクリックされた時にその名前”1日”を取得する方法が解りません。 説明が下手でうまく伝わっているか心配ですがよろしくお願いします。

  • オートシェイプの文字列の抽出について

    エクセルのマクロについて教えてください。 今、オートシェイプで四角が描いてあり、その中にテキストで他のエクセルブックへのパスが記入してあります。 この状態から、オートシェイプ内のパスのブックを開き、開いたブックに何らかの処理をして、開いたブックを閉じるという処理をしたいと考えております。 処理を始めるトリガーは、他のオートシェイプをクリックするなどを考えております。 いろいろ試してみたのですが、オートシェイプ内に記述してあるテキストを抽出する方法が思いつきませんでした。(ここで使われているのはテキストボックスではなく、四角のオートシェイプです。) お詳しい方、どのようにすればよいか教えてください。 よろしくお願いいたします。

  • Wordのオートシェイプの規定値

    Wordの「オートシェイプの規定値に設定」を誤ってクリックしたため、どの図形を挿入しても、規定値のものになってしまいます。 規定値を解除する方法がありましたらご教示ください。 Word2002 Windows XP です。

  • マクロを使って一度に複数チェックしたい

    EXCEL2000でマクロを使って、ボタンを押し一度に複数のチェックボックスにチェックをつける方法を知りたいのですが、どなたか教えてください。ただ単にボタンをクリックするとチェックボックスがチェックされるのではなく、押すボタンによってチェックボックスの組み合わせがパタン化されているチェックの仕方なのです。 例えば、チェックボックスが1から10あるとします。Aというボタンを押すと、チェックされる項目は1と3と5。Bというボタンを押すと、チェックされる項目は2と4と6。というように、ボタンを押すごとにチェックボックスのチェックされるパタンが決まっている場合にチェックする方法が知りたいのです。よろろしくお願いします。

  • WORD2000でのマクロ

    WORD2000を使っています。 オートシェイプのリボンを描き、その中に文字を入れるマクロを作りたいのですが、 マクロ記録中は、マウスでドラッグなどは効かないですよね。 どうやって作ったらいいのか困っています。 VBAの言語は理解しかねますので、 出来れば、言語でなく、操作でのやり方を教えて下さい。 宜しくお願い致します。

  • Word VBAマクロ IMEに単語登録をさせたい

    IME2007を使っています。 毎日、WordでIMEに日付を単語登録して使っています。 「日付」と入力すると「H24.8.**」 **はその日の日付と単語登録をするにはどのようなマクロを組めばよいのでしょうか? WordでIMEをコントロールできないので、そもそも解けない問題ではないのか?と疑問に感じながらも良い方法がありましたらご教えください。