• ベストアンサー

エクセルで図形をセレクト

アクティブシート内の全てのオブジェクト(線や図形)をセレクト状態にするマクロを教えて頂けますでしょうか。

回答 全件
ベストアンサー
ActiveSheet.Shapes.SelectAll とか？

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

  • ベストアンサー
  • papayuka
  • ベストアンサー率45% (1388/3066)
回答No.1

ActiveSheet.Shapes.SelectAll とか？

sear17
質問者

お礼

有難うございました。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. オフィス系ソフト

関連するQ&A

  • エクセルで線をセレクト

    アクティブシート内の全ての線（オブジェクト)をセレクト状態にするマクロを教えて頂けますでしょうか。 ちなみに、 ActiveSheet.Shapes.Line.SelectAll ではダメでした。

  • エクセルの図形移動で困っています。

    エクセルの図形移動で困っています。 シート２にある図形をシート１にマクロを使って移動（コピー＆貼り付け）をしようとしています。 マクロの記録でやった所、以下のような感じになりました。 Sub Macro4() ' ' Macro4 Macro ' ' Sheets("sheet2").Select Selection.Copy Sheets("sheet1").Select Range("N16").Select ActiveSheet.Paste End Sub しかし、なぜか３回程つかうとシート１に貼り付けされなくなります。 原因はシート２の図形をコピーする時に選択されるところがないからではないか？と思い 色々ネットで調べてみたのですが、まだまだ結論が出ていない状態です。 皆様のお力を貸して頂ければと思います。 Sub Macro4() ' ' Macro4 Macro ' ' Sheets("sheet2").Select (たぶんここに"図形1）とか入るのでは？？と思っています Selection.Copy Sheets("sheet1").Select Range("N16").Select ActiveSheet.Paste End Sub

  • エクセルの図形描画のこと

    エクセルのあるシートに、オートシェイプの図形とテキストボックスの文字が無数に描画してあります。これらを全てまとめて、"セルに合わせて移動やサイズ変更をしない"に一括変更するにはどうすればいいでしょうか？ 対象オブジェクトを全てセレクト状態にしてから、マウス右クリックで"オブジェクトの書式設定"を選択してみると、対象が多すぎるようで書式設定ウインドウが出てきませんでした。

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

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

  • Excelでの図形の描画

    Visual Basicでフォームに図形を直接描画できる様に、Excelでオートシェイプなどのオブジェクトを使用しないでシートに対して直接、図形（線や円など）を描画する事は可能でしょうか？

  • エクセル２０１０の図形の表示について

    エクセル（９７－２００３ブック：互換モードで使用中）で図形（例えば：四角□）を表示しようとして「□」をクリックして、シートに表示させるのですが、必ず「線は青」で「青く塗りつぶされた」状態で表示されます。そのたびに「線を黒にし塗りつぶしなし」に変更しています。とても面倒です。図形を表示すると「線は黒で塗りつぶしない」に表示されるように設定できないのでしょうか？教えてください。

  • Ｅｘｃｅｌで特定の図形だけ透明化したい

    ＥｘｃｅｌでSheet上に図形を表示し、下記マクロを実行すると徐々に透明化しますが、 複数の図形を表示し実行するとすべてが透明化されます。特定の図形だけを透明化する方法ありますか For N = 1 To 200 Dim sh As Shape Dim tr As Double For Each sh In ActiveSheet.Shapes tr = sh.Fill.Transparency tr = tr + 0.0061 If 1 <= tr Then tr = 1 sh.Fill.Transparency = tr Next Range("a1").Select Next End Sub

  • エクセルでセレクトの解除

    Cells.Select　で全てのセルをセレクトした後に、 W20　だけセレクトを解除するマクロ文を教えて頂けますか。

  • エクセルマクロでシート内にある画像のみを選択する

    エクセルマクロでシート内にある画像のみを選択する ActiveSheet.DrawingObjects.Select これだとエクセルのシート内にあるすべてのオブジェクトを選択してしまいます。 テキストボックスなどのオブジェクトは選択せずに、写真などの画像のみを 選択したいのですがどのようにしたらよいのでしょうか。 どうかよろしくお願いいたします。

  • エクセルの図形描画で？

    Excel2003を使用しています。 セルに文字や数字を入力し、「図形描画」で○や□の線で囲むと文字や数字が隠れてしまいます。 図形描画で書いたオブジェクト（○や□）を背面へ移動するという操作をしても文字や数字が現れて来ません、操作方法を教えて下さい。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する