- 帖子
- 396
- 主題
- 12
- 精華
- 0
- 積分
- 425
- 點名
- 0
- 作業系統
- Win10
- 軟體版本
- Office 2016
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 台中
- 註冊時間
- 2013-7-2
- 最後登錄
- 2024-8-23
  
|
[發問] A1的值若為"B"，B1輸入數字後的值固定為負數
請教各位高手，我想要讓A1輸入"B"之後，則B1不論輸入任何數字，皆會變為負數
我用下列公式去試
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
For Each BS In [a1:a10]
If BS.Value = "B" Then
BS.Offset(0, 1) = BS.Offset(0, 1) * -1
End If
Next
Application.EnableEvents = True
End Sub
可是這樣的話，只要其他地方有更動，
原本是負數的值，就會因為*-1，又變成正數了。
因此想請問該怎麼修改，才能讓他一直保持為負數，謝謝~~~ |
|
發表於 2013-9-10 12:48
| 
