仕事で工事の完成写真を電子データで登録しているのですが
JPEGでーたの写真の上に、施工範囲をオートシェイプを使って表示
させています。
以前は、写真の上に半透明の紙を付け、それに赤鉛筆でマーキングしていました。同じような方法で、エクセルにJPEG画像をはりつけその上にオートシェイプで半透明にして施工範囲を囲んでいます。
写真の横くらいに、施工範囲網掛けの有無を選択できるセルをつくり
その内容によって、マーキングが見えたり、見えなかったりするようにしたいのですが、可能でしょうか。オートシェープの順序を条件により変えられれば出来そうな気がするのですが。
ちなみにマクロを使うと、登録が出来ないので、マクロ以外で対応したいのですが。よろしくご教授ねがいます。
No.1ベストアンサー
- 回答日時:
こんにちは。
オートシェイプの順序を変えるのではなく、
『図』に表示させるセル位置を変える事で対応できそうですが、
かなり面倒です。
写真とオートシェイプの組の数だけ、『図』と[名前定義]が必要になります。
大量の組には向いていないと思います。
1)写真とオートシェイプがあるシートをSheet1とします。
2)作業シートをSheet2とします。
3)Sheet2のセル1個が写真と同じ大きさくらいになるように行幅列高を設定してください。
4)Sheet1の写真にかぶせたシェイプ(既に作成済みと仮定)を切取り、Sheet2のA1に貼り付ける。
5)Sheet2のA2セルをコピー、Sheet1を選択して[Shift]キー押しながら[編集]-[図の貼り付け]。
貼り付けられた『図』を写真の上に配置する。
6)Sheet1の『A1』セルに 1 と入力されたらシェイプが表示されるようにするには、
7)[Ctrl]+[F3]の[名前定義]で、
「名前」 shape1
「参照範囲」=IF(Sheet1!$A$1,Sheet2!$A$1,Sheet2!$A$2)
とします。
8)(5)で作成した『図』を選択して、数式バーに =shape1
9)Sheet1のA1セルに 1 と入力。
...こんな感じになります。(もっと良いやり方があるかもしれませんが、参考まで)
また、
>マクロを使うと、登録が出来ない
...この意味が読み取れないので何とも言えないですが、
写真やシェイプを選択した上で、ショートカットキーでマクロ実行という事もできます。
もし、マクロを別Bookに分けたり、アドイン化したりするなら構わないという事であれば、
If VarType(Selection) = vbObject Then Selection.ShapeRange.ZOrder msoSendToBack
と1行で済みます。
回答ありがとうございました。
やっぱり難しいのですね。
マクロが使ってあるファイルは、管理サーバーへの登録が禁止されており、安全性の観点からシステム管理者が許可してくれません。
教えていただいた方法で試してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセル 条件に合う日付に入力された時間数の合計したい 4 2022/06/17 22:18
- Excel(エクセル) エクセルで重複データを行ごとに抽出したい 4 2022/12/05 08:18
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) Excel2019 マクロを使用し画像を貼り付けした際のリンク切れについて 2 2022/11/15 16:14
- Excel(エクセル) エクセルの複写について 4 2022/04/10 01:02
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Visual Basic(VBA) エクセルマクロでアニメを作る方法を教えてください。 1 2023/02/07 14:27
- Excel(エクセル) マクロ セルの選択 5 2022/08/12 22:47
- その他(Microsoft Office) 選択行の列範囲に二重線を引く 3 2022/06/08 12:21
- リフォーム・リノベーション 一般家庭の外壁・屋根塗装工事について 3 2023/01/05 14:51
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセル 文字を増やしたい。
-
エクセルの計算
-
セルの内容表示が邪魔になる
-
Excel
-
Microsoft365に変えたのですが...
-
エクセル:一覧表に存在する文...
-
エクセルで日付を数字+アルフ...
-
エクセルでの作業計算方法について
-
エクセルで年休を管理する方法...
-
はがきについて。
-
【マクロ】その時、その時で変...
-
excelの不要な行の削除ができな...
-
Microsoft1Officeの互換ソフト...
-
エクセル関数を教えてください
-
Excel ピボットテーブルで日付...
-
【マクロ】読取専用のファイル...
-
【関数】適切な文字数の数字を...
-
時間によってファイル名が変わ...
-
ある列、或いは、ある行のセル...
-
UNIQUE関数が使えないバージョ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
[関数得意な方]教えて下さい・...
-
Excelにてある膨大なデータを管...
-
[関数について]わかる方教えて...
-
Excel初心者です。 詳しい方、...
-
excelの不要な行の削除ができな...
-
エクセル関数に詳しい方教えて...
-
INDIRECTを使わず excelで複数...
-
[オートフィルタ]で抽出された...
-
エクセルの神よ、ご回答を! エ...
-
エクセル関数に詳しい方、教え...
-
各ページの1番上の表示について
-
Excelで写真のような表を作った...
-
エクセルで不等号記号(≠)が上に...
-
数学 Tan(θ)-1/Cos(θ)について...
-
Excel 2019 は、SPILL機能があ...
-
Excelで全角を半角にしたいので...
-
条件付き書式を教えてください
-
Excel フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報