- 帖子
- 10
- 主題
- 3
- 精華
- 0
- 積分
- 18
- 點名
- 0
- 作業系統
- WINDOWS XP
- 軟體版本
- SERVICE PACK 1
- 閱讀權限
- 10
- 性別
- 男
- 來自
- HK
- 註冊時間
- 2011-4-22
- 最後登錄
- 2011-5-15
|
[發問] 請問如何判斷COLUMN A 是否空白, 之後自動將COLUMN B 及COLUMN C 乘在一起?
本帖最後由 cdcc 於 2011-4-22 23:25 編輯
USD 20 1 =+B3*C3
HKD 60 7.8
USD 2 1
USD 1 1
HKD 99 7.8
只能利用Application.Sum 語法, 將column b & column c 加在一起. 但不知如何修改才能達到乘在一起?
謝謝幫忙
Sub a()
Dim ae As Integer, ce As String, cf As String, he As Variant
For ae = 2 To [A999].End(xlUp).Row
ce = Sheets("sheet1").Cells(ae, 2)
cf = Sheets("sheet1").Cells(ae, 3)
he = Application.Sum(ce, cf)
Cells(ae, 4) = he
Next ae
End Sub |
|