函数公式搞不定了，工作表包含的引用另一个工作表的数组公式不能超过65472个

zystys · 发表于 2019-9-23 17:25

本帖最后由 zystys 于 2019-9-24 21:03 编辑

一把小刀闯天下发表于 2019-6-22 22:50
j = Cells(5, Columns.Count).End(xlToLeft).Column
[a16].Resize(UBound(arr, 1), UBound(arr, 2)) ...

小刀老师您好可否麻烦您在百忙中帮我写一个VBA代码，

若没空，请谅打扰。谢谢

wodewan · 发表于 2019-9-24 03:16

本帖最后由 wodewan 于 2019-9-24 08:40 编辑

zystys 发表于 2019-9-23 17:25
小刀老师您好可否麻烦您在百忙中帮我写一个VBA代码，非常感谢，
若没空，请谅打扰。谢谢

附件供参考

zystys · 发表于 2019-9-24 10:42

wodewan 发表于 2019-9-24 03:16
附件供参考

谢谢wodewan老师您的热情帮助，对于您来说可能只是毫末技艺－－－－－但是对于我来说这就是－－－－－－－－－顶上功夫，再次拜谢您的馈赠，您帮助我解决了“天大的问题”谢谢谢谢再谢谢。

zystys · 发表于 2019-9-27 16:09

wodewan 发表于 2019-9-24 03:16
附件供参考

wodewan老师请帮助看看当从横向改为竖向后，这个代码要怎样修改呢，请修改看看谢谢

选择变表.rar (152.17 KB, 下载次数: 1)

wodewan · 发表于 2019-9-27 18:44

本帖最后由 wodewan 于 2019-9-27 21:28 编辑

zystys 发表于 2019-9-27 16:09
wodewan老师请帮助看看当从横向改为竖向后，这个代码要怎样修改呢，请修改看看谢谢

附件供参考。

zystys · 发表于 2019-9-27 20:28

wodewan 发表于 2019-9-27 18:44
附件供参考。

说时迟那时快蓦然回首中、wodewan助码已现回复中！！这真是难者不会、会者不难哟！！小生再拜谢wodewan老师帮助，无以为报！唯有真诚地对wodewan老师再次帮助再次深深感谢。

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

[求助] 函数公式搞不定了，工作表包含的引用另一个工作表的数组公式不能超过65472个