EXCEL 高手请进,有问题请教
我在EXCEL里面添加了这段宏命令,PrivateSubWorksheet_Change(ByValTargetAsRange)OnErrorResumeNextWith...
我在EXCEL 里面 添加了这段宏命令,Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
With Target
If .Column = 2 Then '判断被编辑的单元格是不是A列
Cells(.Row, 3).FormulaR1C1 = "=" & CStr(.Value) '是A列时在B列同行的单元格插入公式,公式就是被编辑单元格的内容,不过不支持单元格引用
End If
End With
End Sub
'将这些代码添加到工作表的VBA模块中
用来计算的,然后在第二列只要输入文字,就会出现循环利用,输入数字就OK, 不知道为什么,有没有人能帮我完善这段宏命令啊,谢谢 展开
On Error Resume Next
With Target
If .Column = 2 Then '判断被编辑的单元格是不是A列
Cells(.Row, 3).FormulaR1C1 = "=" & CStr(.Value) '是A列时在B列同行的单元格插入公式,公式就是被编辑单元格的内容,不过不支持单元格引用
End If
End With
End Sub
'将这些代码添加到工作表的VBA模块中
用来计算的,然后在第二列只要输入文字,就会出现循环利用,输入数字就OK, 不知道为什么,有没有人能帮我完善这段宏命令啊,谢谢 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询