anchor.diff:                          (pstring "'")
                           (pstring "'")
                           (Workbook .>>. WorksheetNameUnquoted))
  -                    <!> "ARWQuoted"
       let AddressReferenceWorkbook = getUserState >>=
                                       fun us ->
                                           (pipe2
  
positive.code:     do ExpressionDeclImpl := (attempt UnaryOpExpr) <|> (attempt BinOpExpr) <|> (attempt ExpressionSimple)
  
      // Formulas
      let Formula = BP (pstring "=" .>> spaces >>. ExpressionDecl .>> eof)
negative.code:                             Addr1Abs
                              (fun col row ->
                                  Address.fromA1(row, col, us.WorksheetName, us.WorkbookName, us.Path)))
      let AnyAddr = ((attempt AddrIndirect)
                    <|> (attempt AddrR1C1)
                    <|> AddrA1)
  
      // Ranges
      let MoreAddrR1C1 = pstring ":" >>. AddrR1C1
      let RangeR1C1 = pipe2 AddrR1C1 MoreAddrR1C1 (fun r1 r2 -> Range(r1, r2))
      let MoreAddrA1 = pstring ":" >>. AddrA1
      let RangeA1 = pipe2 AddrA1 MoreAddrA1 (fun r1 r2 -> Range(r1, r2))
      let RangeAny = (attempt RangeR1C1) <|> RangeA1
  
      // Worksheet Names
      let WorksheetNameQuoted =
  