- 帖子
- 396
- 主題
- 12
- 精華
- 0
- 積分
- 425
- 點名
- 1
- 作業系統
- Win10
- 軟體版本
- Office 2016
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 台中
- 註冊時間
- 2013-7-2
- 最後登錄
- 2026-8-12
  
|
回復 7# 自我感覺良好
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Intersect([A:A], Target.EntireRow).Select
Range("A1").Select
activecell.value="abcdeff1234"
End Sub
你如果能明確一點的說出你的想法及做法，大家比較能夠確實的幫助到你，
還有為什麼在執行完了第一行『不管點到哪一格，都會跳到該列的第一格』的指令之後，
你還要再下一個Range("A1").Select的指令？
這樣一來當然就不管你做什麼，都是跳回去A1啦@@，這樣第一個指令根本就是多餘的了。
你如果是單純想讓A1能顯示出你要的內容，你就捨棄[A1].SELECT
直接下[A1]="OOXX" 就好了。 |
|
發表於 2013-8-16 08:32
| 