VBA 单元格变量相减如何显示

Fleur

求大神指导下，下面代码中如何修改可以让Q16 单元格显示等于公式=U25-V25,   试了很多方法都只显示计算值，我需要显示公式。m 是变量，假设m 是25行.  感谢！

Sub Macro1()

Dim m As Byte

   m = Range("T1").CurrentRegion.Rows.Count

   Range("Q16").Formula = "=U(m)-V(m)"

End Sub

风林火山

把Formula 去掉试试

砂海

Range("Q16").Formula = "=U" & m & "-V" & m

金樽空对月

1. Sub Macro1()
   
2. Dim m As Byte
   
3.    m = Range("T1").CurrentRegion.Rows.Count
   
4.    Range("q16").NumberFormatLocal = "@"   '先把单元格设置成文本格式
   
5.    Range("Q16").Formula = "=U" & m & "-V" & m
   
6. End Sub

复制代码

changking123

其实最好的办法是在引号中的“=”号前加个空格，有需要的时候再去处理空格就可以了
Range("Q16").Formula = " =U(m)-V(m)"

fjmxwrs

changking123 发表于 2022-10-19 21:29
其实最好的办法是在引号中的“=”号前加个空格，有需要的时候再去处理空格就可以了
Range("Q16").Formula ...

请注意m要是变量

fjmxwrs

砂海 发表于 2022-9-30 11:59
Range("Q16").Formula = "=U" & m & "-V" & m

正确