乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > execl里如何设置可以让图片统一大小-excel 批量修改图片大小,excel批量粘贴图片

execl里如何设置可以让图片统一大小-excel 批量修改图片大小,excel批量粘贴图片

作者:乔山办公网日期:

返回目录:excel表格制作


按照Ctrl鼠标多选图片,然后在任一一张图上右击,选择“大小和属性”即可。
全部图片的话我自己用的一个VBA,可供参考,如下:
Sub 调整图片大小快捷键()
Application.OnKey "^j", "a调整图片大小"
End Sub
Sub a调整图片大小()
Dim picture_total%
A = InputBox("固定e69da5e887aa7a686964616f361高度:H" & Chr(10) & "固定宽度:W" & Chr(10) & "比例缩放:S", "调整图片大小", "H")
A = UCase(A)
picture_total = ActiveSheet.Shapes.Count
For i = 1 To picture_total
Select Case A
Case "H"
If i = 1 Then h = InputBox("请输入图片高度:", "提示:", "200")
ActiveSheet.Shapes(i).Height = h
If i = 1 Then c = MsgBox("是否同一水平高度?", vbOKCancel, "提示:")
' SendKeys "{TAB}"
If c = vbOK Then
If i = 1 Then t = InputBox("请输入图片上端位置:", "提示:", "200")
ActiveSheet.Shapes(i).Top = t
End If
Case "W"
If i = 1 Then w = InputBox("请输入图片宽度:", "提示:", "200")
ActiveSheet.Shapes(i).Width = w
Case "S"
If i = 1 Then s_old = ActiveSheet.Shapes(i).Height
If i = 1 Then s = InputBox("请输入缩放比例(100%):", "提示:", "100")
ActiveSheet.Shapes(i).Height = s_old * s / 100
Case Else
b = MsgBox("您输入的字符不正确!" & Chr(10) & "即将退出程序!", vbOKOnly, "警告!")
Exit Sub
End Select
Next
End Sub

execl里设置可以让图片统一大小的具体操作步骤如下:

所需工具:电脑、Excel软件。

1、新建一个Excel表格,把需要的所有图片复制到表格的任意位置。

2、然后全选所有图片内容。

3、选中图片之后移动鼠标到工具栏,选择【开始】,此时可以看到工具栏上方出现【图片工具】字样,单击选中。

4、选中之后移动鼠标到工具栏的右上方找到【大小】按钮,然后单击后面的下拉框调出设置窗口。

5、此时可以看到有【高度、宽度】选项,输入自己所需尺寸,然后将【锁定纵横比】前的勾去除,设置完成之后点击【关闭】即可。


1、将需要改变的图片放在一个统一的文件夹之下,记住名字。打开PS,选择“文件‘’-”脚本“-”图像处理器“。  

2、在文件夹选择中,选择我们存储的文件夹位置。  

3、选择完毕后,在同界面下,有存储文件位置,以及图像大小,然后,点击右侧的运行。  

4、完成后,会出现一个JEPG的新文件夹,即为更改后的图片。



选中多个之后,直接在图片工具里面就可以修改了

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网