MS Zooflow DocumentResult

This commit is contained in:
2022-01-20 16:42:43 +01:00
parent 718e373e87
commit dc87328527
5 changed files with 115 additions and 97 deletions

View File

@@ -200,7 +200,8 @@ Public Class DocumentViewer
RichEditControl1.Dock = DockStyle.Fill
Case ".XLSX", ".XLS", ".CSV"
SpreadsheetControl1.LoadDocument(FilePath, GetSpreadsheetFormat(oExtension))
Dim oFormat = GetSpreadsheetFormat(oExtension)
SpreadsheetControl1.LoadDocument(FilePath, oFormat)
Dim oRange = SpreadsheetControl1.ActiveWorksheet.GetUsedRange()
oRange.AutoFitColumns()