https://github.com/humhei/excelprocesser
Parse excel file with combinator
https://github.com/humhei/excelprocesser
combinator excel fparsec fsharp
Last synced: 5 months ago
JSON representation
Parse excel file with combinator
- Host: GitHub
- URL: https://github.com/humhei/excelprocesser
- Owner: humhei
- License: mit
- Created: 2017-12-04T05:42:59.000Z (over 8 years ago)
- Default Branch: master
- Last Pushed: 2024-12-29T06:15:24.000Z (over 1 year ago)
- Last Synced: 2025-04-21T16:52:50.672Z (about 1 year ago)
- Topics: combinator, excel, fparsec, fsharp
- Language: F#
- Homepage:
- Size: 9.91 MB
- Stars: 2
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
- License: LICENSE
Awesome Lists containing this project
README
# ExcelProcesser
Parse excel file with combinator
Stable | Prerelease
--- | ---
[](https://www.nuget.org/packages/ExcelProcesser/) | [](https://www.nuget.org/packages/ExcelProcesser/)
MacOS/Linux | Windows
--- | ---
[](https://circleci.com/gh/humhei/ExcelProcesser) | [](https://ci.appveyor.com/project/ts2fable-imports/fpublisher)
[](https://circleci.com/gh/humhei/ExcelProcesser) | [](https://ci.appveyor.com/project/ts2fable-imports/fpublisher)
---
## Usage
* Test file can be found in directory ExcelProcesser.Tests
* Following code can be found in directory ExcelProcesser.Tests too
### Parse Cells With Predicate
match cells beginning with GD
```fsharp
open ExcelProcess
open CellParsers
open System.Drawing
open ArrayParsers
let parser:ArrayParser=
!@pRegex("GD.*")
let workSheet= "test.xlsx"
|>Excel.getWorksheetByIndex 1
let reply=
workSheet
|>ArrayParser.run parser
|>fun c->c.userRange
|>Seq.map(fun c->c.Address)
|>List.ofSeq
match reply with
|["D2";"D4";"D11";"D13"]->pass()
|_->fail()
```
### Parse Cells With (Predicates Linked By AND)
match cells of which text begins with GD,
and of which background color is yellow
```fsharp
let parser:ArrayParser=
!@(pRegex("GD.*") <&> pBkColor Color.Yellow)
```
### Parse Cells In Sequence
match cells of which text begins with GD,
and of which right cell's font color is blue
```fsharp
let parser:ArrayParser=
!@pRegex("GD.*") +>>+ !@(pFontColor Color.Blue)
```
Below operators are similiar
| Exprocessor | FParsec |
| :-------------: | :-------------: |
| +>>+ | .>>. |
| +>> | .>> |
| >>+ | >>. |
### Parse Cells in multi rows
If operator prefix with `^`.
eg. `^+>>+`
This means it is used to parse multiple rows
Sample:
match cells of which text begins with GD,
and to which Second perpendicular of which text begins with GD
```fsharp
let parser:ArrayParser=
!@pRegex("GD.*")
^>>+ yPlaceholder 1
^>>+ !@pRegex("GD.*")
```
### Parse with many operator
Match cells whose left item beigin with STYLE
and whose text begin with number
Then batch the result as ExcelRange eg. "B18:E18"
```fsharp
let parser:ArrayParser=
let sizeParser = !@pFParsec(pint32.>>pchar '#') |> xlMany
!@pRegex("STYLE.*") >>+ sizeParser
let reply=
workSheet
|> ArrayParser.run parser
|>fun c->c.userRange
|>Seq.map(fun c->c.Address)
|>List.ofSeq
match reply with
|["B18:E18"]->pass()
|_->fail()
```
### Parse with xUntil operator
```fsharp
let parser:ArrayParser=
!@ (pText ((=) "Begin")) +>> xUntil (fun _ -> true) !@ (pText ((=) "Until"))
let shift= workSheet
|>runArrayParser parser
|>fun c->c.xShifts
match shift with
|[4] ->pass()
|_->fail()
```
### Parse with yUntil operator
```fsharp
let parser:ArrayParser=
!@ (pText ((=) "Begin")) ^+>> yUntil (fun _ -> true) !@ (pText ((=) "Until"))
let shift= workSheet
|>runArrayParser parser
|>fun c->c.xShifts
match shift with
| [0;0;0;0;0;0;0] ->pass()
|_->fail()
```
## Advanced: Parser with fparsec parsers and with matrix tuple returned
See [Tests.MatrixParsers.fs](https://github.com/humhei/ExcelProcesser/blob/master/ExcelProcesser.Tests/Tests.MatrixParsers.fs) For Details
## Debug Test In VsCode
* open reposity in VsCode
* .paket/paket.exe install
* cd ExcelProcesser.Tests
* dotnet restore
* press F5