将图片插入Excel单元格[已关闭]

x8goxv8g  于 2023-02-05  发布在  其他
关注(0)|答案(6)|浏览(151)

**已关闭。**此问题不符合Stack Overflow guidelines。当前不接受答案。

此问题似乎与a specific programming problem, a software algorithm, or software tools primarily used by programmers无关。如果您认为此问题与another Stack Exchange site的主题有关,您可以留下评论,说明在何处可以回答此问题。
5年前关闭。
Improve this question
我试图生成一个带有图片的报表,但无法将图片放入单个单元格中。我可以让图片“浮动”在工作表中,但需要将它们放入单元格中。如何才能做到这一点?

9njqaruj

9njqaruj1#

您可以将图像添加到注解中。
右键单击单元格〉插入注解〉右键单击注解框外部的阴影(灰色区域)〉设置注解格式〉颜色和线条〉填充〉颜色〉填充效果〉图片〉(浏览至图片)〉单击确定
图像将在鼠标悬停时显示。

**Microsoft Office 365(2019)**引入了名为注解的新事物,并将旧注解重命名为“notes“。因此,在上述步骤中执行New Note而不是Insert Comment。所有其他步骤保持不变,功能仍然存在。

还有一个20美元的Windows产品-Excel Image Assistant...

pprl5pva

pprl5pva2#

有一些更快的方法(https://www.youtube.com/watch?v=TSjEMLBAYVc):
1.将图像(Ctrl+V)插入Excel。
1.确认“图片工具-〉对齐-〉对齐网格”已选中
1.调整图像大小以适合单元格(或单元格数)
1.右键单击图像并选中“大小和属性... -〉属性-〉随单元格移动和调整大小”

uajslkp6

uajslkp63#

只要去谷歌文档和粘贴这作为一个公式,其中网址是一个链接到您的图片

=image("URL", 1)

之后,从google docs选项,下载excel,你会有你的图像在单元格编辑每评论,你不需要保持图像的网址活着那么长时间,只要足够长的时间excel下载它,然后它会留在嵌入文件.

svujldwt

svujldwt4#

现在我们可以直接轻松地向Excel添加图片。只需按照以下说明操作:
1.转到"插入"选项卡。
1.点击图片选项(位于插图组中)。

1.在"插入图片"对话框中,找到要插入到Excel单元格中的图片。

1.点击插入按钮。

1.调整图片/图像的大小,使其完全适合单元格。

1.将图片放在单元格中。一个很酷的方法是先按Alt键,然后用鼠标移动图片。图片一靠近单元格,就会与单元格的边框对齐并排列。
如果有多个图像,则可以一次选择并插入所有图像(如步骤4所示)。
您还可以通过选择图像并拖动边缘来调整图像大小。对于徽标或产品图像,您可能希望保持图像的纵横比不变。若要保持纵横比不变,请使用图像的角来调整图像大小。
当您使用上述步骤将图像放置在单元格中时,如果您调整单元格大小、过滤或隐藏单元格,图像将不会粘在单元格上。如果您希望图像粘在单元格上,则需要将图像锁定到它所放置的单元格。
为此,您需要执行以下所示的附加步骤。
1.右键单击图片并选择设置图片格式。

1.在"设置图片格式"窗格中,选择"大小和属性",然后使用"属性"中的选项选择"随单元格移动和调整大小"。

现在您可以移动单元格、过滤或隐藏它,图片也将移动/过滤/隐藏。

    • 注:**

此答案取自此链接:Insert Picture into a Cell in Excel.

zf9nrax1

zf9nrax15#

虽然我的建议是利用Doality.com提供的自动化功能,特别是Picture Manager for Excel
下面的vba代码应该符合你的标准。祝你好运!
这段代码将把图像插入到选定的单元格中,并将其缩放以适合单元格的精确宽度和高度。例如:

说明:

添加一个按钮控件到您的Excel工作簿(单击开发人员选项卡,插入,Active X,命令按钮),然后双击按钮,以获得VBA代码--〉

Sub Button1_Click()
    Dim filePathCell As Range
    Dim imageLocationCell As Range
    Dim filePath As String

    Set filePathCell = Application.InputBox(Prompt:= _
        "Please select the cell that contains the reference path to your image file", _
            Title:="Specify File Path", Type:=8)
            
     Set imageLocationCell = Application.InputBox(Prompt:= _
        "Please select the cell where you would like your image to be inserted.", _
            Title:="Image Cell", Type:=8)

    If filePathCell Is Nothing Then
       MsgBox ("Please make a selection for file path")
       Exit Sub
    Else
      If filePathCell.Cells.Count > 1 Then
        MsgBox ("Please select only a single cell that contains the file location")
        Exit Sub
      Else
        filePath = Cells(filePathCell.Row, filePathCell.Column).Value
      End If
    End If

    If imageLocationCell Is Nothing Then
       MsgBox ("Please make a selection for image location")
       Exit Sub
    Else
      If imageLocationCell.Cells.Count > 1 Then
        MsgBox ("Please select only a single cell where you want the image to be populated")
        Exit Sub
      Else
        InsertPic filePath, imageLocationCell
        Exit Sub
      End If
    End If
End Sub

然后按如下所示创建Insert方法(这可以遵循上面的按钮代码):

Private Sub InsertPic(filePath As String, ByVal insertCell As Range)
    Dim xlShapes As Shapes
    Dim xlPic As Shape
    Dim xlWorksheet As Worksheet
    
    If IsEmpty(filePath) Or Len(Dir(filePath)) = 0 Then
        MsgBox ("File Path invalid")
        Exit Sub
    End If
    
    Set xlWorksheet = ActiveSheet
    
    Set xlPic = xlWorksheet.Shapes.AddPicture(filePath, msoFalse, msoCTrue, insertCell.Left, insertCell.Top, insertCell.Width, insertCell.Height)
    xlPic.LockAspectRatio = msoCTrue
End Sub
0ejtzxu1

0ejtzxu16#

使用Google云端硬盘,不到一分钟即可完成(免费,无障碍)

·在www.example.com上批量上传您的所有图像imgur.com
·将所有图片的链接复制到一起,并附加. jpg。只有imgur允许您将所有图片链接复制到一起,使用右上角的图片选项卡。
·使用http://TextMechanic.co在每一行的前面和后面添加以下内容:前缀:=image("和后缀:", 1)
所以它看起来像这样**=image("URL", 1)**
·复制全部
·粘贴到谷歌电子表格
·瞧!
参考文献:
http://www.labnol.org/internet/images-in-google-spreadsheet/18167/
https://support.google.com/drive/bin/answer.py?hl=en&answer=87037&from=1068225&rd=1

相关问题