vb
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Intersect(Target, Range("E5")) Is Nothing Then
Range("E5").FormulaHidden = False
Else
Range("E5").FormulaHidden = True
End If
End Sub
顶一下
(0)
0%
踩一下
(0)
0%
- 相关评论
- 我要评论
-
上一篇:返回栏目