• 締切済み

マクロについて

みなさんの力を貸してください。 多分、他にも似たような質問内容があると思います…。 エクセル2003を使用しています。 （例） sheet1では、書式を作成してあります。 sheet2には、オートシェイプで色々な図形を作って並べてあります。 色んな図形といっても、オートシェイブ（複数）とコンボボックスをグループ化として一つの図形として利用しています。 sheet2にあるグループ化したいろんな図形の中から一つの図形をクリックして、sheet1にコピー＋貼り付けるという作業をしています。 その作業をマクロのプログラムで作りたいと思っています。 そのプログラムを教えていただけないでしょうか？ また、自作の図形をクリップアートに登録も試したんですが、コンボボックスが作動できなかったのです… よろしくお願い致します。

  • kdfc
  • お礼率60% (6/10)

みんなの回答

  • Trick--o--
  • ベストアンサー率20% (413/2034)
回答No.1

Sheet2の適当な図を選択 マクロの記録（ツール＞マクロ＞新しいマクロの記録） Ctrl+C（選択している図をコピー） Sheet1を選択 Ctrl+V（コピーした図を貼り付け） マクロの記録を終了（記録開始したときに出現した■ボタン） これで、「選択している図をSheet1にコピーする」マクロができます

kdfc
質問者

補足

遅くなりましたが、ご回答ありがとうございます。 このやり方でやってみましたら、セルがコピーしただけです…汗 図形がコピーされていませんでした…

  1. カテゴリ
  2. パソコン・スマートフォン
  3. Windows
  4. Windows XP

関連するQ&A

  • オートシェイプ図形の角度をマクロで変えたい

    エクセルのオートシェイプで図形を作って、それをグループ化して、 A1のセルへ数値を入力するとシート１上にあるオートシェイプの角度が変化するようにしたいのです。マクロで出来るでしょうか。 シート上の図形は、Group25　です。 エクセル2000を使用しています。 よろしくお願いします。

  • オートシェイプに関するマクロ

    エクセルのオートシェイプの書式設定のサイズの倍率（縦横比を固定)を、120%にするマクロって可能でしょうか？ 沢山の図形の大きさを調節する作業があるのですが、その都度オートシェイプの書式設定を開いて値を入力すると大変な手間になってしまいます。 図形をセレクトしてマクロを実行するだけで、大きさを変化させるようにしたいのですが。 ご存知の方がいましたら、よろしくお願いします。

  • オートシェイプの図形の高さ、幅をマクロで変えたい

    エクセルのオートシェイプで図形を作って、それをグループ化して、 A1（縦）A2(横)のセルへ数値を入力するとシート１上にあるオートシェイプの長さと幅が変化するようにしたいのです。マクロで出来るでしょうか。 シート上の図形は、Group25　です。 エクセル2010を使用しています。 よろしくお願いします。

  • エクセル：VBAでシート上のオートシェイプ以外の図形を消去したい。

    お世話になります。 ★VBAでシート上のオートシェイプ以外の図形を消去したいのです。 No.1902175で、エクセルシート上の図形の削除方法をいろいろ教えていただきました。今回は、そのときにはあてはまらなかった、「オートシェイプをのぞく図形をＶＢＡで削除したい」のです。 補足：シートは毎月のある行事等の予定表です。オートシェイプにはマクロを登録しているため消したくありません。その他の図は季節の行事に関するクリップボード等の図で、担当者がシートから毎月手作業で削除していたものです 以上、よろしくお願いいたします。

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

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

  • Word 2003 描画キャンバスと定型句やクリップアートに保存

    (1) Word 2003 に、オートシェイプで作成した図形をクリップアートに保存したい。どうしたらいいですか？ (2) Word 2003 に、オートシェイプで作成した図形を定型句に保存したい。しかし描画キャンバスに描いた複数の図形すべてが登録されてしまう。私が保存したいのはそのうちひとつの図形だけです。どうしたらいいですか？グループ化解除しか方法はないですか？

  • オートシェイプとは

    昨日は図形の移動でお世話になりました。引き続き図形について質問です。 オフィス2010のワードにてオートシェイプの範囲が分かりません。 挿入の図のところに図、クリップアート、図形、SmartArt、グラフ、 スクリーンショットの６つがあります。 　 この中で矢印などは図形にあるので、これはオートシェイプだと思います。 クリップアートやsmartArtなどもオートシェイプのような気がします。

  • エクセル2007のマクロ

    どなたか教えて下さい。 エクセル２００７で、図形とオートシェイプを同時に選択するマクロを教えて下さい。 今まで、エクセル２００３では Selection.ShapeRange.Group.Select で、一発で選択できていましたが、エクセル２００７に変わって動かなくなりました。 オートシェイプだけは、グループ化は出来たのですが、図形とのグループ化する方法が分かりません。 目的は、エクセルの図形の挿入で読込んだ図形の上に、エクセルのカメラで読込んだリンク図形（複数）を一緒にグループ化を行い、ペイント等でビットマップファイルを作成したいのです。 グループ化できた後は、手動でペイントに貼り付け、保存するつもりです。 よろしくお願いします。

  • エクセルで自作の図形をメニュー化できますか？

    エクセル2003を使用しています。 (sheet1)に書式を作成してあります。 (sheet2)にはオートシェイプで色々な図形を作って並べてあります。 (sheet2)の記号で必要なものをコピーして(sheet1)に貼り付けるという作業をしています。 この(sheet2)の図形を、オートシェイプのツールバーをクリックすると出てくる、基本図形などのメニューのような形で登録できないものかと考えています。 書式の中に数種類の図形をコピー＆ペーストするので、メニューの中で図形を選んでクリックしたら貼り付く。 という作業が出来れば効率的なのですが・・・ どなたか、このような方法をご存知ないでしょうか？ よろしくお願い致します。

  • word2007でのオブジェクトの複数選択

    Word2007での複数のオブジェクトの選択方法がよく分かりません。 今までWord2003では、例えばオートシェイプ・クリップアート・ワードアート・テキストボックス・図（写真とかイラスト）を同時に選択したい時には、クリップアートやワードアートも前面に出してからシフトキーを押しながら各々をクリックしていくと上手く選択できました。また、図形描画ツールバーの中の「オブジェクトの選択」を使うと、全ての図を大きくドラッグで囲むだけで一気に選択できていました。 2007で同じことをしようとすると、テキストボックス・オートシェイプ・ワードアート（全て前面にしておく）同士　または　クリップアートと図同士　なら複数選択できるのですが、混在させた状態の複数選択は出来ません。「オブジェクトの選択」を使って囲むと、テキストボックス・オートシェイプ・ワードアート（全て前面にしておく）だけが選択されます。クリップアートや図（写真やイラスト）は選択できません。 2007で、オートシェイプ・クリップアート・ワードアート・テキストボックス・図（写真とかイラスト）を混在させて複数選択するには、どうすればいいのか教えてください。2003ではよく使っていたので、困っています。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する