iT邦幫忙

1

EXCEL 2003

  • 分享至 

  • xImage

請問高手,謝謝
使用EXCEL 2003
欄位 A1,B1,C1,D1,E1,F1,G1
若A1值改變,自動判斷給 F1,G1值
若 B1欄位的值=C1欄位的值 則
C1欄位的值 <乘以> E1欄位的值 存 F1 欄位
若 B1欄位的值 =D1欄位的值 則
D1欄位的值 <乘以> E1欄位的值 存 G1 欄位

公式 設定 ?

「C1欄位的值E1欄位的值 存 F1 欄位」
說真的,這我完全不會。我不知道要如何將兩個欄位的值同時存在一個欄位上。
ccutmis iT邦高手 2 級 ‧ 2020-04-07 17:46:57 檢舉
http://mis.ndhu.edu.tw/docu/question.htm
Franky Chen iT邦研究生 3 級 ‧ 2020-04-07 17:54:11 檢舉
Excel 2003可以升級了啦
圖片
  直播研討會
圖片
{{ item.channelVendor }} {{ item.webinarstarted }} |
{{ formatDate(item.duration) }}
直播中

1 個回答

2
海綿寶寶
iT邦大神 1 級 ‧ 2020-04-07 21:20:18
最佳解答

用公式我不會
我只會用 VBA

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then             '若A1值改變
        If Range("$B$1") = Range("$C$1") Then   '若 B1欄位的值=C1欄位的值
            Range("$F$1").Formula = "=C1*E1"    'C1欄位的值 <乘以> E1欄位的值 存 F1 欄位
        End If
        If Range("$B$1") = Range("$D$1") Then   '若 B1欄位的值 =D1欄位的值
            Range("$G$1").Formula = "=D1*E1"    'D1欄位的值 <乘以> E1欄位的值 存 G1 欄位
        End If
    End If
End Sub

程式放在下圖的位置
那一張工作表要用
就放在那一份工作表的 Worksheet Change 裡
https://ithelp.ithome.com.tw/upload/images/20200407/20001787wN20fKCZRl.png

題外話
問 Excel 2003 的問題
會回答的人不是高手
應該是
/images/emoticon/emoticon37.gif

我要發表回答

立即登入回答