MS office 2016のエクセルで

質問

エクセルでＪＰＥＧなどの写真データを挿入する方法をお教えください。バージョンはMS office 2016です。

回答No.2

molly1978 · ベストアンサー

［挿入］タブ　－［図］でファイル選択

お礼

ご回答ありがとうございます。

回答No.5

chayamati

こんばんは
＞エクセルでＪＰＥＧなどの写真データを挿入する方法をお教えください。
★先ず、挿入する枠を作り、この枠内の背景色を画像データとする方法です
1.[挿入リボン]→[図形ツール]→[枠の形を選ぶ]
　→[挿入するセルから右下にドラグして枠の大きさを決める]
2.図形を枠の背景色とする(添付図）
　→[描画ツールリボンの書式]→[受付図形の塗りつぶし]→[図]→[対象画像]

お礼

ご回答ありがとうございます。

回答No.4

imogasi

質問者はVBAは経験してないかもしれないが、下記はＷＥＢの記事を少々修正して、参考までに挙げてみる。どの程度のものか、感じられるでしょう。
https://stackoverflow.com/questions/12936646/how-to-insert-a-picture-into-excel-at-a-specified-cell-position-with-vba
他にも同様の、たくさん記事がある。
下記例では、
C:\Users\ｘｘ\Pictures\ｙｙｙｙｙｙ\　 というフォルダで、
P1270002 から　P1270007までの名前で写真ファイルがあるテスト例のとき、
下記のプログラムの実行で、６個の写真がシート上に並ぶ。
下記は横１列ですが、３行Ｘ４列とかのプログラムにも簡単に修正できる。
写真のシート上のサイズも、プログラムを変えると、自由に設定できる。
ーー
標準モジュールに下記をコピペして実行。
（バックスラッシュは半角￥を使うこと）
Sub test36()
Set xlapp = Excel.Application
Dim picpath(10)
j = 2
For i = 2 To 7
picpath(i) = "C:\Users\ｘｘ\Pictures\ｙｙｙｙｙｙ\P12700" & Format(i, "00") & ".JPG"
MsgBox picpath(i)
With xlapp.ActiveSheet.Pictures.Insert(picpath(i))
With .ShapeRange
.LockAspectRatio = msoTrue
.Width = 25
.Height = 30
End With
.Left = xlapp.ActiveSheet.Cells(2, j).Left
.Top = xlapp.ActiveSheet.Cells(2, j).Top
j = j + 2
.Placement = 1
.PrintObject = True
End With
Next i
End Sub
１個なら手動操作で十分だが、サムネイル的に表示するや表示する対象写真を都度変えたいなどの時は、ＶＢＡが必要となると思う。

お礼

ご回答ありがとうございます。

回答No.3

chachaboxx

写真をクリップボードにコピーしたらエクセルの上でCtrl+V。

お礼

ご回答ありがとうございます。

回答No.1

121CCagent

画像を挿入するには
https://www.wanichan.com/pc/excel/2016/5/17.html
とか参考にしてみては？

お礼

ご回答ありがとうございます。