国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

打開APP
userphoto
未登錄

開通VIP,暢享免費電子書等14項超值服

開通VIP
vb.net 中使用excel函數(shù)
(2017-10-18 22:57:52)
分類: 辦公
做個簡單示例,在程序的同一目錄下做個 Book1.xls 并放些數(shù)據(jù) ,示例的功能是 把A,B,D列的第1行到100行的數(shù)據(jù)匯總在 第101行  ,你測試一下。
Private Sub Command1_Click()
Set oExcel = CreateObject("Excel.Application")             'excel對象
Set oFun = oExcel.WorksheetFunction                        'excel宏函數(shù) 對象
Set oWk = oExcel.Workbooks.Open(App.Path & "\Book1.xls")   '工作簿 對象,完整路徑
With oWk.Sheets("Sheet1")
.Range("a101") = oFun.Sum(.Range("a1:a100"))
.Range("b101") = oFun.Sum(.Range("b1:b100"))
.Range("d101") = oFun.Sum(.Range("d1:d100"))
End With
oWk.Close True
Set oWk = Nothing
Set oFun = Nothing
Set oExcel = Nothing
End Sub
本站僅提供存儲服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請點擊舉報
打開APP,閱讀全文并永久保存 查看更多類似文章
猜你喜歡
類似文章
很重要的EXCEL使用技巧
VB.net里為何不能使用Left()函數(shù)
Excel視頻SUM函數(shù)
Excel函數(shù)Sum累計求和公式
excel中這個簡單的SUM函數(shù)也能實現(xiàn)多表格匯總
excel用sum函數(shù)如何累計求和
更多類似文章 >>
生活服務(wù)
分享 收藏 導(dǎo)長圖 關(guān)注 下載文章
綁定賬號成功
后續(xù)可登錄賬號暢享VIP特權(quán)!
如果VIP功能使用有故障,
可點擊這里聯(lián)系客服!

聯(lián)系客服