免费视频淫片aa毛片_日韩高清在线亚洲专区vr_日韩大片免费观看视频播放_亚洲欧美国产精品完整版

打開(kāi)APP
userphoto
未登錄

開(kāi)通VIP,暢享免費(fèi)電子書(shū)等14項(xiàng)超值服

開(kāi)通VIP
【Excel·VBA】工作表的添加

當(dāng)你覺(jué)得生活不盡如意,只要問(wèn)自己一個(gè)問(wèn)題,你為自己想要的東西付出過(guò)什么?你想變得更貴,就要付出很多時(shí)間;你要的越多,你付出的代價(jià)越大。只有相信世界是公平的,你的煩惱才能少一點(diǎn)


在工作簿中添加工作表使用Add方法,如下面的代碼所示:

#001  Sub Addsh()

#002      DimSh As Worksheet

#003      With Worksheets

#004          Set Sh =.Add(after:=Worksheets(.Count))

#005          Sh.Name = '數(shù)據(jù)'

#006      EndWith

#007  End Sub


代碼解析:

Addsh過(guò)程使用Add方法在工作簿中新建“數(shù)據(jù)”工作表。

2行代碼聲明變量Sh為工作表對(duì)象。

4行行代碼使用Add方法在工作簿的最后新建“數(shù)據(jù)”工作表。

Add 方法應(yīng)用于SheetsWorksheets對(duì)象時(shí)新建工作表、圖表或宏表,語(yǔ)法如下:

expression.Add(Before,After, Count, Type)

參數(shù)Before是可選的,指定工作表對(duì)象,新建的工作表將置于此工作表之前。

參數(shù)After是可選的,指定工作表對(duì)象,新建的工作表將置于此工作表之后。

如果Before After兩者均省略,則新建的工作表將插入到活動(dòng)工作表之前。

參數(shù)Count可選,要新建的工作表的數(shù)目。默認(rèn)值為 1。

參數(shù)Type可選,指定新建的工作表類(lèi)型。

5行代碼將添加的工作表重命名為“數(shù)據(jù)”


PS:

如果需要添加多個(gè)工作表,外加一個(gè)For。。。Next循環(huán)即可


我是張小懶

一個(gè)愛(ài)偷懶的家伙

一個(gè)要變得越來(lái)越自信的家伙

一個(gè)正在積極努力讓自己變好的家伙


“ 轉(zhuǎn)給那些喜歡的小伙伴吧 ”

大講堂 |讓我們有態(tài)度的學(xué)習(xí)Excel

編輯 |愛(ài)“偷懶”的張小懶

轉(zhuǎn)載請(qǐng)注明出處

本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶(hù)發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊舉報(bào)
打開(kāi)APP,閱讀全文并永久保存 查看更多類(lèi)似文章
猜你喜歡
類(lèi)似文章
Excel自動(dòng)創(chuàng)建財(cái)會(huì)工作表超鏈接目錄
每日Excel分享(VBA)| 數(shù)據(jù)合并?其實(shí)很簡(jiǎn)單(三)
excel vba復(fù)制工作表
Excel批量重命名工作表標(biāo)簽
通過(guò)VBA編程實(shí)現(xiàn)Excel工作簿只顯示指定工作表的方法
跟煙花入門(mén)VBA之43:sheets對(duì)象(二)
更多類(lèi)似文章 >>
生活服務(wù)
分享 收藏 導(dǎo)長(zhǎng)圖 關(guān)注 下載文章
綁定賬號(hào)成功
后續(xù)可登錄賬號(hào)暢享VIP特權(quán)!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服