可以使用VBA進行操作。
復制如下代碼到所要運行的的sheet代碼中,可適當修改。
Private?Sub?Worksheet_BeforeDoubleClick(ByVal?Target?As?Range,?Cancel?As?Boolean)If?Target.Address?=?"$B$2"?Then
Range("B10")?=?Range("B2")
Range("C10")?=?Range("C2")
Range("B2:C2").ClearContents
End?If
End?Sub