• ベストアンサー

windows7のマクロで図形に名前をつける

Windows7のEXCELマクロで図形に名前をつけるにはどうしたらいいですか? XPの時は、マウスでなぞるだけでマクロの記述に名前が記録されましたけど・・・

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

  • ベストアンサー
  • m_and_dmp
  • ベストアンサー率54% (974/1797)
回答No.1

Selection.ShapeRange.Name = "図1" のように、

perogou
質問者

お礼

ありがとうございました やってみます。

関連するQ&A

  • マクロの記録について

    マクロの記録について PCを買い替えてwindowsXPからVistaになりました。以前Excelでマクロ記録する場合、図形などクリックして移動させたりするとそのまま記録されていましたが、今はできなくなりました。XPの時のように記述しなくてもできるようにならないでしょうか。

  • マクロで2つの図形の内1つを透明にする記述

    マクロで2つの図形の内1つを透明にするにはどう記述したらいいでしょうか。 それぞれの図形の名前のつけかたも教えてください。

  • PowerPointで作った図形の名前を変更したい

    PowerPointで、図形描画を使い四角を作りました。マクロの記録でそれを選択すると、 ActiveWindow.Selection.SlideRange.Shapes("Rectangle 88").Select と出て名前が「Rectangle 88」だとわかりました。 この図形の名前を「shikaku1」に変更する事はできますか? また、マクロの記録を使わずに名前を確認する事はできますか?

  • Excel2007 [図形]マクロ記録

    Excel2007で次の手順で「雲形吹き出し」をマクロ記録したのですが記録されない!?、 Excel2000なら記録できました。 [挿入]⇒[図形]⇒[雲形吹き出し] 質問:Excel2007で記録するための方法をご教授お願いいたします。

  • excelで図形をマクロで消すのには

    excelでマクロを使用して 条件に合わせて図形をコピーして 帳票に貼り付けています。 そこで、次の帳票を作ろうとしたときに 先ほどコピーした図形を削除したいのですが マクロで削除する方法はありませんでしょうか? コピー~貼り付けなので毎回、名前が変わってしまうので 名称を指定して削除ができません。 なにかいい方法をお教えくださいませ。

  • excel2007 ではマクロの記録で 図形操作が無視されます

    excel2007 ではマクロの記録で 図形操作が無視されます 以前のバージョンのエクセルVBAで得たコードを移植すれば図形描画をマクロで行うことが可能なのですが、わずらわしいです。簡単に図形描画マクロが組めて大変重宝していたのですが残念です。 なぜ、図形操作をマクロ記録できなくなったのかその経緯をご存知の方 教えてください。セキュリティ上の対策なのか、ニーズがないと判断されてしまったのか、XMLとしての保存形式上の問題なのか、なぜなのでしょう? また、手軽に図形をプログラムで描画するのに便利な方法はないでしょうか。20年前のBASICの機能で十分なのですが・・・line(x1,y1)-line(x2,y2)なんて感じで描画したいのですが。excelシートにマクロで簡単に図形が描けなくなって困っています。

  • マクロについて

    Windows XPでMicrosoft Office Excel2003を使用しています。Windows XPの再セットアップしました。再セットアップ後初めてエクセルを起動したところマクロが全然使えません。セキュリティレベルを「高」から「中」に変えましたが、マクロ記録はありませんでした。再セットアップでマクロ記録が消去されてしまったのでしょうか。それとも何かすれば回復するのでしょうか。もし消去されてしまったのであれば、今後再セットアップするような場合マクロ記録をバックアップしておきたいと思います。その方法があれば教えて下さい。

  • エクセル図形間のテキストのコピー方法は?

     エクセル97のマクロの記述の質問です。  Sheet1とSeet2にそれぞれ図形があり、Sheet1の図形上のテキストをSheet2の図形にコピーしたいのですが、どう記述すればよいでしょうか?  図形をオブジェクトとして指定するのかと漠然と思うのですが、特定の図形のオブジェクトの名前をどうやって知(取得す)ればいいのかも、判りません。  よろしくご指導願います。

  • Excelのマクロを使用してオートシェイプ図形の色を変えたいのです。

    Excelのマクロを使用してオートシェイプ図形の色を変えたいのです。 オートシェイプ図形を50個ならべて、マウスでクリックしてものは色が変わるようにしたいと思います。 マクロ記録をすると以下のようになりました。 Sub Macro1() ActiveSheet.Shapes("AutoShape 1").Select Selection.ShapeRange.Fill.ForeColor.SchemeColor = 45 Selection.ShapeRange.Fill.Visible = msoTrue Selection.ShapeRange.Fill.Solid End Sub このプログラムを50個書くわけにはいかないのですが、プログラムで処理するのに問題点が2つ出てきました。 ・オートシェイプ図形の名前が"AutoShape 1"となっていますが、これを変更したいのですが、書式設定にはありませんでした。変更するにはどうすればよいのでしょう? ・クリックしたオートシェイプ図形がどれであるかを返す関数がないと、どの図形がクリックされたかわからないのですが、これを返す関数はあるのでしょうか? よろしくお願いします。

  • excelでマクロで図形をコピー、張り付ける

    Excelの画面で 挿入→図形で 作成した図形をマクロを使って コピーし、任意の箇所に張り付けたいのですが、図形が認識されないのか マクロが動作しません。どうしたらできるでしょうか?