xxyyzzxyz627 發表於 16-6-28 16:58

變數加總



不好意思了各位大大 因為是EXCEL新手所以這邊不太會

AB2的成交量是用外部資料會跳動的請問我如何可以在AB2成交量跳動的時候用AJ2去加AB2
多謝各為大大忙幫!!!

t8899 發表於 16-6-28 19:18

sumif
SUMPRODUCT這較強可以多條件

xxyyzzxyz627 發表於 16-6-28 20:56

t8899 發表於 16-6-28 19:18
sumif
SUMPRODUCT這較強可以多條件

多謝大大 但我剛測試了他不是我要的謝謝你!!

Seer_et 發表於 16-6-29 09:35

既然是跳動的資料，意味是即時的數據
那就用VBA的Worksheet_Calculate來做更新

t8899 發表於 16-6-29 12:45

Seer_et 發表於 16-6-29 09:35
既然是跳動的資料，意味是即時的數據
那就用VBA的Worksheet_Calculate來做更新
...

用Worksheet_Change 較簡單
假如 的值 改變 則   If Target.Address = Range("a2").Address Then.........

xxyyzzxyz627 發表於 16-6-29 14:41

t8899 發表於 16-6-29 12:45
用Worksheet_Change 較簡單
假如 的值 改變 則   If Target.Address = Range("a2").Address Then. ...

可以請問大大全部的寫法嗎因為我只會用錄製巨集程式新手所以指令很多不懂謝謝你了!!

t8899 發表於 16-6-29 14:56

本帖最後由 t8899 於 16-6-29 15:10 編輯

xxyyzzxyz627 發表於 16-6-29 14:41
可以請問大大全部的寫法嗎因為我只會用錄製巨集程式新手所以指令很多不懂謝謝你了!!
...
答案在ak2
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("ab2").Address Then
= +
End If
End Sub'---------------------------------

整欄計算
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 28 Then 'ab2
Target.Offset(0, 9) = Target + Target.Offset(0, 8)
End If
End Sub
上面不行就用 Worksheet_Calculate   一定可以 , 不過寫法不一樣


xxyyzzxyz627 發表於 16-6-29 18:16

本帖最後由 xxyyzzxyz627 於 16-6-29 18:25 編輯

t8899 發表於 16-6-29 14:56
答案在ak2
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("ab2").Addr ...
大大你好我有疑問
答案在ak2
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("ab2").Address Then
= +
End If
End Sub'--


因為本來需要的是用 AJ2+AB2 但現在變成答案在AK2 但是AJ2卻沒加總 那下次AB2數值變動的時候 我一樣是用 AJ2去加AB2
感覺好像怪怪的@@


多謝大大我後來改成 = + 可以用多謝大大!!!

t8899 發表於 16-6-29 18:41

xxyyzzxyz627 發表於 16-6-29 18:16
大大你好我有疑問
答案在ak2
Private Sub Worksheet_Change(ByVal Target As Range)


因為我不知道你要的答案要放那裡啊??
可以用就好，祝財運亨通

xxyyzzxyz627 發表於 16-6-29 18:47

t8899 發表於 16-6-29 14:56
答案在ak2
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("ab2").Addr ...

請問大大 Worksheet_Calculate怎麼寫 我剛自己輸入數字會跳動 但是用外部資料他就不會動了.........

xxyyzzxyz627 發表於 16-6-29 19:19

Seer_et 發表於 16-6-29 09:35
既然是跳動的資料，意味是即時的數據
那就用VBA的Worksheet_Calculate來做更新
...

可以請問大大應該麼寫嗎程式新手!!

t8899 發表於 16-6-30 09:54

xxyyzzxyz627 發表於 16-6-29 19:19
可以請問大大應該麼寫嗎程式新手!!

語法類似下面，自已動動腦
Private Sub Worksheet_Calculate()
If <> Then
.....
....
end if
End Sub

Seer_et 發表於 16-6-30 10:03

xxyyzzxyz627 發表於 16-6-29 19:19
可以請問大大應該麼寫嗎程式新手!!

這就可以:


Private Sub Worksheet_Calculate()
range("AJ2")=range("AB2")+range("AJ2")

End Sub



頁: [1]
查看完整版本: 變數加總