卖逼视频免费看片|狼人就干网中文字慕|成人av影院导航|人妻少妇精品无码专区二区妖婧|亚洲丝袜视频玖玖|一区二区免费中文|日本高清无码一区|国产91无码小说|国产黄片子视频91sese日韩|免费高清无码成人网站入口

如何在VBA中編寫入庫單計(jì)算代碼

了解VBA入庫單計(jì)算基礎(chǔ)在VBA中,編寫入庫單計(jì)算代碼可以幫助自動(dòng)計(jì)算物料金額,提高工作效率。通過以下實(shí)例,我們將學(xué)習(xí)如何編寫這樣的代碼來簡化入庫單的計(jì)算過程。 進(jìn)入VBA編輯界面首先,在Excel

了解VBA入庫單計(jì)算基礎(chǔ)

在VBA中,編寫入庫單計(jì)算代碼可以幫助自動(dòng)計(jì)算物料金額,提高工作效率。通過以下實(shí)例,我們將學(xué)習(xí)如何編寫這樣的代碼來簡化入庫單的計(jì)算過程。

進(jìn)入VBA編輯界面

首先,在Excel工作表中,點(diǎn)擊菜單欄中的“開發(fā)工具”,在其工具欄內(nèi)找到并點(diǎn)擊“Visual Basic”選項(xiàng),即可進(jìn)入VBA編輯界面。接著點(diǎn)擊菜單欄中的“插入”,選擇“模塊”,會(huì)彈出一個(gè)模塊編輯窗口,我們將在其中輸入下方提供的計(jì)算代碼。

編寫計(jì)算代碼

在模塊編輯窗口中輸入以下代碼:

```vba

Sub 計(jì)算()

Dim edc As Range

Set edc Range("D:D").Find("*", , xlValues, False, xlByColumns, xlPrevious, False, False, False)

For Each Rng In Range([D5], edc)

(, 2) (, 1) * Rng

Next

End Sub

```

關(guān)聯(lián)計(jì)算代碼與表單

返回Excel工作表界面,在“開發(fā)工具”菜單下點(diǎn)擊“插入”按鈕,添加一個(gè)表單,并將其與剛才編寫的計(jì)算代碼相關(guān)聯(lián)。命名該表單為“計(jì)算”。

計(jì)算入庫單物料金額

點(diǎn)擊“計(jì)算”按鈕,即可快速計(jì)算出入庫單中各種物料的金額。這樣的自動(dòng)計(jì)算方式不僅減少了手動(dòng)計(jì)算的時(shí)間,也提高了準(zhǔn)確性和工作效率。

通過以上步驟,你可以輕松地在VBA中編寫入庫單計(jì)算代碼,實(shí)現(xiàn)物料金額的自動(dòng)計(jì)算,讓工作更加高效便捷。愿本篇經(jīng)驗(yàn)對你有所幫助!

標(biāo)簽: