返回列表 上一主題 發帖

儲存格裡的函數公式可否用巨集按鈕來執行

emma

帖子
110 
主題
14 
精華
0 
積分
239 
點名
0  
作業系統
win xp 
軟體版本
office 2003 
閱讀權限
20 
性別
女 
註冊時間
2010-8-2 
最後登錄
2017-5-10 

有您真好勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-1-13 19:36 | 只看該作者

儲存格裡的函數公式可否用巨集按鈕來執行

Dear 各位高手大大們好

想請問一下是否可讓附件檔案中的A欄「公司名稱」及B欄「訂貨商品」在不為空的狀態下，
按下更新報價的按鈕後才顯示執行以下這幾欄的公式?
上月時價(公式為=VLOOKUP(B5,商品資訊!A:C,2,0))
最新時價(公式為=VLOOKUP(B5,商品資訊!A:C,3,0))
訂購金額(公式為D5*E5)

謝謝^^

更新報價.rar (6.32 KB)

收藏 分享

准提部林

帖子
2848 
主題
10 
精華
0 
積分
2903 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2026-7-25 
2#
發表於 2016-1-13 21:11 | 只看該作者
Sub 更新報價()
Dim R&
R = [B65536].End(xlUp).Row
If R < 5 Then Exit Sub
Range("C5:D" & R) = "=VLOOKUP($B5,商品資訊!$A:$C,COLUMN(B$1),0)"
Range("F5:F" & R) = "=D5*E5"
End Sub

TOP

        靜思自在 : 君子立恆志，小人恆立志。
返回列表 上一主題