{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings #-}
module Main where
import Control.Lens
import Codec.Xlsx
import qualified Data.ByteString.Lazy as L
main :: IO ()
main = do
bs <- L.readFile "tblMaterials_2015.xls"
let value = toXlsx bs ^? ixSheet "List1" .
ixCell (3,2) . cellValue . _Just
putStrLn $ "Cell B3 contains " ++ show value
Error
Link to file http://fsaeonline.com/content/tblMaterials_2015.xls
Code