• ベストアンサー

エクセルのオートシェープについて

エクセルのオートシェープで「グループ化ではなく、図形の結合」って出来ないですか? (○と△を合体させて一つの金魚のような図形にすることです。) VBAを使う方法でもそのようなことが出来ればありがたいのですが、そのサンプルプログラムを探しても見当たりませんでした。 方法知ってる方いましたら教えてください。

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

  • ベストアンサー
  • xls88
  • ベストアンサー率56% (669/1189)
回答No.4

「マクロの記録」でコードが採れました。 図形をコピーして「形式を選択して貼り付け」します。 「貼り付ける形式」を聞いてきますから、図の種類(PNGとかJPEG等)を選択して貼り付ければよいです。 Sub Macro1() Selection.Copy Range("C5").Select ActiveSheet.PasteSpecial Format:="図 (PNG)", _ link:=False, DisplayAsIcon:=False End Sub

その他の回答 (5)

noname#99913
noname#99913
回答No.6

グループ化ではいけないのでしょうか。グループ化した後でも、サイズや色の変更はできますよ。

inada_star
質問者

お礼

ありがとうございました。やっぱり無理みたいですね。

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.5

>図形の結合 概念があいまいです。質問者だけが、ある自分だけに都合の良い例をイメージしているだけです。 あらゆるケースを文章ででも表現してみてください。面倒ですよ。 まして図形の数が増えると、図形の種類が増えると収まりがつきません。論理的に文章化できないものはプログラムで組めません。 MS社がもしエクセルの機能として正式に採り上げるなら、厳密で有用、多用されるもので無いとなりません。 ーー それより人間がデザインモード時に、直感的位置把握能力で配置したらおしまいでしょう。エクセルは操作で問題を解決するツールです。 VBAはあくまで周辺での応用です。 2図形ぐらいで同じパターンが続く場合などなら、位置関係をプログラムで決定できる場合が有るかもしれない。 図形はVBAで8点のハンドルの四角の左肩上位置(左辺と上辺位置)と幅と高さしか左右できません。 エクセルには例えば不等辺三角形の頂点の1つも捉まえる(座標として)考えか無いようです。 CADソフトなどならそういう考えは必須では無いかと思いますが。 あくまで図形の8点ハンドル内の図形であって、数学のように頂点から割り出したものではない。(線のオートシェイプの多角形はややそれに近いが) 15年前まではエクセルシートは図形を貼り付けることさえ出来なかった。あくまで数値の表の(除くグラフ)お飾り程度のものでしょう。

  • xls88
  • ベストアンサー率56% (669/1189)
回答No.3

その図形をコピーしてペイントに貼り付け、名前を付けて保存する。 あるいは、クリップの整理からクリップアートとして使用できるようになります。 下記ページで、「Microsoft Office アプリケーションで作成したオブジェクトを追加する」を参照してください。 クリップ オーガナイザにクリップ アートを追加する http://office.microsoft.com/ja-jp/excel/HP051922101041.aspx VBAの方法も検討してみます。

回答No.2

どのようなことをされたいのかが分かりませんが オートシェープを利用して好みの図形を作成し、Excelのシート上に 貼り付けたいのであればペイントブラシの様なお絵かきソフトを 使用されてはいかがでしょうか? お絵かきソフトで作成した図形をExcelにコピー&ペーストして Excelの「図」ツールバーの「透明な色に設定」で図形の周りの色を透明にしてあげれば良いのかなと。 全然見当違いでしたら気にしないでください。

  • orangezzzz
  • ベストアンサー率35% (401/1119)
回答No.1

こんにちは。 >○と△を合体させて一つの金魚のような図形にすることです。 無理です。 Excelの仕様範囲を超えています。 お絵かきソフトではないのですから。

関連するQ&A

  • EXCEL(WORD)のオートシェイプの追加

    エクセル2000を使用しています。 VISIOなんかで作成した図形(切り出し)をグループで解いて、エクセルでオートシェイプとして使っているのですが、 それを「ツール」の「図画描画」の中の「オートシェイプ」内に追加する方法はないのでしょうか? できれば、フリーソフトなど使わず、「microsoft office」内のフォルダーにドラッグ&ドロップするような方法がいいのですが。

  • エクセルのセルにオートシェイプを参照したいのですが

    エクセルのセルにオートシェイプの図形を参照したいのですが何か方法はあるのでしょうか? 出来ればいくつかのオートシェイプをVLOOKUPで呼び出すような方法が理想です。 良い方法ご存知の方宜しく御願いします。

  • エクセル オートシェイプ

    ご教授下さい。 エクセルでオートシェイプを使用しようとしたところ、 左下の 「オートシェイプ」をクリック、線や基本図形など すべて使用できなくなっていました。 通常は、選択すると黒線が出てますが、線が真っ白です。 このエクセルの書類は、知人を介して送られてきたものです。 シートやブックの保護などはしておりませんし、特別な保護 もしてないと言われました。 他のエクセル書類や新規にエクセルを立ち上げた場合は、ちゃ んとオートシェイプは使用できます。 解除の仕方、設定方法がございましたら教えて下さい。 何卒宜しくお願い申し上げます。

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

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

  • エクセル オートシェイプ

    こんばんは! エクセルのオートシェイプについての質問です。 会社の稟議書を作成していて、上のほうに、オートシェイプで部長や課長のハンコを押す欄を作ろうと思ったのですが、うまくいきません・・・ エクセルで罫線を引いて、セル内に文字を入れるのは簡単なのですが、オートシェイプで作成する場合は、どのようにしたらよいでしょうか・・・ 四角形を挿入して、縦に二本オートシェイプで直線を引いて、横にも一本オートシェイプで直線を引いて、それをグループ化したまではよかったのですが、テキストをどのように入れたらよいのか分かりません・・・ 右クリックしても、テキスト追加できず、悩んでいます・・・ どなたかお分かりでしたら、お願いいたします。

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

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

  • エクセル オートシェイプ吹き出し内に画像を

    エクセルの図形処理で "オートシェイプ"-"吹き出し"があります。 この中にテキストの入力は出来ますが、 画像を入れ込む方法は無いでしょうか。 もしくはそう言ったアドインソフトなどはあるでしょうか。 四角系の吹き出しで、別画像をその大きさにして重ね合わせる方法を 取っていますが、これだと丸系の吹き出しにはちょっと辛いので。

  • エクセルのオートシェイプでいびつな丸を描きたい

    エクセルのオートシェイプについての質問です。 オートシェイプには色々な形がありますが、 いびつな丸を描きたいのです。 実際に描いてあるのを見たことがあるのですが、 どのようにすれば良いのかわかりません。 よろしくご指導をお願いします。

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

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

  • エクセル ユーザーフォームにオートシェープ(図形)を貼り付けるこは可能なのでしょうか?

    エクセル ユーザーフォームにオートシェープ(図形)を貼り付けるこは可能なのでしょうか? イメージで .jpgで図形をユーザーフォームに貼り付ける方法はわかるのですが、ユーザーフォームにオートシェープ(図形)を貼り付けるこは可能なのでしょうか? ご存知の方がいれば、その方法をお教えいただけないでしょうか。 よろしく、お願いいたします。

専門家に質問してみよう