2010-10-31 80 views

回答

1

嘗試VBA。

示例代碼

Private Sub Worksheet_Change(ByVal Target As Excel.Range) 
Select Case Target.Address() 
Case "$A$1" 
    Range("$C$15").Select 
Case "$C$15" 
    Range("$F$9").Select 
Case "$F$9" 
    Range("$A$1").Select 
End Select 
End Sub