码迷,mamicode.com
首页 > 编程语言 > 详细

VBA 工作簿一些用法

时间:2019-01-13 16:12:54      阅读:198      评论:0      收藏:0      [点我收藏+]

标签:新建   vba   net   cti   saveas   box   this   xlsx   highlight   

Sub gongzuobu()
Dim my_path As String
Dim wb As Workbook
Dim num As Integer
Set wb = Workbooks("工作簿1.xltm") ‘建立工作簿对象

Set wb = Workbooks(1)
Set wb = ActiveWorkbook
Set wb = ThisWorkbook
‘MsgBox wb.Name

‘Workbooks.Add  ‘新建工作簿
‘
‘ActiveWorkbook.SaveAs "C:\Users\queqiaoshui\Desktop\haha.xlsx"  ‘保存工作簿
‘my_path = wb.Path  ‘获取当前工作簿文件目录
‘MsgBox my_path
num = Application.WorksheetFunction(2, 9) ‘利用工作表函数取随机数

MsgBox num
End Sub

  

VBA 工作簿一些用法

标签:新建   vba   net   cti   saveas   box   this   xlsx   highlight   

原文地址:https://www.cnblogs.com/queqiaoshui/p/10262628.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!