1、工作簿Workbook表达

大六九

VBA中，经常要在不同工作簿之间转换，工作簿的表示方法很重要，我们来看看，工作簿有几种表示方法

1、Workbooks("工作簿名称")  
Sub 工作簿名称表示法()
MsgBox Workbooks("123").Parent  
'返回工作簿对象的父对象。这个返回是 Microsoft ExcelMsgBox Workbooks("123").Name   
'返回工作簿的名称
End Sub

2、Workbooks(数字)
Sub 工作簿引索号表示法()
MsgBox Workbooks(2).Name
'返回第2打开工作簿的名称
MsgBox ThisWorkbook.Name
'返回第代码工作簿的名称
End Sub

3、Windows("工作簿名称")
Sub 窗口表示法()
MsgBox Windows.Count
'返回当前excel工作簿打开的个数
MsgBox Windows(1).Parent.Name
'返回第几个工作簿的名称
MsgBox Windows("123").Parent.Name
'返回工作簿123的名称
MsgBox Windows(ThisWorkbook.Name).Parent.Name
'返回代码工作簿的名称
End Sub

4、例：在单元格A列写下，每个打开的workbook的名字，
Sub 工作簿实例windows方法()
For i = 1 To Windows.Count
    Cells(i, 2) = Windows(i).Parent.Name
Next
End Sub

MatthewLee

小白来学习