怎样使用VBA一次性删除表格当中所有的照片？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Sub adc()

 

'    Dim i As Long

 

'    Range("A1:K12000").Activate

 

'    For i = 0 To 100

 

'        Rows(1 + i * 8).RowHeight = 30

 

'    Next

 

   

 

    For Each im In ActiveSheet.Shapes

 

    im.Delete

 

    Next

End Sub

5、最后我们就看到表格当中所有的照片都被删除了，非常的方便快捷，