Extension ExportToExcelGembox: No intentar generar excel si no hay datos

Evita generar una página de error innecesaria al usuario si accidentalmente genera el excel sin hacer antes consulta

App_Code/modExtensiones.vb

@@ -2155,6 +2155,7 @@ Namespace Extensiones
                 Dim worksheet = excel.Worksheets(0)
                 worksheet.Rows.InsertEmpty(0, TotalRowHeader)
                 Dim celdasConTexto = worksheet.GetUsedCellRange(True)
+                If celdasConTexto Is Nothing Then Exit Sub 'No se recuperaron datos, salir de sin guardar porque soltará error
                 celdasConTexto.Style.Font.Name = "Calibri Light"
 
                 Dim RangoNombreEmpresa = worksheet.Cells.GetSubrangeAbsolute(1, celdasConTexto.FirstColumnIndex, 1, celdasConTexto.LastColumnIndex)