分享

Excel VBA 8.61 单元格图片的修复 单元格筛选不会错位

 Excel和VBA 2022-01-10

单元格图片的修复 单元格筛选不会错位


点击上方“Excel和VBA”,选择“置顶公众号”

致力于原创分享Excel的相关知识,源码,源文件打包提供

一起学习,一起进步~~


很多时候,我们的Excel表格中都需要插入一些图片

不管是出于美观的需要,还是因为标识的需要,手工插入的图片都会存在一个很严重的问题

这个问题,可能有小伙伴发现了,可能有些小伙伴还没有发现,那么这个问题是什么呢?

那就是当单元格执行筛选操作的时候,这些图片就会全部错位了

比方说这样,这个时候,你去调整图片的位置嘛?

可能你根本不知道要怎么调整,甚至说,你这个时候就不能对图片进行调整,因为如果你现在调整了图片的位置

那么当你取消筛选之后

原来的图片的位置又出现了错位的情况,这确实是一个非常头疼的问题

当然你如果使用我们上节学习的VBA代码插入的图片的话,恭喜你,你不需要面对这个问题

因为在上节的代码中,我们已经针对这个问题作出了处理,所以,不存在这样的问题

那么本节,我们就常使用VBA代码,来修复手工插入的图片,让她能够和单元格完全的贴合在一起

在筛选的时候,避免出现错位的情况。

案例很简单,我们直接上代码吧

Sub test()
  ActiveSheet.Shapes.SelectAll
  Selection.Placement = xlMoveAndSize
End Sub

相信很多小伙伴都已经去翻过上节的代码了,但是在上节的代码中,并没有找到针对这个操作的代码

当然实现的代码和后期修复的代码,非常的简短,那么是否可以实现我们的效果呢?

来看看

不管你做出什么样的筛选,不管单元格中是否有图片,都不会有错位的情况出现了

这样我们在筛选含有图片的单元格的时候,就非常的方便了。

今天的代码呢,并没有太多的内容,纯粹是一个套用的知识点,大家直接套用就行了。

vba就这样,有现成的轮子,为什么不用呢。


==========================

好了,明晚21:00,准时再见!

因为公众号没有留言功能(开的比较晚),所以建立一个线下微信群,主要为大家提供一个交流的平台,同时大家也可以提一些对公众号的意见和看法,大家一起学习,一起进步。

个人的小群,也不会很热闹,有问题抛下问题,大家互相帮助,不要发广告哦~

因为近期加群人员太杂,需要入群的小伙伴可以先加我微信,备注“加群”我会拉进群,不备注,不加的哦~~

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多