利用VBA創建新的工作簿

      網友投稿 1145 2025-03-31

      利用VBA創建新的工作簿


      如果要用VBA創建新的工作簿,可以使用Add方法,如下面的代碼。Excel自動將該工作簿命名為“BookN”,其中“N”是下一個可用的數字,同時新工作簿將成為活動工作簿。

      利用VBA創建新的工作簿

      Sub AddOne()Workbooks.AddEnd Sub

      另外,創建新工作簿更好的方法是將其分配給一個對象變量。例如下例中,由Add方法返回的Workbook對象分配給了對象變量“NewBook”。然后,又設置了“NewBook ”的若干屬性。

      Sub AddNew()Set NewBook = Workbooks.AddWith NewBook.Title = "圖書銷售目錄一覽表".Subject = "圖書銷售"End WithEnd Sub

      “Title”和“Subject”分別為工作簿的“標題”和“主題”屬性,可以在工作簿屬性的“摘要”選項卡中查看。

      下面的代碼不僅創建了一個新工作簿的同時,還在工作簿中的第一個工作表前插入了一個名為“計算機類”的工作表,并將該工作表中的B2單元格賦值為“銷售數量”。

      Sub CreateNewWorkBook()Dim WBook As Workbook, WSheet As WorksheetSet WBook = Workbooks.AddSet WSheet = WBook.Worksheets.AddWSheet.Name = "計算機類"WSheet.Range("B2").Value = "銷售數量"End Sub

      版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。

      版權聲明:本文內容由網絡用戶投稿,版權歸原作者所有,本站不擁有其著作權,亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容,請聯系我們jiasou666@gmail.com 處理,核實后本網站將在24小時內刪除侵權內容。

      上一篇:如何在Excel自動將小數點插入數字?
      下一篇:Word2019圖形設置形狀樣式的方法(word設置圖案樣式)
      相關文章
      久久久久亚洲精品影视| 亚洲永久精品ww47| 亚洲免费在线视频| 亚洲国产精品无码专区影院| 亚洲伊人久久大香线蕉综合图片| 亚洲精品天堂成人片?V在线播放| 国产亚洲漂亮白嫩美女在线| 在线观看亚洲网站| 亚洲av无码乱码在线观看野外| 久久精品国产亚洲av瑜伽| 日韩国产欧美亚洲v片| 亚洲日产乱码一二三区别| 亚洲色精品VR一区区三区| 亚洲午夜福利在线视频| 亚洲午夜福利在线视频| 亚洲AV女人18毛片水真多| 无码天堂亚洲国产AV| 亚洲А∨精品天堂在线| 亚洲一级Av无码毛片久久精品| 亚洲综合激情另类专区| 亚洲人成网77777亚洲色| 亚洲av成人无码久久精品 | 亚洲精品蜜桃久久久久久| 国产亚洲真人做受在线观看| 亚洲国产另类久久久精品黑人| 久久亚洲国产精品| 亚洲国产成AV人天堂无码| 亚洲一本到无码av中文字幕| 亚洲欧美成aⅴ人在线观看| 日日摸日日碰夜夜爽亚洲| 久久亚洲国产成人影院网站| 国产亚洲3p无码一区二区| 亚洲综合视频在线| 亚洲娇小性xxxx色| 精品国产亚洲一区二区三区在线观看 | 亚洲中文字幕无码久久2020| 久久久久久亚洲精品无码| 久久亚洲中文字幕精品一区| 久久精品国产精品亚洲艾 | 亚洲精品国产免费| 亚洲日韩看片无码电影|