黄色区域按什么条件选取?比如说,你指定一个固定范围:B3:D31?
Private Sub Worksheet_SelectionChange(ByVal Target As Range)On Error Resume NextIf Target.Address = "$A$2" Then Range("B3:D30").SelectEnd IfEnd Sub