当前位置:首页教育技巧excel技巧excel数据库

电子表格怎样在EXCEL里批量处理图片大小

2025-12-07 09:33:11


1.怎样在EXCEL里批量处理图片大小

按照Ctrl鼠标多选图片,然后在任一一张图上右击,选择“大小和属性”即可。

全部图片的话我自己用的一个VBA,可供参考,如下:

Sub 调整图片大小快捷键()

Application.OnKey "^j", "a调整图片大小"

End Sub

Sub a调整图片大小()

Dim picture_total%

A = InputBox("固定高度: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

2.EXCEL中插入的多个图片怎么一起改变大小

EXCEL中插入的多个图片一起改变大小的步骤:

第一种方法:

选中多个图片,点图片工具下的格式菜单,在高度或者宽度里输入数值。

第二种方法:

1、选中多个图片,鼠标右键选择大小和属性;

2、在【尺寸和旋转】下的高度或者宽度里输入数值,点关闭。

第三种方法:

1、选中多个图片,鼠标右键选择大小和属性;

2、在缩放比例下的高度或者宽度里输入百分比,点关闭。

相关信息


电脑版

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2026 www.at317.com All Rights Reserved .