请大神帮我写个代码

轻啜香茗

在B4单元格输入数字后，在C4单元格自动累加，请大神帮我写一个，我如果复制这段代码可以实现别的单元格也有这个效果吗？如果没有就是B6,C6和B9,C9

wanao2008

以下代码只能放在你要进行计算的表格模块里，

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     If Target.Column = 2 Then
   
3.         Target.Offset(, 1) = Target.Offset(, 1) + Target
   
4.     End If
   
5. End Sub

复制代码

吴中泉

吴中泉

吴中泉 发表于 2023-7-2 09:02

工作簿1.zip (12.43 KB, 下载次数: 5)

2023-7-2 09:07 上传

点击文件名下载附件

轻啜香茗

吴中泉 发表于 2023-7-2 09:07

谢谢，我试试，太感谢了

轻啜香茗

wanao2008 发表于 2023-7-2 08:51
以下代码只能放在你要进行计算的表格模块里，

谢谢