十个硬骨头，挑战高手，解决一个是一个

风云际会6 · 发表于 2010-5-21 21:24

看了，头都有点晕了，有时间再写写看吧。

JLF2003 · 发表于 2010-5-21 23:24

逐层学习。

gues1688 · 发表于 2010-5-22 07:17

原帖由 aman1516 于 2010-5-21 15:43 发表

由于本机在“选择性粘贴”上卡住了，修改了一下，终于看到了结果，但存在如果B列数据变化时，自动列宽亦跟着变化，代码中固定的缩放比例与分栏行数可能不适于新数据，又达不到想要的页面效果了。
但仍非常感谢K ...

B列数据在应用中，是否存在最大宽度？如果有的话，可考虑设置为固定列宽。
如果B列宽无限制可以考虑单元格自动换行，表头可考虑使用“顶端标题行”，类似Word表格的“标题行重复”

[ 本帖最后由 gues1688 于 2010-5-22 07:19 编辑 ]

gues1688 · 发表于 2010-5-22 07:55

观察了一下Word中的“分栏”，要获取较满意的效果，采用的即是这种策略

风云际会6 · 发表于 2010-5-22 08:43

今天做好了001和002

aman1516 · 发表于 2010-5-22 11:17

原帖由 gues1688 于 2010-5-22 07:17 发表

B列数据在应用中，是否存在最大宽度？如果有的话，可考虑设置为固定列宽。
如果B列宽无限制可以考虑单元格自动换行，表头可考虑使用“顶端标题行”，类似Word表格的“标题行重复”

看来是您理解了我的意思，B列数据长度有长短，无法确定最大宽度，我在考虑计算方案时，亦考虑过固定列宽，但这样数据自动换行后看不到了，如果设置行为自动行高，又造成每页分栏的行数不确定了，分栏数据无法“接龙”。
因此，通过计算固定列宽，然后自动设定行高适应内容，并根据分栏情况设定“顶端标题行”应是一种可行方法，有请编程高手了。

aman1516 · 发表于 2010-5-22 12:08

原帖由 wangjian6931 于 2010-5-21 18:46 发表
回答个005听说没人回答的说。

谢谢，很好的菜单式工具，但第2、第3种情况，我要求的是纯粹在原数据区域删除行、列中重复数据的单元格，然后其它单元格按要求移动，数据不变。

简化了表格，请再帮忙调整一下.，见附件。

另外，第一项功能，再加个选择处理哪行、哪列的得示，就更完美了。

自己也在继续研究中......

qr1008 · 发表于 2010-5-22 12:20

看不懂这们的问题都挺深的。

mhz8008 · 发表于 2010-5-22 13:26

001参考一下

aman1516 · 发表于 2010-5-22 14:55

原帖由 mhz8008 于 2010-5-22 13:26 发表
001参考一下

关键“ ActiveSheet.Hyperlinks.Add Anchor:=Target.Offset(, 3), Address:=Openpath & Openstr, _
ScreenTip:="单击打开" & Openpath & Target.Value, TextToDisplay:="明细" ”
可实现第一项功能。亦跳过了通过表2去查找对应的功能。

但都怪我表达不清，有所遗漏：
这里的Openpath是固定一个文件夹内的，而我实际的“产品卡”文件夹内是按客户名称分为十多个不同的子文件夹的（不能合在一个文件夹内），如“爱美家”、“亚太”什么的，那该如何实现对“产品卡”下所有子文件夹的历遍？？

因此，我原来的构思是通过在表2汇总建立“产品卡”下所有子文件夹内的产品卡文件目录与链接（这个已实现），再通过表1的动态查询（如订单、排产或其它岗位需查产品卡的表格）都能在原表上快速实现产品卡查询。

另外，下拉列表的代码如何处理，请帮忙完善。

		自动登录	找回密码
密码			免费注册

[求助] 十个硬骨头，挑战高手，解决一个是一个

参考一下