求助VBA中公式修改

王跃峰 · 发表于 2023-1-11 16:30

ykcbf1100 发表于 2023-1-11 16:23
那用4楼的代码就可以了。

一下帮了我大忙了，我还考虑从.FormulaR1C1 = _
"=MID(CELL(""filename"",RC[-3]),FIND(""]"",CELL(""filename"",RC[-3]))+1,LEN(CELL(""filename"",RC[-3]))-FIND(""]"",CELL(""filename"",RC[-3])))"怎么入手呢

ykcbf1100 · 发表于 2023-1-11 16:41

王跃峰发表于 2023-1-11 16:30
一下帮了我大忙了，我还考虑从.FormulaR1C1 = _
"=MID(CELL(""filename"",RC[-3]),FIND(""]"",C ...

你试试这个
.[e8] = "=MID(@CELL(""filename"",B8),FIND(""]"",@CELL(""filename"",B8))+1,LEN(@CELL(""filename"",B8))-FIND(""]"",@CELL(""filename"",B8)))"

王跃峰 · 发表于 2023-1-11 17:25

ykcbf1100 发表于 2023-1-11 16:41
你试试这个
.[e8] = "=MID(@CELL(""filename"",B8),FIND(""]"",@CELL(""filename"",B8))+1,LEN(@CELL("" ...

这是获取工作表名称！

王跃峰 · 发表于 2023-1-13 09:13

tanglf188 发表于 2023-1-11 16:09

感谢帮助，但我主要是想保留公式

tanglf188 · 发表于 2023-1-13 09:18

ykcbf1100 发表于 2023-1-11 16:23
那用4楼的代码就可以了。

我们两是一个道理，楼主要公式

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

[求助] 求助VBA中公式修改