[[20040929082726]] 『写真台帳作成』(nao) >>BOT

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『写真台帳作成』(nao)

工事写真台帳を作成したいのですが、
画像の貼り付け欄を最初に指定できませんでしょうか?
現在は大きなサイズの写真を呼び出し
枠線にドラッグであわせており
なかなか同じ位置とサイズになりません。
用紙のスタイルはA4の縦に写真を3枚、
その横に備考欄をもうけています。
どなたかよい知恵をお願いいたします。

EXCEL2000
Windows Me


 以前私が質問したときの、以下のことで対処できると思います。
[[20040826090412]]『テキストボックス内に画像を貼り付け』(川野鮎太郎) 

 ※要するに、差し込みたいセルの大きさに合わせたテキストボックスを配置し、
  そのテキストボックスの背景として画像を配置する方法です。
 (川野鮎太郎)


 簡単に設定できるようにしてみました。
 Sub 画像貼付()
 On Error GoTo Line01
 fileToOpen = Application _
    .GetOpenFilename("画像ファイル,*.jpg;*.bmp")
 If fileToOpen <> False Then
    Selection.ShapeRange.Fill.UserPicture fileToOpen
 End If
 Exit Sub
 Line01:
 MsgBox "画像を貼り付ける枠を" & Chr(10) & "選択してから実行してください。"
 End Sub

 ※ 少し間違ってましたので修正しました。
   テキストボックスではなく四角の図形が良いかも(^_^A;
 (川野鮎太郎)


ありがとうございました。
一発で問題解消できました
またよろしくお願いいたします。(nao)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.