【重磅发布】：聚光灯——我的加载宏系列小工具【单元格小工具】之四

837617880

膜拜大佬，值得学习

PWWYH2006

大佬，先膜拜，后提问，有时表格列数过多，只能缩小比例，不一定能做到100%，还是希望能在缩小或放大显示比例时能使用。

leolee82

支持楼主分享源码。
大概2012年我用C++也做过聚光灯（FocusRC），用GDI绘图的方式可以完美支持Office2010。Office2013后，想到了用窗口代替，但没想到消息穿透，不想折腾就放弃了。

帮楼主更新了一下，关键代码支持缩放和WPS了。坐标计算方式是逆向的，用二分法先定位单元格，再搜索确定具体边界坐标。
其他代码基本没动，希望楼主再删除些无用代码更新一下。

另外，楼主版本比较的代码有个小问题：application.version<"14" 后面的数字14不应该用字符串格式，否则就成了字符串比较（如"12"<"2"结果为true），但恰好在这里不会有问题

leolee82

简化了下代码，直接将窗体设置为EXCEL7的子窗口。因为子窗口边界是不会超过父窗口的，就不用计算pane尺寸了，只需要设置一个足够大的值就行。楼主再测试一下

ggmmlol

leolee82 发表于 2020-11-4 09:27
简化了下代码，直接将窗体设置为EXCEL7的子窗口。因为子窗口边界是不会超过父窗口的，就不用计算pane尺寸了 ...

我经过仔细研究，已经实现任意行列位置的直接快速定位，无需使用二分法计算逆向定位，支持拆分或冻结窗口的视图，支持窗口任意缩放（10%至400%)，支持页面布局和分页预览，而且可以对活动选区留白(仅对活动窗格中的留白),如下动图所示，为接近表格最大行、最大列处的快速定位：
有兴趣可以研究一下Excel VBA提供的对象属性，有些很少用到，但关键时刻还是要让它出场。

leolee82

ggmmlol 发表于 2020-11-7 18:25
我经过仔细研究，已经实现任意行列位置的直接快速定位，无需使用二分法计算逆向定位，支持拆分或冻结窗口 ...

当时搞了好久，最后没办法用了几十个循环的逆向定位。后来发现一个crosshair的免费软件可以全屏使用，也就没再搞这个聚光灯功能了。
方便分享一下更新后的版本吗？或者私聊发一下定位代码。

ggmmlol

leolee82 发表于 2020-11-9 22:27
当时搞了好久，最后没办法用了几十个循环的逆向定位。后来发现一个crosshair的免费软件可以全屏使用，也 ...

stanleypan版主更新了他的Xcolor的Com加载宏，他所用到的定位方法，最早于2005年发的帖子里有源码，方法也和你的二分法类似，但他最新的方法，应当和我的一样，是直接得出的。学导也曾经和你提到两种定位方法，你可能只尝试了其中一种，如果你当时尝试的是另一种，也许7年前就成功了。

leolee82

ggmmlol 发表于 2020-11-10 14:52
stanleypan版主更新了他的Xcolor的Com加载宏，他所用到的定位方法，最早于2005年发的帖子里有源码，方法 ...

学导是哪位？我论坛混的少

ggmmlol

leolee82 发表于 2020-11-10 15:46
学导是哪位？我论坛混的少

你七年前的帖子，学导有和你交流不少的，你都忘记了呀，真是辜负学导的满腔热忱啊~

字数限制

都是大神啊，一个聚光灯玩转出了这样的花样，厉害