在Excel女士popup的图像

你们中的一些人正在阅读这个问题，可能会发现这个问题相当微不足道，但这是一个随机出现在我头脑中的具体用例问题，无法find解决scheme与我无关的问题。

这样说，这里的问题是：

1. 我想在Excel表格中input图像。 特别是在一个单元格中 – 作为数据。 如果这是可能的，赞赏有用的链接或在正确的方向轻推。
2. 这是它的一般要点。 我只是想在单元格中的图片（他们也可以链接到单元格，但他们必须是本地可用和离线可用）。

关于那些有问题的解决scheme的问题：

– （1）的问题是，图片不像在一些在线工作表中那样坐在excel的单元格内。 我还没有find一个，我想听取替代scheme和/或您的经验。

（2）的问题是这是一个多步骤的解决scheme。 我偶然发现一个解决scheme，但似乎无法进一步减less步骤。 我发现这个video显示可以添加图片作为评论 。 不过，我并不知道这样做的捷径。 有没有可能创build一个？ 或者它本身存在？

好奇的其他信息：特殊用途是什么？

• 没什么。 我看了很多节目，我想要一个方法来追踪他们。 MAL没有列表。 太糟糕了。 所以我决定把事情保持在离线状态，并追踪即将到来的季节。

任何替代scheme是值得欢迎 （如果不是很明显，我指的是一个基于macros观的解决scheme，但是我希望尽可能避免它，并保持简单;但是如果它不能被帮助的话。

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表单中。 我想你可以改变这一点，将图片存储在一个特定的单元格。

我已经把这个子分配到一个button来完成这项工作。 如果我发现有关于此的其他信息，我会更新我的答案，提供更多信息。

编辑：

好。 所以这里是关于这个和我所做的更多的信息：

首先在这里你可以find更多有关vba函数的信息OLEObjects.Add： https ： //msdn.microsoft.com/en-us/library/office/ff195728.aspx

据我所知，你可以添加几乎所有你想要的文件，你可以select位置来将其添加到工作表（大小也）（检查顶部，左侧，宽度参数）

其次，这是我得到的结果的一些图片：我的button与标签作为计数器（增加您添加照片）

上传照片时的结果如下：