excel图片怎么存到桌面

在Excel中将图片存储到桌面的方法有多种，包括复制粘贴图片、使用右键菜单保存图片、以及通过VBA编程等方法。最简单的方法是通过复制粘贴图片，右键菜单保存图片更适用于单张图片的保存，而VBA编程则适用于批量保存图片。下面将详细介绍每种方法的操作步骤。

一、复制粘贴图片

1.1 选择并复制图片

在Excel工作表中，找到需要保存的图片。点击图片，确保图片被选中，此时图片周围会出现一个边框。按下键盘上的 Ctrl+C 组合键，复制图片。

1.2 打开图像编辑软件

打开Windows自带的图像编辑软件“画图”或其他图像编辑软件，如Photoshop、GIMP等。

1.3 粘贴图片并保存

在图像编辑软件中，按下键盘上的 Ctrl+V 组合键，粘贴刚刚复制的图片。然后，点击“文件”菜单，选择“另存为”，在弹出的对话框中选择保存位置为桌面，输入文件名，选择保存类型（如PNG、JPEG等），最后点击“保存”按钮。

二、右键菜单保存图片

2.1 选择图片

在Excel工作表中，找到需要保存的图片。点击图片，确保图片被选中，此时图片周围会出现一个边框。

2.2 右键菜单保存图片

右键点击选中的图片，在弹出的右键菜单中选择“另存为图片”。在弹出的“另存为”对话框中，选择保存位置为桌面，输入文件名，选择保存类型（如PNG、JPEG等），最后点击“保存”按钮。

三、使用VBA编程批量保存图片

3.1 启动VBA编辑器

按下键盘上的 Alt+F11 组合键，启动VBA编辑器。在VBA编辑器中，点击“插入”菜单，选择“模块”，插入一个新的模块。

3.2 编写VBA代码

在新模块中，输入以下VBA代码，该代码用于将Excel工作表中的所有图片保存到指定文件夹（如桌面）：

Sub SavePicturesToDesktop() Dim ws As Worksheet Dim pic As Picture Dim filePath As String Dim i As Integer ' 设置保存路径为桌面 filePath = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "" ' 循环遍历所有工作表 For Each ws In ThisWorkbook.Worksheets ' 循环遍历工作表中的所有图片 i = 1 For Each pic In ws.Pictures ' 保存图片到桌面 pic.Copy With CreateObject("Word.Application") .Documents.Add .Selection.Paste .Selection.InlineShapes(1).SaveAsPicture filePath & "Picture_" & ws.Index & "_" & i & ".jpg" .Quit End With i = i + 1 Next pic Next ws MsgBox "图片已成功保存到桌面！", vbInformation End Sub

3.3 运行VBA代码

在VBA编辑器中，点击“运行”菜单，选择“运行子过程/用户窗体”，或者按下 F5 键，运行刚刚编写的VBA代码。代码执行完毕后，Excel工作表中的所有图片将被保存到桌面。

四、使用Excel导出工具

4.1 下载并安装Excel导出工具

有些第三方工具可以帮助批量导出Excel中的图片，比如Kutools for Excel。下载并安装该工具。

4.2 使用Excel导出工具

安装完成后，打开Excel并加载Kutools for Excel。在Kutools for Excel工具栏中，选择“导出工具”，然后选择“导出图片”，按照提示步骤操作，将图片导出到桌面。

通过以上几种方法，您可以轻松将Excel中的图片保存到桌面。如果您需要批量保存图片，推荐使用VBA编程或第三方导出工具，这样可以大大提高工作效率。