Skip to content

Commit

Permalink
Play around in playground
Browse files Browse the repository at this point in the history
  • Loading branch information
omaus committed Mar 14, 2023
1 parent 05437d7 commit 68f79c5
Showing 1 changed file with 18 additions and 0 deletions.
18 changes: 18 additions & 0 deletions playground.fsx
Original file line number Diff line number Diff line change
Expand Up @@ -27,6 +27,24 @@ let excelFilePath = @"C:\Users\olive\OneDrive\CSB-Stuff\testFiles\testExcel6.xls
//let excelFilePath = @"C:\Users\revil\OneDrive\CSB-Stuff\testFiles\testExcel6_rewritten.xlsx"
//let excelFilePath = @"C:\Users\olive\OneDrive\CSB-Stuff\testFiles\testExcel6_rewritten.xlsx"


// inb4 unit tests

let unitTestFilePath = @"C:\Repos\CSBiology\FsSpreadsheet\tests\FsSpreadsheet.ExcelIO.Tests\data\testUnit.xlsx"
let sr = new StreamReader(unitTestFilePath)
let fsWorkbookFromStream = FsWorkbook.fromXlsxStream sr.BaseStream
sr.Close()
let fsWorksheet1FromStream = fsWorkbookFromStream.GetWorksheetByName "StringSheet"
let fsWorksheet2FromStream = fsWorkbookFromStream.GetWorksheetByName "NumericSheet"
let fsWorksheet3FromStream = fsWorkbookFromStream.GetWorksheetByName "TableSheet"
let fsWorksheet4FromStream = fsWorkbookFromStream.GetWorksheetByName "DataTypeSheet"
//let v = (FsWorksheet.getCellAt 1 1 fsWorksheet1FromStream).Value
//let a = (FsWorksheet.getCellAt 1 1 fsWorksheet1FromStream).Address.Address
//let d = (FsWorksheet.getCellAt 1 1 fsWorksheet1FromStream).DataType
let v = (FsWorksheet.getCellAt 7 3 fsWorksheet2FromStream).Value
fsWorksheet2FromStream.CellCollection.GetCells() |> Array.ofSeq


// fix some bugs

let sdoc = Spreadsheet.fromFile excelFilePath false
Expand Down

0 comments on commit 68f79c5

Please sign in to comment.