根据单元格内容依规则在写入公式求助之2

准提部林

試試這公式吧//
Xl0000471.rar (9.89 KB, 下载次数: 3)

2023-2-8 20:40 上传

点击文件名下载附件

准提部林

只要J:L列是"常駐公式"(随引用資料而變動),
不管用公式或VBA自訂函數,
只要數據夠多, 動一髮動全身, 都不可能快~~

原附檔已關掉自動重算, 表示你的資料用公式是滾不動的~~

天地一相

准提部林 发表于 2023-2-8 20:40
試試這公式吧//

谢谢啦，我真不能用这种公式。我之前使用的是“=RIGHT(SUM(N(OFFSET($P$3,,0&MID(TRIM(MID(SUBSTITUTE($B5,"-",REPT(" ",25)),COLUMN(A5)*25-24,25)),{1;2;3;4;5;6;7},1)))))”这个公式。现在我就想用VBA，根据B列位置内容，写成“=RIGHT(Q3+T3)”这种，速度最快。

天地一相

准提部林 发表于 2023-2-8 20:47
只要J:L列是"常駐公式"(随引用資料而變動),
不管用公式或VBA自訂函數,
只要數據夠多, 動一髮動全身, 都 ...

谢谢，没有呀。我又测试了10万行循环的，附件发你看看。之前类似的计算量，需要90秒，现在15秒。

准提部林

先用vba填入公式(時間較久)//
Xl0000471-1.rar (13.15 KB, 下载次数: 9)

2023-2-8 21:13 上传

点击文件名下载附件

可先關閉自動計算, 填好再開

天地一相

准提部林 发表于 2023-2-8 21:14
先用vba填入公式(時間較久)//

感谢啊。就是要这种。没想到还能使用这种函数。先去测试了，回头汇报给你测试情况。

天地一相

准提部林 发表于 2023-2-8 21:14
先用vba填入公式(時間較久)//

汇报！测试结果，原来125秒，现在45秒！想来，原来1小时现在不就20分钟了。开心，谢谢啊。可否请你给修改一个，公式里，Q:W后面的数字跟随B列行号变化的那种。我有一种，Q:W列内容不是固定在顶部的，是跟随B列每一行都有，需要计算同行区域的。谢谢

天地一相

准提部林 发表于 2023-2-8 21:14
先用vba填入公式(時間較久)//

你真厉害！看别人回复说本帖求助太难了，让我去别的板块试一试，我都有点泄气了。你给解决了！谢谢，谢谢。

准提部林

天地一相 发表于 2023-2-8 21:43
汇报！测试结果，原来125秒，现在45秒！想来，原来1小时现在不就20分钟了。开心，谢谢啊。可否请你给修改 ...

T = T & "+" & Chr(Mid(Tr(j), k, 1) + CC - 1) & RR
改
T = T & "+" & Chr(Mid(Tr(j), k, 1) + CC - 1) & i + 4

准提部林

天地一相 发表于 2023-2-8 21:44
你真厉害！看别人回复说本帖求助太难了，让我去别的板块试一试，我都有点泄气了。你给解决了！谢谢，谢谢 ...

應該是你沒有說清楚吧!!!

EH分兩塊,
學公式的不管需求多複雜, 都只想用公式硬解而拒絕VBA
學VBA的, 又都認為..既然用程序, 何須再用公式!