Set xls = xlApp.ActiveSheet,xls是什么数据类型(或变量)?

Question

在VB程序中
Sub ls()
  dim xls as Worksheet
  Set xls = ReturnxlSheet '执行ReturnxlSheet功能模块.
  xls.Cells(1,1) = 11
End Sub
程序通过.
请问各位大侠Set xls = xlApp.ActiveSheet,xls是什么类型数据(或变量)?
Function ReturnxlSheet() As Worksheet 
    Dim xlApp As Object    ' This Line ,Not set Excel , run Excel 
    'Dim xlsheet As Object     
    ' 发生错误时跳到下一个语句继续执行 
    On Error Resume Next 
    ' 连接Excel应用程序 
    Set xlApp = GetObject(, "Excel.Application")     
    If Err.Number <> 0 Then 
        Set xlApp = CreateObject("Excel.Application") 
        xlApp.Visible = True 
        xlApp.Workbooks.Add 
    End If 
    ' 返回当前活动的工作表 
    Set ReturnxlSheet = xlApp.ActiveSheet 
End Function

Answer 1

  dim xls as Worksheet 
  Set xls = ReturnxlSheet '执行ReturnxlSheet功能模块. 
哪么再请问
  xls是object变量,xls能否做为全局变量,Set xls = ReturnxlSheet在程序起动一次后,在任意地方都能用.

Answer 2

可以定义成全局变量
public xls as Worksheet 

Answer 3

可以啊,
public xls as WorkSheet