Ms. Excelのポップアップ画像

Question

これを読んでいる人の中には、この質問が非常に些細なことがあるかもしれませんが、これは私の頭の中にランダムに出現し、解決策を見つけることができない特定の使用事例です。私と一緒に座って。そうは言って

は、ここで問題です：

1. 私はExcelシートに入力画像にしたいです。セルでは特に - データとして。 これが可能であれば、正しい方向に役立つリンクやナッジがあります。
2. これは一般的な要点です。私はちょうど細胞の写真を望んでいる（それらは細胞にもリンクすることができるが、それらは局所的に利用可能であり、オフラインで利用可能でなければならない）。これらの問題の解決策の問題上へ、

：

- （1）の問題は、彼らはいくつかのオンラインワークシートで行うように画像がExcelで内部の細胞を座っていないということです。私は1つを見つけていないし、代替案やあなたの経験を聞きたい。

- （2）の問題は、それが複数ステップの解決策であることです。私は解決策を見つけましたが、それ以上のステップを減らすことはできません。 I found this video where it shows it is possible by adding pictures as comments。しかし、これを行うために私が知っているショートカットはありません。それを作成することは可能ですか？それともネイティブに存在するのでしょうか？好奇心のため

追加情報：いただきまし特定の使用？

• 何もありません。私は多くのショーを見て、私はそれらを追跡する方法を欲しかった。 MALにはショーのリストがありません。残念な。だから私は解決のために物事をオフラインにし、次の季節を追跡することに決めました。

任意の代替は大歓迎です。（明らかでない場合は、マクロベースのソリューションを参照していますが、可能な限り避け、単純なものにしたいと思います。ここで

Answer 1

私がやっていることです：

Private Sub photo1_Click() 
    Dim ftopen As Variant 

    'get file name from open file dialog box. 
    ftopen = Application.GetOpenFilename(Title:="Choose file to attach") 

    'if no file chosen then close sub 
    If ftopen = False Then 
     MsgBox ("No file selected!!!") 
     Exit Sub 
    End If 

    'insert file into sheet. 
    Worksheets(3).OLEObjects.Add Filename:=ftopen, Link:=False, _ 
     DisplayAsIcon:=True, IconIndex:=0, IconLabel:="Photo1" 
End Sub 

これは、Excelシートにファイルとして画像を追加します。私はあなたが特定のセルに画像を格納するために少し変更することができると思います。

私はこの作業を行うためのボタンにこのサブを割り当てました。私がこれに関する何か他のものを見つけたら、私はさらなる情報で私の答えを更新するでしょう。

EDIT：

[OK]をクリックします。だから、これと私がやったことについてもう少し詳しく知りたいです。

ここでは、vba関数OLEObjectsに関するより多くの情報を見つけることができます。追加： https://msdn.microsoft.com/en-us/library/office/ff195728.aspx

を私の知る限り

（上、左、幅パラメータを確認してください）あなたが望むほぼすべてのファイルを追加することができますし、シート（もサイズ）でそれを追加する場所を選択することができます理解して第二に、ここで私はこれで得た結果のいくつかの写真です： 写真がアップロードされたときにラベルが

とシートに結果を（あなたは写真を追加するとインクリメント）カウンタとして動作すると私のボタン：