作业帮 > 综合 > 作业

excel中如何实现点击一个单元格,在另一个单元格中显示某个单元格的计算公式

来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/10 15:13:46
excel中如何实现点击一个单元格,在另一个单元格中显示某个单元格的计算公式
excel中如何实现点击一个单元格,在另一个单元格中显示某个单元格的计算公式
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Rows.Count = 1 And Target.Columns.Count = 1 Then
Range("A2") = Replace(Target.Formula,"=","")
End If
End Sub
在A2显示点击单元格的公式
再问: 能对您写的代码进行简短的解释吗?假如在一个sheet里我有几个单元格都设置了公式,这些单元格位于不同的行但位于相同的列,请问我想在这些单元格分别所处的行中找一个单元格显示公式,需要怎么改写代码呢?
再答: 改为: Private Sub Worksheet_SelectionChange(ByVal Target As Range) '如果选定区域只是一个单元格 If Target.Rows.Count = 1 And Target.Columns.Count = 1 Then '和选定单元格同行的第三列显示选定单元格的公式 'Replace函数把选定单元格的"="替换掉,以便把公式显示出来,不是显示结果 Cells(Target.Row,3) = Replace(Target.Formula, "=", "") End If End Sub