Excelのオートシェイプについて

質問

Excel2003を使用しています。
Excelで作表するときに使用する線は、線の太さが細かく設定できる
オートシェイプを使うことが多いのですが、表にある全ての
オートシェイプを一発で削除する方法ってあるのでしょうか？
(今は右クリック→切り取りで削除しています。)
あと、オートシェイプ(直線)に文字が重なった場合は、文字の方を
上に表示させたいのですが…
罫線だと文字がある部分は線が表示されませんが、それと同じような
設定は可能でしょうか？
以上２点、よろしくお願いします。

回答No.3

mu2011 · ベストアンサー

次の方法は如何でしょうか。
オブジェクトの削除：編集→ジャンプ→セル選択→オブジェクトにチェック→ＯＫし、ｄｅｌｅｔｅキー押下。
罫線上の文字表示：文字をテキストボックスで順序を変更又は、オートシェイプ書式設定で塗りつぶしで自動等でどうでしょうか。

お礼

オブジェクトの削除を教えていただいた通りにやってみましたが
何度かクリックするだけで、全部削除できるので簡単＆便利です。
長いことExcelを使用しているのですが、“編集→ジャンプ”を
使ったことがなかったので、またひとつ勉強になりました。
文字の表示も塗りつぶしや順序の変更等をうまく組み合わせると
思い通りのことができそうので、いろいろ試してみたいと思います。
ありがとうございました！

回答No.2

mshr1962

全部削除ですか？
図形描画ツールバーの斜めの白い線（オブジェクトの選択）の状態で
ドラッグで括った範囲内のオブジェクトを同時に編集できます。
この状態でDELETEボタンを押せば削除できると思いますが．．．

文字を上にする方法は、オートシェープ上にテキストを追加して
テキストの編集の状態で、数式バーにカーソルを移動して
=A1
のように表示したいセルを手入力してみてください。

逆の方法として、セル範囲をコピーしてから
Shiftを押しながら「編集」「図のリンク貼り付け」でセルの内容をリンクした状態で図形化できます。

お礼

オートシェイプの全削除、こんなに簡単にできるんですね！
文字を上に表示する方法は、求めていたものとは違いましたが
テキストの編集で表示したいセルを手入力(=A1など)して
表示させることができることを知りませんでしたので
勉強になりました。
ありがとうございました。

回答No.1

zap35

＞オートシェイプを一発で削除する方法
次のマクロで可能です。
Sub Macro4()
ActiveSheet.Shapes.SelectAll
Selection.Delete
End Sub

＞オートシェイプ(直線)に文字が重なった場合は、文字の方を上に表示させたい
これは「セルに入力した文字を上に表示」という意味であればできないと思います。テキストボックスに入力した文字であれば、順序を変更すれば可能です。

お礼

ありがとうございました。
オートシェイプに(直線)に文字が重なった場合は文字の方を
上に表示させることはできないようですね…残念ですが
仕方ありません。
今までは、重なる部分だけ直線を消して、オートシェイプを
２本に分けていたので、何か便利な方法はないかと思い
質問しました。