Private Sub Worksheet_Change(ByVal Target As Range)怎麼用??
- 帖子
- 117
- 主題
- 34
- 精華
- 0
- 積分
- 155
- 點名
- 0
- 作業系統
- windows XP
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-19
- 最後登錄
- 2024-8-29
|
Private Sub Worksheet_Change(ByVal Target As Range)怎麼用??
剛在網路上有發現oobird版主這個好用程式, 但怎麼用了沒有反應, 有人可以幫忙看一下嗎? 感恩~~~
Private Sub Worksheet_Change(ByVal Target As Range)
x = "J11,K11,L11,M11"
If InStr(x, Target.Address(0, 0)) > 0 Then [D4] = ActiveCell.Value
End Sub |
|
|
初學者color
|
|
|
|
|
- 帖子
- 967
- 主題
- 0
- 精華
- 0
- 積分
- 1001
- 點名
- 0
- 作業系統
- WIN XP
- 軟體版本
- OFFICE 2003
- 閱讀權限
- 50
- 性別
- 男
- 來自
- 台北
- 註冊時間
- 2010-11-29
- 最後登錄
- 2022-5-17
 
|
2#
發表於 2012-1-19 00:36
| 只看該作者
回復 1# color790
程式碼沒有問題
先了解該程式之功能 再操作檔案
 Book2.rar (5.63 KB)
|
|
|
|
|
|
|
|
- 帖子
- 117
- 主題
- 34
- 精華
- 0
- 積分
- 155
- 點名
- 0
- 作業系統
- windows XP
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-19
- 最後登錄
- 2024-8-29
|
4#
發表於 2012-1-19 09:53
| 只看該作者
本帖最後由 color790 於 2012-1-19 09:59 編輯
謝謝大家回答, 但....主要是為了方便, 所以這幾個儲存格都已事先寫好數字或文字, [D4]後面再做變化
比如[d4],[d5].... [f4][f5].......
還是說有....."在編輯列 輸入後 勾選" 的巨集, 用錄的好像都看不出來
還是直接做button..... |
|
|
初學者color
|
|
|
|
|
- 帖子
- 117
- 主題
- 34
- 精華
- 0
- 積分
- 155
- 點名
- 0
- 作業系統
- windows XP
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-19
- 最後登錄
- 2024-8-29
|
5#
發表於 2012-1-19 16:53
| 只看該作者
原來我需要的是
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
sorry, 謝謝大家的回答 |
|
|
初學者color
|
|
|
|
|
發表於 2012-1-19 08:17
| 
