Public Enum ExportType     DiffrentData = 0     FirstData = 1     SecondData = 2 End Enum   Public Function BuildSheet(ByRef xlSheet As Excel.Worksheet, ByVal strSQL As String, ByVal oType As ExportTy