# -*- coding: utf-8 -*-
require 'write_xlsx/package/xml_writer_simple'
require 'write_xlsx/colors'
require 'write_xlsx/format'
require 'write_xlsx/drawing'
require 'write_xlsx/compatibility'
require 'write_xlsx/utility'
require 'tempfile'

module Writexlsx
  #
  # A new worksheet is created by calling the add_worksheet() method from a workbook object:
  #
  #     worksheet1 = workbook.add_worksheet
  #     worksheet2 = workbook.add_worksheet
  #
  # The following methods are available through a new worksheet:
  #
  #     write
  #     write_number
  #     write_string
  #     write_rich_string
  #     write_blank
  #     write_row
  #     write_col
  #     write_date_time
  #     write_url
  #     write_url_range
  #     write_formula
  #     write_comment
  #     show_comments
  #     set_comments_author
  #     insert_image
  #     insert_chart
  #     insert_shape
  #     data_validation
  #     conditional_formatting
  #     add_sparkline
  #     add_table
  #     name
  #     activate
  #     select
  #     hide
  #     set_first_sheet
  #     protect
  #     set_selection
  #     set_row
  #     set_column
  #     outline_settings
  #     freeze_panes
  #     split_panes
  #     merge_range
  #     merge_range_type
  #     set_zoom
  #     right_to_left
  #     hide_zero
  #     set_tab_color
  #     autofilter
  #     filter_column
  #     filter_column_list
  #
  # ==Cell notation
  #
  # WriteXLSX supports two forms of notation to designate the position of cells:
  # Row-column notation and A1 notation.
  #
  # Row-column notation uses a zero based index for both row and column
  # while A1 notation uses the standard Excel alphanumeric sequence of column
  # letter and 1-based row. For example:
  #
  #     (0, 0)      # The top left cell in row-column notation.
  #     ('A1')      # The top left cell in A1 notation.
  #
  #     (1999, 29)  # Row-column notation.
  #     ('AD2000')  # The same cell in A1 notation.
  #
  # Row-column notation is useful if you are referring to cells
  # programmatically:
  #
  #     (0..9).each do |i|
  #       worksheet.write(i, 0, 'Hello')    # Cells A1 to A10
  #     end
  #
  # A1 notation is useful for setting up a worksheet manually and
  # for working with formulas:
  #
  #     worksheet.write('H1', 200)
  #     worksheet.write('H2', '=H1+1')
  #
  # In formulas and applicable methods you can also use the A:A column notation:
  #
  #     worksheet.write('A1', '=SUM(B:B)')
  #
  # The Writexlsx::Utility module that is included in the distro contains
  # helper functions for dealing with A1 notation, for example:
  #
  #     include Writexlsx::Utility
  #
  #     row, col = xl_cell_to_rowcol('C2')    # (1, 2)
  #     str      = xl_rowcol_to_cell(1, 2)    # C2
  #
  # For simplicity, the parameter lists for the worksheet method calls in the
  # following sections are given in terms of row-column notation. In all cases
  # it is also possible to use A1 notation.
  #
  # == PAGE SET-UP METHODS
  #
  # Page set-up methods affect the way that a worksheet looks
  # when it is printed. They control features such as page headers and footers
  # and margins. These methods are really just standard worksheet methods.
  # They are documented here in a separate section for the sake of clarity.
  #
  # The following methods are available for page set-up:
  #
  #   set_landscape()
  #   set_portrait()
  #   set_page_view()
  #   set_paper()
  #   center_horizontally()
  #   center_vertically()
  #   set_margins()
  #   set_header()
  #   set_footer()
  #   repeat_rows()
  #   repeat_columns()
  #   hide_gridlines()
  #   print_row_col_headers()
  #   print_area()
  #   print_across()
  #   fit_to_pages()
  #   set_start_page()
  #   set_print_scale()
  #   set_h_pagebreaks()
  #   set_v_pagebreaks()
  # A common requirement when working with WriteXLSX is to apply the same
  # page set-up features to all of the worksheets in a workbook. To do this
  # you can use the sheets() method of the workbook class to access the array
  # of worksheets in a workbook:
  #
  #   workbook.sheets.each do |worksheet|
  #     worksheet.set_landscape
  #   end
  #
  class Worksheet
    include Writexlsx::Utility

    class CellData   # :nodoc:
      include Writexlsx::Utility

      attr_reader :row, :col, :token, :xf
      attr_reader :result, :range, :link_type, :url, :tip

      #
      # attributes for the <cell> element. This is the innermost loop so efficiency is
      # important where possible.
      #
      def cell_attributes #:nodoc:
        xf_index = xf ? xf.get_xf_index : 0
        attributes = ['r', xl_rowcol_to_cell(row, col)]

        # Add the cell format index.
        if xf_index != 0
          attributes << 's' << xf_index
        elsif @worksheet.set_rows[row] && @worksheet.set_rows[row][1]
          row_xf = @worksheet.set_rows[row][1]
          attributes << 's' << row_xf.get_xf_index
        elsif @worksheet.col_formats[col]
          col_xf = @worksheet.col_formats[col]
          attributes << 's' << col_xf.get_xf_index
        end
        attributes
      end
    end

    class NumberCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, num, xf)
        @worksheet = worksheet
        @row, @col, @token, @xf = row, col, num, xf
      end

      def data
        @token
      end

      def write_cell
        @worksheet.writer.tag_elements('c', cell_attributes) do
          @worksheet.write_cell_value(token)
        end
      end
    end

    class StringCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, index, xf)
        @worksheet = worksheet
        @row, @col, @token, @xf = row, col, index, xf
      end

      def data
        { :sst_id => token }
      end

      def write_cell
        attributes = cell_attributes
        attributes << 't' << 's'
        @worksheet.writer.tag_elements('c', attributes) do
          @worksheet.write_cell_value(token)
        end
      end
    end

    class FormulaCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, formula, xf, result)
        @worksheet = worksheet
        @row, @col, @token, @xf, @result = row, col, formula, xf, result
      end

      def data
        @result || 0
      end

      def write_cell
        attributes = cell_attributes
        if @result &&  !(@result.to_s =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/)
          attributes << 't' << 'str'
        end
        @worksheet.writer.tag_elements('c', attributes) do
          @worksheet.write_cell_formula(token)
          @worksheet.write_cell_value(result || 0)
        end
      end
    end

    class FormulaArrayCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, formula, xf, range, result)
        @worksheet = worksheet
        @row, @col, @token, @xf, @range, @result = row, col, formula, xf, range, result
      end

      def data
        @result || 0
      end

      def write_cell
        @worksheet.writer.tag_elements('c', cell_attributes) do
          @worksheet.write_cell_array_formula(token, range)
          @worksheet.write_cell_value(result)
        end
      end
    end

    class HyperlinkCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, index, xf, link_type, url, str, tip)
        @worksheet = worksheet
        @row, @col, @token, @xf, @link_type, @url, @str, @tip =
          row, col, index, xf, link_type, url, str, tip
      end

      def data
        { :sst_id => token }
      end

      def write_cell
        attributes = cell_attributes
        attributes << 't' << 's'
        @worksheet.writer.tag_elements('c', attributes) do
          @worksheet.write_cell_value(token)
        end

        if link_type == 1
          # External link with rel file relationship.
          @worksheet.rel_count += 1
          @worksheet.hlink_refs <<
            [
             link_type,    row,     col,
             @worksheet.rel_count, @str, @tip
            ]

          @worksheet.external_hyper_links << [ '/hyperlink', @url, 'External' ]
        elsif link_type
          # External link with rel file relationship.
          @worksheet.hlink_refs << [link_type, row, col, @url, @str, @tip ]
        end
      end
    end

    class BlankCellData < CellData # :nodoc:
      def initialize(worksheet, row, col, index, xf)
        @worksheet = worksheet
        @row, @col, @xf = row, col, xf
      end

      def data
        ''
      end

      def write_cell
        @worksheet.writer.empty_tag('c', cell_attributes)
      end
    end

    class PrintStyle # :nodoc:
      attr_accessor :margin_left, :margin_right, :margin_top, :margin_bottom  # :nodoc:
      attr_accessor :margin_header, :margin_footer                            # :nodoc:
      attr_accessor :repeat_rows, :repeat_cols, :print_area                   # :nodoc:
      attr_accessor :hbreaks, :vbreaks, :scale                                # :nodoc:
      attr_accessor :fit_page, :fit_width, :fit_height, :page_setup_changed   # :nodoc:
      attr_accessor :across                                                   # :nodoc:
      attr_accessor :orientation  # :nodoc:

      def initialize # :nodoc:
        @margin_left = 0.7
        @margin_right = 0.7
        @margin_top = 0.75
        @margin_bottom = 0.75
        @margin_header = 0.3
        @margin_footer = 0.3
        @repeat_rows   = ''
        @repeat_cols   = ''
        @print_area    = ''
        @hbreaks = []
        @vbreaks = []
        @scale = 100
        @fit_page = false
        @fit_width  = nil
        @fit_height = nil
        @page_setup_changed = false
        @across = false
        @orientation = true
      end

      def attributes    # :nodoc:
        [
         'left',   @margin_left,
         'right',  @margin_right,
         'top',    @margin_top,
         'bottom', @margin_bottom,
         'header', @margin_header,
         'footer', @margin_footer
        ]
      end

      def orientation?
        !!@orientation
      end
    end

    attr_reader :index # :nodoc:
    attr_reader :charts, :images, :tables, :shapes, :drawing # :nodoc:
    attr_reader :external_hyper_links, :external_drawing_links # :nodoc:
    attr_reader :external_vml_links, :external_table_links # :nodoc:
    attr_reader :external_comment_links, :drawing_links # :nodoc:
    attr_reader :vml_data_id # :nodoc:
    attr_reader :autofilter_area # :nodoc:
    attr_reader :writer, :set_rows, :col_formats # :nodoc:
    attr_accessor :vml_shape_id, :rel_count, :hlink_refs # :nodoc:
    attr_reader :comments_author # :nodoc:

    def initialize(workbook, index, name) #:nodoc:
      @writer = Package::XMLWriterSimple.new

      @workbook = workbook
      @index = index
      @name = name
      @colinfo = []
      @cell_data_table = {}
      @excel_version = 2007

      @print_style = PrintStyle.new

      @print_area    = ''

      @screen_gridlines = true
      @show_zeros = true
      @dim_rowmin = nil
      @dim_rowmax = nil
      @dim_colmin = nil
      @dim_colmax = nil
      @selections = []
      @panes = []

      @tab_color  = 0

      @set_cols = {}
      @set_rows = {}
      @zoom = 100
      @zoom_scale_normal = true
      @right_to_left = false

      @autofilter_area = nil
      @filter_on    = false
      @filter_range = []
      @filter_cols  = {}
      @filter_type  = {}

      @col_sizes = {}
      @row_sizes = {}
      @col_formats = {}

      @last_shape_id          = 1
      @rel_count              = 0
      @hlink_count            = 0
      @hlink_refs             = []
      @external_hyper_links   = []
      @external_drawing_links = []
      @external_comment_links = []
      @external_vml_links     = []
      @external_table_links   = []
      @drawing_links          = []
      @charts                 = []
      @images                 = []
      @tables                 = []
      @sparklines             = []
      @shapes                 = []
      @shape_hash             = {}

      @zoom = 100
      @outline_row_level = 0
      @outline_col_level = 0

      @merge = []

      @comments = Package::Comments.new(self)

      @validations = []

      @cond_formats = {}
      @dxf_priority = 1
    end

    def set_xml_writer(filename) #:nodoc:
      @writer.set_xml_writer(filename)
    end

    def assemble_xml_file #:nodoc:
      @writer.xml_decl
      write_worksheet
      write_sheet_pr
      write_dimension
      write_sheet_views
      write_sheet_format_pr
      write_cols
      write_sheet_data
      write_sheet_protection
      write_auto_filter
      write_merge_cells
      write_conditional_formats
      write_data_validations
      write_hyperlinks
      write_print_options
      write_page_margins
      write_page_setup
      write_header_footer
      write_row_breaks
      write_col_breaks
      write_drawings
      write_legacy_drawing
      write_table_parts
      write_ext_sparklines
      @writer.end_tag('worksheet')
      @writer.crlf
      @writer.close
    end

    #
    # The name() method is used to retrieve the name of a worksheet.
    # For example:
    #
    #     workbook.sheets.each do |sheet|
    #       print sheet.name
    #     end
    #
    # For reasons related to the design of WriteXLSX and to the internals
    # of Excel there is no set_name() method. The only way to set the
    # worksheet name is via the add_worksheet() method.
    #
    def name
      @name
    end

    #
    # Set this worksheet as a selected worksheet, i.e. the worksheet has its tab
    # highlighted.
    #
    # The select() method is used to indicate that a worksheet is selected in
    # a multi-sheet workbook:
    #
    #     worksheet1.activate
    #     worksheet2.select
    #     worksheet3.select
    #
    # A selected worksheet has its tab highlighted. Selecting worksheets is a
    # way of grouping them together so that, for example, several worksheets
    # could be printed in one go. A worksheet that has been activated via
    # the activate() method will also appear as selected.
    #
    def select
      @hidden   = false  # Selected worksheet can't be hidden.
      @selected = true
    end

    #
    # Set this worksheet as the active worksheet, i.e. the worksheet that is
    # displayed when the workbook is opened. Also set it as selected.
    #
    # The activate() method is used to specify which worksheet is initially
    # visible in a multi-sheet workbook:
    #
    #     worksheet1 = workbook.add_worksheet('To')
    #     worksheet2 = workbook.add_worksheet('the')
    #     worksheet3 = workbook.add_worksheet('wind')
    #
    #     worksheet3.activate
    #
    # This is similar to the Excel VBA activate method. More than one worksheet
    # can be selected via the select() method, see below, however only one
    # worksheet can be active.
    #
    # The default active worksheet is the first worksheet.
    #
    def activate
      @hidden = false
      @selected = true
      @workbook.activesheet = @index
    end

    #
    # Hide this worksheet.
    #
    # The hide() method is used to hide a worksheet:
    #
    #     worksheet2.hide
    #
    # You may wish to hide a worksheet in order to avoid confusing a user
    # with intermediate data or calculations.
    #
    # A hidden worksheet can not be activated or selected so this method
    # is mutually exclusive with the activate() and select() methods. In
    # addition, since the first worksheet will default to being the active
    # worksheet, you cannot hide the first worksheet without activating another
    # sheet:
    #
    #     worksheet2.activate
    #     worksheet1.hide
    #
    def hide
      @hidden = true
      @selected = false
      @workbook.activesheet = 0
      @workbook.firstsheet  = 0
    end

    def hidden? # :nodoc:
      @hidden
    end

    #
    # Set this worksheet as the first visible sheet. This is necessary
    # when there are a large number of worksheets and the activated
    # worksheet is not visible on the screen.
    #
    # The activate() method determines which worksheet is initially selected.
    # However, if there are a large number of worksheets the selected
    # worksheet may not appear on the screen. To avoid this you can select
    # which is the leftmost visible worksheet using set_first_sheet():
    #
    #     20.times { workbook.add_worksheet }
    #
    #     worksheet21 = workbook.add_worksheet
    #     worksheet22 = workbook.add_worksheet
    #
    #     worksheet21.set_first_sheet
    #     worksheet22.activate
    #
    # This method is not required very often. The default value is the first worksheet.
    #
    def set_first_sheet
      @hidden = false
      @workbook.firstsheet = self
    end

    #
    # Set the worksheet protection flags to prevent modification of worksheet
    # objects.
    #
    # The protect() method is used to protect a worksheet from modification:
    #
    #     worksheet.protect
    #
    # The protect() method also has the effect of enabling a cell's locked
    # and hidden properties if they have been set. A locked cell cannot be
    # edited and this property is on by default for all cells. A hidden
    # cell will display the results of a formula but not the formula itself.
    #
    # See the protection.rb program in the examples directory of the distro
    # for an illustrative example and the set_locked and set_hidden format
    # methods in "CELL FORMATTING".
    #
    # You can optionally add a password to the worksheet protection:
    #
    #     worksheet.protect('drowssap')
    #
    # Passing the empty string '' is the same as turning on protection
    # without a password.
    #
    # Note, the worksheet level password in Excel provides very weak
    # protection. It does not encrypt your data and is very easy to
    # deactivate. Full workbook encryption is not supported by WriteXLSX
    # since it requires a completely different file format and would take
    # several man months to implement.
    #
    # You can specify which worksheet elements that you which to protect
    # by passing a hash_ref with any or all of the following keys:
    #
    #     # Default shown.
    #     options = {
    #         :objects               => false,
    #         :scenarios             => false,
    #         :format_cells          => false,
    #         :format_columns        => false,
    #         :format_rows           => false,
    #         :insert_columns        => false,
    #         :insert_rows           => false,
    #         :insert_hyperlinks     => false,
    #         :delete_columns        => false,
    #         :delete_rows           => false,
    #         :select_locked_cells   => true,
    #         :sort                  => false,
    #         :autofilter            => false,
    #         :pivot_tables          => false,
    #         :select_unlocked_cells => true
    #     }
    # The default boolean values are shown above. Individual elements
    # can be protected as follows:
    #
    #     worksheet.protect('drowssap', { :insert_rows => true } )
    #
    def protect(password = nil, options = {})
      check_parameter(options, protect_default_settings.keys, 'protect')
      @protect = protect_default_settings.merge(options)

      # Set the password after the user defined values.
      @protect[:password] =
        sprintf("%X", encode_password(password)) if password && password != ''
    end

    def protect_default_settings  # :nodoc:
      {
        :sheet                 => true,
        :content               => false,
        :objects               => false,
        :scenarios             => false,
        :format_cells          => false,
        :format_columns        => false,
        :format_rows           => false,
        :insert_columns        => false,
        :insert_rows           => false,
        :insert_hyperlinks     => false,
        :delete_columns        => false,
        :delete_rows           => false,
        :select_locked_cells   => true,
        :sort                  => false,
        :autofilter            => false,
        :pivot_tables          => false,
        :select_unlocked_cells => true
      }
    end
    private :protect_default_settings

    #
    # :call-seq:
    #   set_column(firstcol, lastcol, width, format, hidden, level)
    #
    # This method can be used to change the default properties of a single
    # column or a range of columns. All parameters apart from first_col
    # and last_col are optional.
    #
    # If set_column() is applied to a single column the value of first_col
    # and last_col should be the same. In the case where last_col is zero
    # it is set to the same value as first_col.
    #
    # It is also possible, and generally clearer, to specify a column range
    # using the form of A1 notation used for columns. See the note about
    # "Cell notation".
    #
    # Examples:
    #
    #     worksheet.set_column(0, 0, 20)    # Column  A   width set to 20
    #     worksheet.set_column(1, 3, 30)    # Columns B-D width set to 30
    #     worksheet.set_column('E:E', 20)   # Column  E   width set to 20
    #     worksheet.set_column('F:H', 30)   # Columns F-H width set to 30
    #
    # The width corresponds to the column width value that is specified in
    # Excel. It is approximately equal to the length of a string in the
    # default font of Arial 10. Unfortunately, there is no way to specify
    # "AutoFit" for a column in the Excel file format. This feature is
    # only available at runtime from within Excel.
    #
    # As usual the format parameter is optional, for additional information,
    # see "CELL FORMATTING". If you wish to set the format without changing
    # the width you can pass nil as the width parameter:
    #
    #     worksheet.set_column(0, 0, nil, format)
    #
    # The format parameter will be applied to any cells in the column that
    # don't have a format. For example
    #
    #     worksheet.set_column( 'A:A', nil, format1 )    # Set format for col 1
    #     worksheet.write( 'A1', 'Hello' )                  # Defaults to format1
    #     worksheet.write( 'A2', 'Hello', format2 )        # Keeps format2
    #
    # If you wish to define a column format in this way you should call the
    # method before any calls to write(). If you call it afterwards it
    # won't have any effect.
    #
    # A default row format takes precedence over a default column format
    #
    #     worksheet.set_row( 0, nil, format1 )           # Set format for row 1
    #     worksheet.set_column( 'A:A', nil, format2 )    # Set format for col 1
    #     worksheet.write( 'A1', 'Hello' )               # Defaults to format1
    #     worksheet.write( 'A2', 'Hello' )               # Defaults to format2
    #
    # The hidden parameter should be set to 1 if you wish to hide a column.
    # This can be used, for example, to hide intermediary steps in a
    # complicated calculation:
    #
    #     worksheet.set_column( 'D:D', 20,  format, 1 )
    #     worksheet.set_column( 'E:E', nil, nil,    1 )
    #
    # The level parameter is used to set the outline level of the column.
    # Outlines are described in "OUTLINES AND GROUPING IN EXCEL". Adjacent
    # columns with the same outline level are grouped together into a single
    # outline.
    #
    # The following example sets an outline level of 1 for columns B to G:
    #
    #     worksheet.set_column( 'B:G', nil, nil, 0, 1 )
    #
    # The hidden parameter can also be used to hide collapsed outlined
    # columns when used in conjunction with the level parameter.
    #
    #     worksheet.set_column( 'B:G', nil, nil, 1, 1 )
    #
    # For collapsed outlines you should also indicate which row has the
    # collapsed + symbol using the optional collapsed parameter.
    #
    #     worksheet.set_column( 'H:H', nil, nil, 0, 0, 1 )
    #
    # For a more complete example see the outline.rb and outline_collapsed.rb
    # programs in the examples directory of the distro.
    #
    # Excel allows up to 7 outline levels. Therefore the level parameter
    # should be in the range 0 <= level <= 7.
    #
    def set_column(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      if args[0] =~ /^\D/
        row1, firstcol, row2, lastcol, *data = substitute_cellref(*args)
      else
        firstcol, lastcol, *data = args
      end

      # Ensure at least firstcol, lastcol and width
      return unless firstcol && lastcol && !data.empty?

      # Assume second column is the same as first if 0. Avoids KB918419 bug.
      lastcol = firstcol unless ptrue?(lastcol)

      # Ensure 2nd col is larger than first. Also for KB918419 bug.
      firstcol, lastcol = lastcol, firstcol if firstcol > lastcol

      width, format, hidden, level = data

      # Check that cols are valid and store max and min values with default row.
      # NOTE: The check shouldn't modify the row dimensions and should only modify
      #       the column dimensions in certain cases.
      ignore_row = 1
      ignore_col = 1
      ignore_col = 0 if format.respond_to?(:xf_index)   # Column has a format.
      ignore_col = 0 if width && ptrue?(hidden)         # Column has a width but is hidden

      check_dimensions_and_update_max_min_values(0, firstcol, ignore_row, ignore_col)
      check_dimensions_and_update_max_min_values(0, lastcol,  ignore_row, ignore_col)

      # Set the limits for the outline levels (0 <= x <= 7).
      level ||= 0
      level = 0 if level < 0
      level = 7 if level > 7

      @outline_col_level = level if level > @outline_col_level

      # Store the column data.
      @colinfo.push([firstcol, lastcol] + data)

      # Store the column change to allow optimisations.
      @col_size_changed = 1

      # Store the col sizes for use when calculating image vertices taking
      # hidden columns into account. Also store the column formats.
      width  ||= 0                        # Ensure width isn't nil.
      width = 0 if ptrue?(hidden)         # Set width to zero if col is hidden

      (firstcol .. lastcol).each do |col|
        @col_sizes[col]   = width
        @col_formats[col] = format if format
      end
    end

    #
    # :call-seq:
    #   set_selection(cell_or_cell_range)
    #
    # Set which cell or cells are selected in a worksheet.
    #
    # This method can be used to specify which cell or cells are selected
    # in a worksheet. The most common requirement is to select a single cell,
    # in which case last_row and last_col can be omitted. The active cell
    # within a selected range is determined by the order in which first and
    # last are specified. It is also possible to specify a cell or a range
    # using A1 notation. See the note about "Cell notation".
    #
    # Examples:
    #
    #     worksheet1.set_selection(3, 3)          # 1. Cell D4.
    #     worksheet2.set_selection(3, 3, 6, 6)    # 2. Cells D4 to G7.
    #     worksheet3.set_selection(6, 6, 3, 3)    # 3. Cells G7 to D4.
    #     worksheet4.set_selection('D4')          # Same as 1.
    #     worksheet5.set_selection('D4:G7')       # Same as 2.
    #     worksheet6.set_selection('G7:D4')       # Same as 3.
    #
    # The default cell selections is (0, 0), 'A1'.
    #
    def set_selection(*args)
      return if args.empty?

      row_first, col_first, row_last, col_last = row_col_notation(args)
      active_cell = xl_rowcol_to_cell(row_first, col_first)

      if row_last.nil?   # Single cell selection.
        sqref = active_cell
      else               # Range selection.
        # Swap last row/col for first row/col as necessary
        row_first, row_last = row_last, row_first if row_first > row_last
        col_first, col_last = col_last, col_first if col_first > col_last

        # If the first and last cell are the same write a single cell.
        if row_first == row_last && col_first == col_last
          sqref = active_cell
        else
          sqref = xl_range(row_first, col_first, row_last, col_last)
        end
      end

      # Selection isn't set for cell A1.
      return if sqref == 'A1'

      @selections = [ [ nil, active_cell, sqref ] ]
    end

    #
    # :call-seq:
    #   freeze_panes(row, col [ , top_row, left_col ] )
    #
    # This method can be used to divide a worksheet into horizontal or
    # vertical regions known as panes and to also "freeze" these panes so
    # that the splitter bars are not visible. This is the same as the
    # Window->Freeze Panes menu command in Excel
    #
    # The parameters row and col are used to specify the location of
    # the split. It should be noted that the split is specified at the
    # top or left of a cell and that the method uses zero based indexing.
    # Therefore to freeze the first row of a worksheet it is necessary
    # to specify the split at row 2 (which is 1 as the zero-based index).
    # This might lead you to think that you are using a 1 based index
    # but this is not the case.
    #
    # You can set one of the row and col parameters as zero if you
    # do not want either a vertical or horizontal split.
    #
    # Examples:
    #
    #     worksheet.freeze_panes(1, 0)    # Freeze the first row
    #     worksheet.freeze_panes('A2')    # Same using A1 notation
    #     worksheet.freeze_panes(0, 1)    # Freeze the first column
    #     worksheet.freeze_panes('B1')    # Same using A1 notation
    #     worksheet.freeze_panes(1, 2)    # Freeze first row and first 2 columns
    #     worksheet.freeze_panes('C2')    # Same using A1 notation
    #
    # The parameters top_row and left_col are optional. They are used
    # to specify the top-most or left-most visible row or column in the
    # scrolling region of the panes. For example to freeze the first row
    # and to have the scrolling region begin at row twenty:
    #
    #     worksheet.freeze_panes(1, 0, 20, 0)
    #
    # You cannot use A1 notation for the top_row and left_col parameters.
    #
    # See also the panes.rb program in the examples directory of the
    # distribution.
    #
    def freeze_panes(*args)
      return if args.empty?

      # Check for a cell reference in A1 notation and substitute row and column.
      row, col, top_row, left_col, type = row_col_notation(args)

      col      ||= 0
      top_row  ||= row
      left_col ||= col
      type     ||= 0

      @panes   = [row, col, top_row, left_col, type ]
    end

    #
    # :call-seq:
    #   split_panes(y, x, top_row, left_col, offset_row, offset_col)
    #
    # Set panes and mark them as split.
    #--
    # Implementers note. The API for this method doesn't map well from the XLS
    # file format and isn't sufficient to describe all cases of split panes.
    # It should probably be something like:
    #
    #     split_panes(y, x, top_row, left_col, offset_row, offset_col)
    #
    # I'll look at changing this if it becomes an issue.
    #++
    # This method can be used to divide a worksheet into horizontal or vertical
    # regions known as panes. This method is different from the freeze_panes()
    # method in that the splits between the panes will be visible to the user
    # and each pane will have its own scroll bars.
    #
    # The parameters y and x are used to specify the vertical and horizontal
    # position of the split. The units for y and x are the same as those
    # used by Excel to specify row height and column width. However, the
    # vertical and horizontal units are different from each other. Therefore
    # you must specify the y and x parameters in terms of the row heights
    # and column widths that you have set or the default values which are 15
    # for a row and 8.43 for a column.
    #
    # You can set one of the y and x parameters as zero if you do not want
    # either a vertical or horizontal split. The parameters top_row and left_col
    # are optional. They are used to specify the top-most or left-most visible
    # row or column in the bottom-right pane.
    #
    # Example:
    #
    #     worksheet.split_panes(15, 0   )    # First row
    #     worksheet.split_panes( 0, 8.43)    # First column
    #     worksheet.split_panes(15, 8.43)    # First row and column
    #
    # You cannot use A1 notation with this method.
    #
    # See also the freeze_panes() method and the panes.rb program in the
    # examples directory of the distribution.
    #
    def split_panes(*args)
      # Call freeze panes but add the type flag for split panes.
      freeze_panes(args[0], args[1], args[2], args[3], 2)
    end

    #
    # Set the page orientation as portrait.
    # The default worksheet orientation is portrait, so you won't generally
    # need to call this method.
    #
    def set_portrait
      @print_style.orientation        = true
      @print_style.page_setup_changed = true
    end

    #
    # Set the page orientation as landscape.
    #
    def set_landscape
      @print_style.orientation         = false
      @print_style.page_setup_changed  = true
    end

    #
    # This method is used to display the worksheet in "Page View/Layout" mode.
    #
    def set_page_view(flag = true)
      @page_view = !!flag
    end

    #
    # Set the colour of the worksheet tab.
    #
    # The set_tab_color() method is used to change the colour of the worksheet
    # tab. This feature is only available in Excel 2002 and later. You can use
    # one of the standard colour names provided by the Format object or a
    # colour index. See "COLOURS IN EXCEL" and the set_custom_color() method.
    #
    #     worksheet1.set_tab_color('red')
    #     worksheet2.set_tab_color(0x0C)
    #
    # See the tab_colors.rb program in the examples directory of the distro.
    #
    def set_tab_color(color)
      @tab_color = Colors.new.get_color(color)
    end

    #
    # Set the paper type. Ex. 1 = US Letter, 9 = A4
    #
    # This method is used to set the paper format for the printed output of
    # a worksheet. The following paper styles are available:
    #
    #     Index   Paper format            Paper size
    #     =====   ============            ==========
    #       0     Printer default         -
    #       1     Letter                  8 1/2 x 11 in
    #       2     Letter Small            8 1/2 x 11 in
    #       3     Tabloid                 11 x 17 in
    #       4     Ledger                  17 x 11 in
    #       5     Legal                   8 1/2 x 14 in
    #       6     Statement               5 1/2 x 8 1/2 in
    #       7     Executive               7 1/4 x 10 1/2 in
    #       8     A3                      297 x 420 mm
    #       9     A4                      210 x 297 mm
    #      10     A4 Small                210 x 297 mm
    #      11     A5                      148 x 210 mm
    #      12     B4                      250 x 354 mm
    #      13     B5                      182 x 257 mm
    #      14     Folio                   8 1/2 x 13 in
    #      15     Quarto                  215 x 275 mm
    #      16     -                       10x14 in
    #      17     -                       11x17 in
    #      18     Note                    8 1/2 x 11 in
    #      19     Envelope  9             3 7/8 x 8 7/8
    #      20     Envelope 10             4 1/8 x 9 1/2
    #      21     Envelope 11             4 1/2 x 10 3/8
    #      22     Envelope 12             4 3/4 x 11
    #      23     Envelope 14             5 x 11 1/2
    #      24     C size sheet            -
    #      25     D size sheet            -
    #      26     E size sheet            -
    #      27     Envelope DL             110 x 220 mm
    #      28     Envelope C3             324 x 458 mm
    #      29     Envelope C4             229 x 324 mm
    #      30     Envelope C5             162 x 229 mm
    #      31     Envelope C6             114 x 162 mm
    #      32     Envelope C65            114 x 229 mm
    #      33     Envelope B4             250 x 353 mm
    #      34     Envelope B5             176 x 250 mm
    #      35     Envelope B6             176 x 125 mm
    #      36     Envelope                110 x 230 mm
    #      37     Monarch                 3.875 x 7.5 in
    #      38     Envelope                3 5/8 x 6 1/2 in
    #      39     Fanfold                 14 7/8 x 11 in
    #      40     German Std Fanfold      8 1/2 x 12 in
    #      41     German Legal Fanfold    8 1/2 x 13 in
    #
    # Note, it is likely that not all of these paper types will be available
    # to the end user since it will depend on the paper formats that the
    # user's printer supports. Therefore, it is best to stick to standard
    # paper types.
    #
    #     worksheet.set_paper(1)    # US Letter
    #     worksheet.set_paper(9)    # A4
    #
    # If you do not specify a paper type the worksheet will print using
    # the printer's default paper.
    #
    def paper=(paper_size)
      if paper_size
        @paper_size         = paper_size
        @print_style.page_setup_changed = true
      end
    end

    def set_paper(paper_size)
      put_deprecate_message("#{self}.set_paper")
      self::paper = paper_size
    end

    #
    # Set the page header caption and optional margin.
    #
    # Headers and footers are generated using a string which is a combination
    # of plain text and control characters. The margin parameter is optional.
    #
    # The available control character are:
    #
    #     Control             Category            Description
    #     =======             ========            ===========
    #     &L                  Justification       Left
    #     &C                                      Center
    #     &R                                      Right
    #
    #     &P                  Information         Page number
    #     &N                                      Total number of pages
    #     &D                                      Date
    #     &T                                      Time
    #     &F                                      File name
    #     &A                                      Worksheet name
    #     &Z                                      Workbook path
    #
    #     &fontsize           Font                Font size
    #     &"font,style"                           Font name and style
    #     &U                                      Single underline
    #     &E                                      Double underline
    #     &S                                      Strikethrough
    #     &X                                      Superscript
    #     &Y                                      Subscript
    #
    #     &&                  Miscellaneous       Literal ampersand &
    #
    # Text in headers and footers can be justified (aligned) to the left,
    # center and right by prefixing the text with the control characters
    # &L, &C and &R.
    #
    # For example (with ASCII art representation of the results):
    #
    #     worksheet.set_header('&LHello')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     | Hello                                                         |
    #     |                                                               |
    #
    #
    #     worksheet.set_header('&CHello')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     |                          Hello                                |
    #     |                                                               |
    #
    #
    #     worksheet.set_header('&RHello')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     |                                                         Hello |
    #     |                                                               |
    #
    # For simple text, if you do not specify any justification the text will
    # be centred. However, you must prefix the text with &C if you specify
    # a font name or any other formatting:
    #
    #     worksheet.set_header('Hello')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     |                          Hello                                |
    #     |                                                               |
    #
    # You can have text in each of the justification regions:
    #
    #     worksheet.set_header('&LCiao&CBello&RCielo')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     | Ciao                     Bello                          Cielo |
    #     |                                                               |
    #
    # The information control characters act as variables that Excel will update
    # as the workbook or worksheet changes. Times and dates are in the users
    # default format:
    #
    #     worksheet.set_header('&CPage &P of &N')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     |                        Page 1 of 6                            |
    #     |                                                               |
    #
    #
    #     worksheet.set_header('&CUpdated at &T')
    #
    #      ---------------------------------------------------------------
    #     |                                                               |
    #     |                    Updated at 12:30 PM                        |
    #     |                                                               |
    #
    # You can specify the font size of a section of the text by prefixing it
    # with the control character &n where n is the font size:
    #
    #     worksheet1.set_header('&C&30Hello Big' )
    #     worksheet2.set_header('&C&10Hello Small' )
    #
    # You can specify the font of a section of the text by prefixing it with
    # the control sequence &"font,style" where fontname is a font name such
    # as "Courier New" or "Times New Roman" and style is one of the standard
    # Windows font descriptions: "Regular", "Italic", "Bold" or "Bold Italic":
    #
    #     worksheet1.set_header('&C&"Courier New,Italic"Hello')
    #     worksheet2.set_header('&C&"Courier New,Bold Italic"Hello')
    #     worksheet3.set_header('&C&"Times New Roman,Regular"Hello')
    #
    # It is possible to combine all of these features together to create
    # sophisticated headers and footers. As an aid to setting up complicated
    # headers and footers you can record a page set-up as a macro in Excel
    # and look at the format strings that VBA produces. Remember however
    # that VBA uses two double quotes "" to indicate a single double quote.
    # For the last example above the equivalent VBA code looks like this:
    #
    #     .LeftHeader   = ""
    #     .CenterHeader = "&""Times New Roman,Regular""Hello"
    #     .RightHeader  = ""
    #
    # To include a single literal ampersand & in a header or footer you
    # should use a double ampersand &&:
    #
    #     worksheet1.set_header('&CCuriouser && Curiouser - Attorneys at Law')
    #
    # As stated above the margin parameter is optional. As with the other
    # margins the value should be in inches. The default header and footer
    # margin is 0.3 inch. Note, the default margin is different from the
    # default used in the binary file format by Spreadsheet::WriteExcel.
    # The header and footer margin size can be set as follows:
    #
    #     worksheet.set_header('&CHello', 0.75)
    #
    # The header and footer margins are independent of the top and bottom
    # margins.
    #
    # Note, the header or footer string must be less than 255 characters.
    # Strings longer than this will not be written and a warning will be
    # generated.
    #
    # See, also the headers.rb program in the examples directory of the
    # distribution.
    #
    def set_header(string = '', margin = 0.3)
      raise 'Header string must be less than 255 characters' if string.length >= 255

      @header                = string
      @print_style.margin_header = margin
      @header_footer_changed = true
    end

    #
    # Set the page footer caption and optional margin.
    #
    # The syntax of the set_footer() method is the same as set_header()
    #
    def set_footer(string = '', margin = 0.3)
      raise 'Footer string must be less than 255 characters' if string.length >= 255

      @footer                = string
      @print_style.margin_footer = margin
      @header_footer_changed = true
    end

    #
    # Center the worksheet data horizontally between the margins on the printed page:
    #
    def center_horizontally
      @print_options_changed = true
      @hcenter               = true
    end

    #
    # Center the worksheet data vertically between the margins on the printed page:
    #
    def center_vertically
      @print_options_changed = true
      @vcenter               = true
    end

    #
    # Set all the page margins to the same value in inches.
    #
    # There are several methods available for setting the worksheet margins
    # on the printed page:
    #
    #     margins=()                # Set all margins to the same value
    #     margins_left_right=()     # Set left and right margins to the same value
    #     margins_top_bottom=()     # Set top and bottom margins to the same value
    #     margin_left=()            # Set left margin
    #     margin_right=()           # Set right margin
    #     margin_top=()             # Set top margin
    #     margin_bottom=()          # Set bottom margin
    #
    # All of these methods take a distance in inches as a parameter.
    # Note: 1 inch = 25.4mm. ;-) The default left and right margin is 0.7 inch.
    # The default top and bottom margin is 0.75 inch. Note, these defaults
    # are different from the defaults used in the binary file format
    # by writeexcel gem.
    #
    def margins=(margin)
      self::margin_left   = margin
      self::margin_right  = margin
      self::margin_top    = margin
      self::margin_bottom = margin
    end

    #
    # Set the left and right margins to the same value in inches.
    # See set_margins
    #
    def margins_left_right=(margin)
      self::margin_left  = margin
      self::margin_right = margin
    end

    #
    # Set the top and bottom margins to the same value in inches.
    # See set_margins
    #
    def margins_top_bottom=(margin)
      self::margin_top    = margin
      self::margin_bottom = margin
    end

    #
    # Set the left margin in inches.
    # See margins=()
    #
    def margin_left=(margin)
      @print_style.margin_left = remove_white_space(margin)
    end

    #
    # Set the right margin in inches.
    # See margins=()
    #
    def margin_right=(margin)
      @print_style.margin_right = remove_white_space(margin)
    end

    #
    # Set the top margin in inches.
    # See margins=()
    #
    def margin_top=(margin)
      @print_style.margin_top = remove_white_space(margin)
    end

    #
    # Set the bottom margin in inches.
    # See margins=()
    #
    def margin_bottom=(margin)
      @print_style.margin_bottom = remove_white_space(margin)
    end

    #
    # set_margin_* methods are deprecated. use margin_*=().
    #
    # Set all the page margins to the same value in inches.
    #
    # There are several methods available for setting the worksheet margins
    # on the printed page:
    #
    #     set_margins()        # Set all margins to the same value
    #     set_margins_LR()     # Set left and right margins to the same value
    #     set_margins_TB()     # Set top and bottom margins to the same value
    #     set_margin_left()    # Set left margin
    #     set_margin_right()   # Set right margin
    #     set_margin_top()     # Set top margin
    #     set_margin_bottom()  # Set bottom margin
    #
    # All of these methods take a distance in inches as a parameter.
    # Note: 1 inch = 25.4mm. ;-) The default left and right margin is 0.7 inch.
    # The default top and bottom margin is 0.75 inch. Note, these defaults
    # are different from the defaults used in the binary file format
    # by writeexcel gem.
    #
    def set_margins(margin)
      put_deprecate_message("#{self}.set_margins")
      self::margin = margin
    end

    #
    # this method is deprecated. use margin_left_right=().
    # Set the left and right margins to the same value in inches.
    # See set_margins
    #
    def set_margins_LR(margin)
      put_deprecate_message("#{self}.set_margins_LR")
      self::margins_left_right = margin
    end

    #
    # this method is deprecated. use margin_top_bottom=().
    # Set the top and bottom margins to the same value in inches.
    # See set_margins
    #
    def set_margins_TB(margin)
      put_deprecate_message("#{self}.set_margins_TB")
      self::margins_top_bottom = margin
    end

    #
    # this method is deprecated. use margin_left=()
    # Set the left margin in inches.
    # See set_margins
    #
    def set_margin_left(margin = 0.7)
      put_deprecate_message("#{self}.set_margin_left")
      self::margin_left = margin
    end

    #
    # this method is deprecated. use margin_right=()
    # Set the right margin in inches.
    # See set_margins
    #
    def set_margin_right(margin = 0.7)
      put_deprecate_message("#{self}.set_margin_right")
      self::margin_right = margin
    end

    #
    # this method is deprecated. use margin_top=()
    # Set the top margin in inches.
    # See set_margins
    #
    def set_margin_top(margin = 0.75)
      put_deprecate_message("#{self}.set_margin_top")
      self::margin_top = margin
    end

    #
    # this method is deprecated. use margin_bottom=()
    # Set the bottom margin in inches.
    # See set_margins
    #
    def set_margin_bottom(margin = 0.75)
      put_deprecate_message("#{self}.set_margin_bottom")
      self::margin_bottom = margin
    end

    #
    # Set the number of rows to repeat at the top of each printed page.
    #
    # For large Excel documents it is often desirable to have the first row
    # or rows of the worksheet print out at the top of each page. This can
    # be achieved by using the repeat_rows() method. The parameters
    # first_row and last_row are zero based. The last_row parameter is
    # optional if you only wish to specify one row:
    #
    #     worksheet1.repeat_rows(0)    # Repeat the first row
    #     worksheet2.repeat_rows(0, 1) # Repeat the first two rows
    #
    def repeat_rows(row_min, row_max = nil)
      row_max ||= row_min

      # Convert to 1 based.
      row_min += 1
      row_max += 1

      area = "$#{row_min}:$#{row_max}"

      # Build up the print titles "Sheet1!$1:$2"
      sheetname = quote_sheetname(name)
      @print_style.repeat_rows = "#{sheetname}!#{area}"
    end

    def print_repeat_rows   # :nodoc:
      @print_style.repeat_rows
    end
    #
    # :call-seq:
    #   repeat_columns(first_col, last_col = nil)
    #
    # Set the columns to repeat at the left hand side of each printed page.
    #
    # For large Excel documents it is often desirable to have the first
    # column or columns of the worksheet print out at the left hand side
    # of each page. This can be achieved by using the repeat_columns()
    # method. The parameters first_column and last_column are zero based.
    # The last_column parameter is optional if you only wish to specify
    # one column. You can also specify the columns using A1 column
    # notation, see the note about "Cell notation".
    #
    #     worksheet1.repeat_columns(0)        # Repeat the first column
    #     worksheet2.repeat_columns(0, 1)     # Repeat the first two columns
    #     worksheet3.repeat_columns('A:A')    # Repeat the first column
    #     worksheet4.repeat_columns('A:B')    # Repeat the first two columns
    #
    def repeat_columns(*args)
      if args[0] =~ /^\D/
        dummy, first_col, dummy, last_col = substitute_cellref(*args)
      else
        first_col, last_col = args
      end
      last_col ||= first_col

      area = "#{xl_col_to_name(first_col, 1)}:#{xl_col_to_name(last_col, 1)}"
      @print_style.repeat_cols = "#{quote_sheetname(@name)}!#{area}"
    end

    def print_repeat_cols  # :nodoc:
      @print_style.repeat_cols
    end

    #
    # :call-seq:
    #   print_area(first_row, first_col, last_row, last_col)
    #
    # This method is used to specify the area of the worksheet that will
    # be printed. All four parameters must be specified. You can also use
    # A1 notation, see the note about "Cell notation".
    #
    #     worksheet1.print_area( 'A1:H20' );    # Cells A1 to H20
    #     worksheet2.print_area( 0, 0, 19, 7 ); # The same
    #     worksheet2.print_area( 'A:H' );       # Columns A to H if rows have data
    #
    def print_area(*args)
      return @print_area.dup if args.empty?
      row1, col1, row2, col2 = row_col_notation(args)
      return if [row1, col1, row2, col2].include?(nil)

      # Ignore max print area since this is the same as no print area for Excel.
      if row1 == 0 && col1 == 0 && row2 == ROW_MAX - 1 && col2 == COL_MAX - 1
        return
      end

      # Build up the print area range "=Sheet2!R1C1:R2C1"
      @print_area = convert_name_area(row1, col1, row2, col2)
    end

    #
    # Set the worksheet zoom factor.
    #
    def set_zoom(scale = 100)
      # Confine the scale to Excel's range
      if scale < 10 or scale > 400
        # carp "Zoom factor scale outside range: 10 <= zoom <= 400"
        scale = 100
      end

      @zoom = scale.to_i
    end

    #
    # Set the scale factor of the printed page.
    # Scale factors in the range 10 <= scale <= 400 are valid:
    #
    #     worksheet1.print_scale =  50
    #     worksheet2.print_scale =  75
    #     worksheet3.print_scale = 300
    #     worksheet4.print_scale = 400
    #
    # The default scale factor is 100. Note, print_scale=() does not
    # affect the scale of the visible page in Excel. For that you should
    # use set_zoom().
    #
    # Note also that although it is valid to use both fit_to_pages() and
    # print_scale=() on the same worksheet only one of these options
    # can be active at a time. The last method call made will set
    # the active option.
    #
    def print_scale=(scale = 100)
      scale_val = scale.to_i
      # Confine the scale to Excel's range
      scale_val = 100 if scale_val < 10 || scale_val > 400

      # Turn off "fit to page" option.
      @print_style.fit_page = false

      @print_style.scale              = scale_val
      @print_style.page_setup_changed = true
    end

    #
    # This method is deprecated. use print_scale=().
    #
    def set_print_scale(scale = 100)
      put_deprecate_message("#{self}.set_print_scale")
      self::print_scale = (scale)
    end

    #
    # Display the worksheet right to left for some eastern versions of Excel.
    #
    # The right_to_left() method is used to change the default direction
    # of the worksheet from left-to-right, with the A1 cell in the top
    # left, to right-to-left, with the he A1 cell in the top right.
    #
    #     worksheet.right_to_left
    #
    # This is useful when creating Arabic, Hebrew or other near or far
    # eastern worksheets that use right-to-left as the default direction.
    #
    def right_to_left(flag = true)
      @right_to_left = !!flag
    end

    #
    # Hide cell zero values.
    #
    # The hide_zero() method is used to hide any zero values that appear
    # in cells.
    #
    #     worksheet.hide_zero
    #
    # In Excel this option is found under Tools->Options->View.
    #
    def hide_zero(flag = true)
        @show_zeros = !flag
    end

    #
    # Set the order in which pages are printed.
    #
    # The print_across method is used to change the default print direction.
    # This is referred to by Excel as the sheet "page order".
    #
    #     worksheet.print_across
    #
    # The default page order is shown below for a worksheet that extends
    # over 4 pages. The order is called "down then across":
    #
    #     [1] [3]
    #     [2] [4]
    #
    # However, by using the print_across method the print order will be
    # changed to "across then down":
    #
    #     [1] [2]
    #     [3] [4]
    #
    def print_across(across = true)
      if across
        @print_style.across             = true
        @print_style.page_setup_changed = true
      else
        @print_style.across = false
      end
    end

    #
    # Not implememt yet.
    #--
    # The set_start_page() method is used to set the number of the
    # starting page when the worksheet is printed out.
    # The default value is 1.
    #
    #     worksheet.set_start_page(2)
    #++
    #
    def set_start_page(page_start)
      @page_start   = page_start
      @custom_start = 1
    end

    #
    # :call-seq:
    #  write(row, column [ , token [ , format ] ])
    #
    # Excel makes a distinction between data types such as strings, numbers,
    # blanks, formulas and hyperlinks. To simplify the process of writing
    # data the write() method acts as a general alias for several more
    # specific methods:
    #
    #     write_string
    #     write_number
    #     write_blank
    #     write_formula
    #     write_url
    #     write_row
    #     write_col
    #
    # The general rule is that if the data looks like a something then
    # a something is written. Here are some examples in both row-column
    # and A1 notation:
    #
    #                                                     # Same as:
    #     worksheet.write(0, 0, 'Hello'                ) # write_string()
    #     worksheet.write(1, 0, 'One'                  ) # write_string()
    #     worksheet.write(2, 0,  2                     ) # write_number()
    #     worksheet.write(3, 0,  3.00001               ) # write_number()
    #     worksheet.write(4, 0,  ""                    ) # write_blank()
    #     worksheet.write(5, 0,  ''                    ) # write_blank()
    #     worksheet.write(6, 0,  nil                   ) # write_blank()
    #     worksheet.write(7, 0                         ) # write_blank()
    #     worksheet.write(8, 0,  'http://www.ruby.com/') # write_url()
    #     worksheet.write('A9',  'ftp://ftp.ruby.org/' ) # write_url()
    #     worksheet.write('A10', 'internal:Sheet1!A1'  ) # write_url()
    #     worksheet.write('A11', 'external:c:\foo.xlsx') # write_url()
    #     worksheet.write('A12', '=A3 + 3*A4'          ) # write_formula()
    #     worksheet.write('A13', '=SIN(PI()/4)'        ) # write_formula()
    #     worksheet.write('A14', [1, 2]                ) # write_row()
    #     worksheet.write('A15', [ [1, 2] ]            ) # write_col()
    #
    #     # Write an array formula. Not available in writeexcel gem.
    #     worksheet.write('A16', '{=SUM(A1:B1*A2:B2)}' ) # write_formula()
    #
    # The format parameter is optional. It should be a valid Format object.
    #
    #     format = workbook.add_format
    #     format.set_bold
    #     format.set_color('red')
    #     format.set_align('center')
    #
    #     worksheet.write(4, 0, 'Hello', format)    # Formatted string
    #
    # The write() method will ignore empty strings or nil tokens unless a format
    # is also supplied. As such you needn't worry about special handling for
    # empty or nil in your data. See also the write_blank() method.
    #
    # One problem with the write() method is that occasionally data looks like
    # a number but you don't want it treated as a number. For example, zip
    # codes or ID numbers often start with a leading zero.
    # If you want to write this data with leading zero(s), use write_string.
    #
    # The write methods return:
    #     0 for success.
    #
    def write(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      token = row_col_notation(args)[2] || ''

      # Match an array ref.
      if token.respond_to?(:to_ary)
        write_row(*args)
      elsif token.respond_to?(:coerce)  # Numeric
        write_number(*args)
      elsif token =~ /^\d+$/
        write_number(*args)
      # Match http, https or ftp URL
      elsif token =~ %r|^[fh]tt?ps?://|
        write_url(*args)
      # Match mailto:
      elsif token =~ %r|^mailto:|
        write_url(*args)
      # Match internal or external sheet link
      elsif token =~ %r!^(?:in|ex)ternal:!
        write_url(*args)
      # Match formula
      elsif token =~ /^=/
        write_formula(*args)
      # Match array formula
      elsif token =~ /^\{=.*\}$/
        write_formula(*args)
      # Match blank
      elsif token == ''
        args.delete_at(2)     # remove the empty string from the parameter list
        write_blank(*args)
      else
        write_string(*args)
      end
    end

    #
    # :call-seq:
    #   write_row(row, col, array [ , format ] )
    #
    # Write a row of data starting from (row, col). Call write_col() if any of
    # the elements of the array are in turn array. This allows the writing
    # of 1D or 2D arrays of data in one go.
    #
    # The write_row() method can be used to write a 1D or 2D array of data
    # in one go. This is useful for converting the results of a database
    # query into an Excel worksheet. You must pass a reference to the array
    # of data rather than the array itself. The write() method is then
    # called for each element of the data. For example:
    #
    #     array = ['awk', 'gawk', 'mawk']
    #
    #     worksheet.write_row(0, 0, array)
    #
    #     # The above example is equivalent to:
    #     worksheet.write(0, 0, array[0])
    #     worksheet.write(0, 1, array[1])
    #     worksheet.write(0, 2, array[2])
    #
    # Note: For convenience the write() method behaves in the same way as
    # write_row() if it is passed an array reference.
    # Therefore the following two method calls are equivalent:
    #
    #     worksheet.write_row('A1', array)    # Write a row of data
    #     worksheet.write(    'A1', array)    # Same thing
    #
    # As with all of the write methods the format parameter is optional.
    # If a format is specified it is applied to all the elements of the
    # data array.
    #
    # Array references within the data will be treated as columns.
    # This allows you to write 2D arrays of data in one go. For example:
    #
    #     eec =  [
    #                 ['maggie', 'milly', 'molly', 'may'  ],
    #                 [13,       14,      15,      16     ],
    #                 ['shell',  'star',  'crab',  'stone']
    #            ]
    #
    #     worksheet.write_row('A1', eec)
    # Would produce a worksheet as follows:
    #
    #      -----------------------------------------------------------
    #     |   |    A    |    B    |    C    |    D    |    E    | ...
    #      -----------------------------------------------------------
    #     | 1 | maggie  | 13      | shell   | ...     |  ...    | ...
    #     | 2 | milly   | 14      | star    | ...     |  ...    | ...
    #     | 3 | molly   | 15      | crab    | ...     |  ...    | ...
    #     | 4 | may     | 16      | stone   | ...     |  ...    | ...
    #     | 5 | ...     | ...     | ...     | ...     |  ...    | ...
    #     | 6 | ...     | ...     | ...     | ...     |  ...    | ...
    #
    # To write the data in a row-column order refer to the write_col()
    # method below.
    #
    # Any nil in the data will be ignored unless a format is applied to
    # the data, in which case a formatted blank cell will be written.
    # In either case the appropriate row or column value will still
    # be incremented.
    #
    # The write_row() method returns the first error encountered when
    # writing the elements of the data or zero if no errors were
    # encountered. See the return values described for the write()
    # method.
    #
    # See also the write_arrays.rb program in the examples directory
    # of the distro.
    #
    def write_row(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, tokens, *options = row_col_notation(args)
      raise "Not an array ref in call to write_row()$!" unless tokens.respond_to?(:to_ary)

      tokens.each do |token|
        # Check for nested arrays
        if token.respond_to?(:to_ary)
          write_col(row, col, token, *options)
        else
          write(row, col, token, *options)
        end
        col += 1
      end
    end

    #
    # :call-seq:
    #   write_col(row, col, array [ , format ] )
    #
    # Write a column of data starting from (row, col). Call write_row() if any of
    # the elements of the array are in turn array. This allows the writing
    # of 1D or 2D arrays of data in one go.
    #
    # The write_col() method can be used to write a 1D or 2D array of data
    # in one go. This is useful for converting the results of a database
    # query into an Excel worksheet. You must pass a reference to the array
    # of data rather than the array itself. The write() method is then
    # called for each element of the data. For example:
    #
    #     array = [ 'awk', 'gawk', 'mawk' ]
    #
    #     worksheet.write_col(0, 0, array)
    #
    #     # The above example is equivalent to:
    #     worksheet.write(0, 0, array[0])
    #     worksheet.write(1, 0, array[1])
    #     worksheet.write(2, 0, array[2])
    #
    # As with all of the write methods the format parameter is optional.
    # If a format is specified it is applied to all the elements of the
    # data array.
    #
    # Array references within the data will be treated as rows.
    # This allows you to write 2D arrays of data in one go. For example:
    #
    #     eec =  [
    #                 ['maggie', 'milly', 'molly', 'may'  ],
    #                 [13,       14,      15,      16     ],
    #                 ['shell',  'star',  'crab',  'stone']
    #            ]
    #
    #     worksheet.write_col('A1', eec)
    #
    # Would produce a worksheet as follows:
    #
    #      -----------------------------------------------------------
    #     |   |    A    |    B    |    C    |    D    |    E    | ...
    #      -----------------------------------------------------------
    #     | 1 | maggie  | milly   | molly   | may     |  ...    | ...
    #     | 2 | 13      | 14      | 15      | 16      |  ...    | ...
    #     | 3 | shell   | star    | crab    | stone   |  ...    | ...
    #     | 4 | ...     | ...     | ...     | ...     |  ...    | ...
    #     | 5 | ...     | ...     | ...     | ...     |  ...    | ...
    #     | 6 | ...     | ...     | ...     | ...     |  ...    | ...
    #
    # To write the data in a column-row order refer to the write_row()
    # method above.
    #
    # Any nil in the data will be ignored unless a format is applied to
    # the data, in which case a formatted blank cell will be written.
    # In either case the appropriate row or column value will still be
    # incremented.
    #
    # As noted above the write() method can be used as a synonym for
    # write_row() and write_row() handles nested array refs as columns.
    # Therefore, the following two method calls are equivalent although
    # the more explicit call to write_col() would be preferable for
    # maintainability:
    #
    #     worksheet.write_col('A1', array     ) # Write a column of data
    #     worksheet.write(    'A1', [ array ] ) # Same thing
    #
    # The write_col() method returns the first error encountered when
    # writing the elements of the data or zero if no errors were encountered.
    # See the return values described for the write() method above.
    #
    # See also the write_arrays.rb program in the examples directory of
    # the distro.
    #
    def write_col(*args)
      row, col, tokens, *options = row_col_notation(args)
      raise "Not an array ref in call to write_col()$!" unless tokens.respond_to?(:to_ary)

      tokens.each do |token|
        # write() will deal with any nested arrays
        write(row, col, token, *options)
        row += 1
      end
    end

    #
    # :call-seq:
    #   write_comment(row, column, string, options = {})
    #
    # Write a comment to the specified row and column (zero indexed).
    #
    # write_comment methods return:
    #   Returns  0 : normal termination
    #
    # The write_comment() method is used to add a comment to a cell.
    # A cell comment is indicated in Excel by a small red triangle in the
    # upper right-hand corner of the cell. Moving the cursor over the red
    # triangle will reveal the comment.
    #
    # The following example shows how to add a comment to a cell:
    #
    #     worksheet.write(        2, 2, 'Hello')
    #     worksheet.write_comment(2, 2, 'This is a comment.')
    #
    # As usual you can replace the row and column parameters with an A1
    # cell reference. See the note about "Cell notation".
    #
    #     worksheet.write(        'C3', 'Hello')
    #     worksheet.write_comment('C3', 'This is a comment.')
    #
    # The write_comment() method will also handle strings in UTF-8 format.
    #
    #     worksheet.write_comment('C3', "\x{263a}")       # Smiley
    #     worksheet.write_comment('C4', 'Comment ca va?')
    #
    # In addition to the basic 3 argument form of write_comment() you can
    # pass in several optional key/value pairs to control the format of
    # the comment. For example:
    #
    #     worksheet.write_comment('C3', 'Hello', :visible => 1, :author => 'Perl')
    #
    # Most of these options are quite specific and in general the default
    # comment behaviour will be all that you need. However, should you
    # need greater control over the format of the cell comment the
    # following options are available:
    #
    #     :author
    #     :visible
    #     :x_scale
    #     :width
    #     :y_scale
    #     :height
    #     :color
    #     :start_cell
    #     :start_row
    #     :start_col
    #     :x_offset
    #     :y_offset
    #
    # ===Option: author
    #
    # This option is used to indicate who is the author of the cell
    # comment. Excel displays the author of the comment in the status
    # bar at the bottom of the worksheet. This is usually of interest
    # in corporate environments where several people might review and
    # provide comments to a workbook.
    #
    #     worksheet.write_comment('C3', 'Atonement', :author => 'Ian McEwan')
    #
    # The default author for all cell comments can be set using the
    # set_comments_author() method.
    #
    #     worksheet.set_comments_author('Ruby')
    #
    # ===Option: visible
    #
    # This option is used to make a cell comment visible when the worksheet
    # is opened. The default behaviour in Excel is that comments are
    # initially hidden. However, it is also possible in Excel to make
    # individual or all comments visible. In WriteXLSX individual
    # comments can be made visible as follows:
    #
    #     worksheet.write_comment('C3', 'Hello', :visible => 1 )
    #
    # It is possible to make all comments in a worksheet visible
    # using the show_comments() worksheet method. Alternatively, if all of
    # the cell comments have been made visible you can hide individual comments:
    #
    #     worksheet.write_comment('C3', 'Hello', :visible => 0)
    #
    # ===Option: x_scale
    #
    # This option is used to set the width of the cell comment box as a
    # factor of the default width.
    #
    #     worksheet.write_comment('C3', 'Hello', :x_scale => 2)
    #     worksheet.write_comment('C4', 'Hello', :x_scale => 4.2)
    #
    # ===Option: width
    #
    # This option is used to set the width of the cell comment box
    # explicitly in pixels.
    #
    #     worksheet.write_comment('C3', 'Hello', :width => 200)
    #
    # ===Option: y_scale
    #
    # This option is used to set the height of the cell comment box as a
    # factor of the default height.
    #
    #     worksheet.write_comment('C3', 'Hello', :y_scale => 2)
    #     worksheet.write_comment('C4', 'Hello', :y_scale => 4.2)
    #
    # ===Option: height
    #
    # This option is used to set the height of the cell comment box
    # explicitly in pixels.
    #
    #     worksheet.write_comment('C3', 'Hello', :height => 200)
    #
    # ===Option: color
    #
    # This option is used to set the background colour of cell comment
    # box. You can use one of the named colours recognised by WriteXLSX
    # or a colour index. See "COLOURS IN EXCEL".
    #
    #     worksheet.write_comment('C3', 'Hello', :color => 'green')
    #     worksheet.write_comment('C4', 'Hello', :color => 0x35)      # Orange
    #
    # ===Option: start_cell
    #
    # This option is used to set the cell in which the comment will appear.
    # By default Excel displays comments one cell to the right and one cell
    # above the cell to which the comment relates. However, you can change
    # this behaviour if you wish. In the following example the comment
    # which would appear by default in cell D2 is moved to E2.
    #
    #     worksheet.write_comment('C3', 'Hello', :start_cell => 'E2')
    #
    # ===Option: start_row
    #
    # This option is used to set the row in which the comment will appear.
    # See the start_cell option above. The row is zero indexed.
    #
    #     worksheet.write_comment('C3', 'Hello', :start_row => 0)
    #
    # ===Option: start_col
    #
    # This option is used to set the column in which the comment will appear.
    # See the start_cell option above. The column is zero indexed.
    #
    #     worksheet.write_comment('C3', 'Hello', :start_col => 4)
    #
    # ===Option: x_offset
    #
    # This option is used to change the x offset, in pixels, of a comment
    # within a cell:
    #
    #     worksheet.write_comment('C3', comment, :x_offset => 30)
    #
    # ===Option: y_offset
    #
    # This option is used to change the y offset, in pixels, of a comment
    # within a cell:
    #
    #     worksheet.write_comment('C3', comment, :x_offset => 30)
    #
    # You can apply as many of these options as you require.
    #
    # Note about using options that adjust the position of the cell comment
    # such as start_cell, start_row, start_col, x_offset and y_offset:
    # Excel only displays offset cell comments when they are displayed as
    # "visible". Excel does not display hidden cells as moved when you
    # mouse over them.
    #
    # Note about row height and comments. If you specify the height of a
    # row that contains a comment then WriteXLSX will adjust the
    # height of the comment to maintain the default or user specified
    # dimensions. However, the height of a row can also be adjusted
    # automatically by Excel if the text wrap property is set or large
    # fonts are used in the cell. This means that the height of the row
    # is unknown to the module at run time and thus the comment box is
    # stretched with the row. Use the set_row() method to specify the
    # row height explicitly and avoid this problem.
    #
    def write_comment(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, string, options = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, string].include?(nil)

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      # Process the properties of the cell comment.
      @comments.add(Package::Comment.new(@workbook, self, row, col, string, options))
    end

    #
    # :call-seq:
    #   write_number(row, column, number [ , format ] )
    #
    # Write an integer or a float to the cell specified by row and column:
    #
    #     worksheet.write_number(0, 0, 123456)
    #     worksheet.write_number('A2', 2.3451)
    #
    # See the note about "Cell notation".
    # The format parameter is optional.
    #
    # In general it is sufficient to use the write() method.
    #
    # Note: some versions of Excel 2007 do not display the calculated values
    # of formulas written by WriteXLSX. Applying all available Service Packs
    # to Excel should fix this.
    #
    def write_number(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, num, xf = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, num].include?(nil)

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      store_data_to_table(NumberCellData.new(self, row, col, num, xf))
    end

    #
    # :call-seq:
    #   write_string(row, column, string [, format ] )
    #
    # Write a string to the specified row and column (zero indexed).
    # format is optional.
    #
    #     worksheet.write_string(0, 0, 'Your text here')
    #     worksheet.write_string('A2', 'or here')
    #
    # The maximum string size is 32767 characters. However the maximum
    # string segment that Excel can display in a cell is 1000.
    # All 32767 characters can be displayed in the formula bar.
    #
    # In general it is sufficient to use the write() method.
    # However, you may sometimes wish to use the write_string() method
    # to write data that looks like a number but that you don't want
    # treated as a number. For example, zip codes or phone numbers:
    #
    #     # Write as a plain string
    #     worksheet.write_string('A1', '01209')
    #
    # However, if the user edits this string Excel may convert it back
    # to a number. To get around this you can use the Excel text format @:
    #
    #     # Format as a string. Doesn't change to a number when edited
    #     format1 = workbook.add_format(:num_format => '@')
    #     worksheet.write_string('A2', '01209', format1)
    #
    def write_string(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, str, xf = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, str].include?(nil)

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      index = shared_string_index(str[0, STR_MAX])

      store_data_to_table(StringCellData.new(self, row, col, index, xf))
    end

    #
    # :call-seq:
    #    write_rich_string(row, column, (string | format, string)+,  [,cell_format] )
    #
    # The write_rich_string() method is used to write strings with multiple formats.
    # The method receives string fragments prefixed by format objects. The final
    # format object is used as the cell format.
    #
    # write_rich_string methods return:
    #
    # For example to write the string "This is bold and this is italic"
    # you would use the following:
    #
    #     bold   = workbook.add_format(:bold   => 1)
    #     italic = workbook.add_format(:italic => 1)
    #
    #     worksheet.write_rich_string('A1',
    #         'This is ', bold, 'bold', ' and this is ', italic, 'italic')
    #
    # The basic rule is to break the string into fragments and put a format
    # object before the fragment that you want to format. For example:
    #
    #     # Unformatted string.
    #       'This is an example string'
    #
    #     # Break it into fragments.
    #       'This is an ', 'example', ' string'
    #
    #     # Add formatting before the fragments you want formatted.
    #       'This is an ', format, 'example', ' string'
    #
    #     # In WriteXLSX.
    #     worksheet.write_rich_string('A1',
    #         'This is an ', format, 'example', ' string')
    # String fragments that don't have a format are given a default
    # format. So for example when writing the string "Some bold text"
    # you would use the first example below but it would be equivalent
    # to the second:
    #
    #     # With default formatting:
    #     bold    = workbook.add_format(:bold => 1)
    #
    #     worksheet.write_rich_string('A1',
    #         'Some ', bold, 'bold', ' text')
    #
    #     # Or more explicitly:
    #     bold    = workbook.add_format(:bold => 1)
    #     default = workbook.add_format
    #
    #     worksheet.write_rich_string('A1',
    #         default, 'Some ', bold, 'bold', default, ' text')
    #
    # As with Excel, only the font properties of the format such as font
    # name, style, size, underline, color and effects are applied to the
    # string fragments. Other features such as border, background and
    # alignment must be applied to the cell.
    #
    # The write_rich_string() method allows you to do this by using the
    # last argument as a cell format (if it is a format object).
    # The following example centers a rich string in the cell:
    #
    #     bold   = workbook.add_format(:bold  => 1)
    #     center = workbook.add_format(:align => 'center')
    #
    #     worksheet.write_rich_string('A5',
    #         'Some ', bold, 'bold text', ' centered', center)
    #
    # See the rich_strings.rb example in the distro for more examples.
    #
    #     bold   = workbook.add_format(:bold        => 1)
    #     italic = workbook.add_format(:italic      => 1)
    #     red    = workbook.add_format(:color       => 'red')
    #     blue   = workbook.add_format(:color       => 'blue')
    #     center = workbook.add_format(:align       => 'center')
    #     super  = workbook.add_format(:font_script => 1)
    #
    #     # Write some strings with multiple formats.
    #     worksheet.write_rich_string('A1',
    #         'This is ', bold, 'bold', ' and this is ', italic, 'italic')
    #
    #     worksheet.write_rich_string('A3',
    #         'This is ', red, 'red', ' and this is ', blue, 'blue')
    #
    #     worksheet.write_rich_string('A5',
    #         'Some ', bold, 'bold text', ' centered', center)
    #
    #     worksheet.write_rich_string('A7',
    #         italic, 'j = k', super, '(n-1)', center)
    #
    # As with write_sting() the maximum string size is 32767 characters.
    # See also the note about "Cell notation".
    #
    def write_rich_string(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, *rich_strings = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, rich_strings[0]].include?(nil)

      # If the last arg is a format we use it as the cell format.
      if rich_strings[-1].respond_to?(:xf_index)
        xf = rich_strings.pop
      else
        xf = nil
      end

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      # Create a temp XML::Writer object and use it to write the rich string
      # XML to a string.
      writer = Package::XMLWriterSimple.new

      fragments, length = rich_strings_fragments(rich_strings)
      # can't allow 2 formats in a row
      return -4 unless fragments

      # If the first token is a string start the <r> element.
      writer.start_tag('r') if !fragments[0].respond_to?(:xf_index)

      # Write the XML elements for the format string fragments.
      fragments.each do |token|
        if token.respond_to?(:xf_index)
          # Write the font run.
          writer.start_tag('r')
          write_font(writer, token)
        else
          # Write the string fragment part, with whitespace handling.
          attributes = []

          attributes << 'xml:space' << 'preserve' if token =~ /^\s/ || token =~ /\s$/
          writer.data_element('t', token, attributes)
          writer.end_tag('r')
        end
      end

      # Add the XML string to the shared string table.
      index = shared_string_index(writer.string)

      store_data_to_table(StringCellData.new(self, row, col, index, xf))
    end

    #
    # :call-seq:
    #   write_blank(row, col, format)
    #
    # Write a blank cell to the specified row and column (zero indexed).
    # A blank cell is used to specify formatting without adding a string
    # or a number.
    #
    # A blank cell without a format serves no purpose. Therefore, we don't write
    # a BLANK record unless a format is specified. This is mainly an optimisation
    # for the write_row() and write_col() methods.
    #
    # Excel differentiates between an "Empty" cell and a "Blank" cell.
    # An "Empty" cell is a cell which doesn't contain data whilst a "Blank"
    # cell is a cell which doesn't contain data but does contain formatting.
    # Excel stores "Blank" cells but ignores "Empty" cells.
    #
    # As such, if you write an empty cell without formatting it is ignored:
    #
    #     worksheet.write('A1', nil, format )    # write_blank()
    #     worksheet.write('A2', nil )            # Ignored
    #
    # This seemingly uninteresting fact means that you can write arrays of
    # data without special treatment for nil or empty string values.
    #
    # See the note about "Cell notation".
    #
    def write_blank(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, xf = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col].include?(nil)

      # Don't write a blank cell unless it has a format
      return unless xf

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      store_data_to_table(BlankCellData.new(self, row, col,  nil, xf))
    end

    #
    # :call-seq:
    #   write_formula(row, column, formula [ , format [ , value ] ] )
    #
    # Write a formula or function to the cell specified by row and column:
    #
    #     worksheet.write_formula(0, 0, '=$B$3 + B4')
    #     worksheet.write_formula(1, 0, '=SIN(PI()/4)')
    #     worksheet.write_formula(2, 0, '=SUM(B1:B5)')
    #     worksheet.write_formula('A4', '=IF(A3>1,"Yes", "No")')
    #     worksheet.write_formula('A5', '=AVERAGE(1, 2, 3, 4)')
    #     worksheet.write_formula('A6', '=DATEVALUE("1-Jan-2001")')
    # Array formulas are also supported:
    #
    #     worksheet.write_formula('A7', '{=SUM(A1:B1*A2:B2)}')
    #
    # See also the write_array_formula() method.
    #
    # See the note about "Cell notation". For more information about
    # writing Excel formulas see "FORMULAS AND FUNCTIONS IN EXCEL"
    #
    # If required, it is also possible to specify the calculated value
    # of the formula. This is occasionally necessary when working with
    # non-Excel applications that don't calculate the value of the
    # formula. The calculated value is added at the end of the argument list:
    #
    #     worksheet.write('A1', '=2+2', format, 4)
    #
    # However, this probably isn't something that will ever need to do.
    # If you do use this feature then do so with care.
    #
    def write_formula(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, formula, format, value = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, formula].include?(nil)

      if formula =~ /^\{=.*\}$/
        write_array_formula(row, col, row, col, formula, format, value)
      else
        check_dimensions(row, col)
        store_row_col_max_min_values(row, col)
        formula.sub!(/^=/, '')

        store_data_to_table(FormulaCellData.new(self, row, col, formula, format, value))
      end
    end

    #
    # :call-seq:
    #   write_array_formula(row1, col1, row2, col2, formula [ , format [ , value ] ] )
    #
    # Write an array formula to the specified row and column (zero indexed).
    #
    # format is optional.
    #
    # In Excel an array formula is a formula that performs a calculation
    # on a set of values. It can return a single value or a range of values.
    #
    # An array formula is indicated by a pair of braces around the
    # formula: {=SUM(A1:B1*A2:B2)}. If the array formula returns a single
    # value then the first and last parameters should be the same:
    #
    #     worksheet.write_array_formula('A1:A1', '{=SUM(B1:C1*B2:C2)}')
    #
    # It this case however it is easier to just use the write_formula()
    # or write() methods:
    #
    #     # Same as above but more concise.
    #     worksheet.write('A1', '{=SUM(B1:C1*B2:C2)}')
    #     worksheet.write_formula('A1', '{=SUM(B1:C1*B2:C2)}')
    #
    # For array formulas that return a range of values you must specify
    # the range that the return values will be written to:
    #
    #     worksheet.write_array_formula('A1:A3',    '{=TREND(C1:C3,B1:B3)}')
    #     worksheet.write_array_formula(0, 0, 2, 0, '{=TREND(C1:C3,B1:B3)}')
    #
    # If required, it is also possible to specify the calculated value of
    # the formula. This is occasionally necessary when working with non-Excel
    # applications that don't calculate the value of the formula.
    # The calculated value is added at the end of the argument list:
    #
    #     worksheet.write_array_formula('A1:A3', '{=TREND(C1:C3,B1:B3)}', format, 105)
    #
    # In addition, some early versions of Excel 2007 don't calculate the
    # values of array formulas when they aren't supplied. Installing the
    # latest Office Service Pack should fix this issue.
    #
    # See also the array_formula.rb program in the examples directory of
    # the distro.
    #
    # Note: Array formulas are not supported by writeexcel gem.
    #
    def write_array_formula(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row1, col1, row2, col2, formula, xf, value = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row1, col1, row2, col2, formula].include?(nil)

      # Swap last row/col with first row/col as necessary
      row1, row2 = row2, row1 if row1 > row2
      col1, col2 = col2, col1 if col1 > col2

      # Check that row and col are valid and store max and min values
      check_dimensions(row2, col2)
      store_row_col_max_min_values(row2, col2)

      # Define array range
      if row1 == row2 && col1 == col2
        range = xl_rowcol_to_cell(row1, col1)
      else
        range ="#{xl_rowcol_to_cell(row1, col1)}:#{xl_rowcol_to_cell(row2, col2)}"
      end

      # Remove array formula braces and the leading =.
      formula.sub!(/^\{(.*)\}$/, '\1')
      formula.sub!(/^=/, '')

      store_data_to_table(FormulaArrayCellData.new(self, row1, col1, formula, xf, range, value))

      # Pad out the rest of the area with formatted zeroes.
      (row1..row2).each do |row|
        (col1..col2).each do |col|
          next if row == row1 && col == col1
          write_number(row, col, 0, xf)
        end
      end
    end

    # The outline_settings() method is used to control the appearance of
    # outlines in Excel. Outlines are described in "OUTLINES AND GROUPING IN EXCEL".
    #
    # The visible parameter is used to control whether or not outlines are
    # visible. Setting this parameter to 0 will cause all outlines on the
    # worksheet to be hidden. They can be unhidden in Excel by means of the
    # "Show Outline Symbols" command button. The default setting is 1 for
    # visible outlines.
    #
    #     worksheet.outline_settings(0)
    #
    # The symbols_below parameter is used to control whether the row outline
    # symbol will appear above or below the outline level bar. The default
    # setting is 1 for symbols to appear below the outline level bar.
    #
    # The symbols_right parameter is used to control whether the column
    # outline symbol will appear to the left or the right of the outline level
    # bar. The default setting is 1 for symbols to appear to the right of
    # the outline level bar.
    #
    # The auto_style parameter is used to control whether the automatic
    # outline generator in Excel uses automatic styles when creating an
    # outline. This has no effect on a file generated by WriteXLSX but it
    # does have an effect on how the worksheet behaves after it is created.
    # The default setting is 0 for "Automatic Styles" to be turned off.
    #
    # The default settings for all of these parameters correspond to Excel's
    # default parameters.
    #
    # The worksheet parameters controlled by outline_settings() are rarely used.
    #
    def outline_settings(visible = 1, symbols_below = 1, symbols_right = 1, auto_style = 0)
      @outline_on    = visible
      @outline_below = symbols_below
      @outline_right = symbols_right
      @outline_style = auto_style

      @outline_changed = 1
    end

    #
    # Deprecated. This is a writeexcel method that is no longer required
    # by WriteXLSX. See below.
    #
    def store_formula(string)
      string.split(/(\$?[A-I]?[A-Z]\$?\d+)/)
    end

    #
    # :call-seq:
    #   write_url(row, column, url [ , format, string, tool_tip ] )
    #
    # Write a hyperlink to a URL in the cell specified by row and column.
    # The hyperlink is comprised of two elements: the visible label and
    # the invisible link. The visible label is the same as the link unless
    # an alternative label is specified. The label parameter is optional.
    # The label is written using the write() method. Therefore it is
    # possible to write strings, numbers or formulas as labels.
    #
    # The hyperlink can be to a http, ftp, mail, internal sheet, or external
    # directory url.
    #
    # The format parameter is also optional, however, without a format
    # the link won't look like a format.
    #
    # The suggested format is:
    #
    #     format = workbook.add_format(:color => 'blue', :underline => 1)
    #
    # Note, this behaviour is different from writeexcel gem which
    # provides a default hyperlink format if one isn't specified
    # by the user.
    #
    # There are four web style URI's supported:
    # http://, https://, ftp:// and mailto::
    #
    #     worksheet.write_url(0, 0, 'ftp://www.ruby.org/',  format)
    #     worksheet.write_url(1, 0, 'http://www.ruby.com/', format, 'Ruby')
    #     worksheet.write_url('A3', 'http://www.ruby.com/', format)
    #     worksheet.write_url('A4', 'mailto:foo@bar.com', format)
    #
    # There are two local URIs supported: internal: and external:.
    # These are used for hyperlinks to internal worksheet references or
    # external workbook and worksheet references:
    #
    #     worksheet.write_url('A6',  'internal:Sheet2!A1',              format)
    #     worksheet.write_url('A7',  'internal:Sheet2!A1',              format)
    #     worksheet.write_url('A8',  'internal:Sheet2!A1:B2',           format)
    #     worksheet.write_url('A9',  %q{internal:'Sales Data'!A1},      format)
    #     worksheet.write_url('A10', 'external:c:\temp\foo.xlsx',       format)
    #     worksheet.write_url('A11', 'external:c:\foo.xlsx#Sheet2!A1',  format)
    #     worksheet.write_url('A12', 'external:..\foo.xlsx',            format)
    #     worksheet.write_url('A13', 'external:..\foo.xlsx#Sheet2!A1',  format)
    #     worksheet.write_url('A13', 'external:\\\\NET\share\foo.xlsx', format)
    #
    # All of the these URI types are recognised by the write() method, see above.
    #
    # Worksheet references are typically of the form Sheet1!A1. You can
    # also refer to a worksheet range using the standard Excel notation:
    # Sheet1!A1:B2.
    #
    # In external links the workbook and worksheet name must be separated
    # by the # character: external:Workbook.xlsx#Sheet1!A1'.
    #
    # You can also link to a named range in the target worksheet. For
    # example say you have a named range called my_name in the workbook
    # c:\temp\foo.xlsx you could link to it as follows:
    #
    #     worksheet.write_url('A14', 'external:c:\temp\foo.xlsx#my_name')
    #
    # Excel requires that worksheet names containing spaces or non
    # alphanumeric characters are single quoted as follows 'Sales Data'!A1.
    #
    def write_url(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, url, xf, str, tip = row_col_notation(args)
      xf, str = str, xf if str.respond_to?(:xf_index) || !xf.respond_to?(:xf_index)
      raise WriteXLSXInsufficientArgumentError if [row, col, url].include?(nil)

      link_type = 1

      # Remove the URI scheme from internal links.
      if url =~ /^internal:/
        url.sub!(/^internal:/, '')
        link_type = 2
      # Remove the URI scheme from external links.
      elsif url =~ /^external:/
        url.sub!(/^external:/, '')
        link_type = 3
      end

      # The displayed string defaults to the url string.
      str ||= url.dup

      # For external links change the directory separator from Unix to Dos.
      if link_type == 3
        url.gsub!(%r|/|, '\\')
        str.gsub!(%r|/|, '\\')
      end

      # Strip the mailto header.
      str.sub!(/^mailto:/, '')

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      # Store the URL displayed text in the shared string table.
      index = shared_string_index(str[0, STR_MAX])

      # External links to URLs and to other Excel workbooks have slightly
      # different characteristics that we have to account for.
      if link_type == 1
        # Substiture white space in url.
        url = url.sub(/[\s\x00]/, '%20')

        # Ordinary URL style external links don't have a "location" string.
        str = nil
      elsif link_type == 3
        # External Workbook links need to be modified into the right format.
        # The URL will look something like 'c:\temp\file.xlsx#Sheet!A1'.
        # We need the part to the left of the # as the URL and the part to
        # the right as the "location" string (if it exists).
        url, str = url.split(/#/)

        # Add the file:/// URI to the url if non-local.
        if url =~ %r![:]! ||        # Windows style "C:/" link.
            url =~ %r!^\\\\!        # Network share.
          url = "file:///#{url}"
        end

        # Convert a ./dir/file.xlsx link to dir/file.xlsx.
        url = url.sub(%r!^.\\!, '')

        # Treat as a default external link now that the data has been modified.
        link_type = 1
      end

      # Excel limits escaped URL to 255 characters.
      if url.bytesize > 255
        raise "URL '#{url}' > 255 characters, it exceeds Excel's limit for URLS."
      end

      # Check the limit of URLS per worksheet.
      @hlink_count += 1

      if @hlink_count > 65_530
        raise "URL '#{url}' added but number of URLS is over Excel's limit of 65,530 URLS per worksheet."
      end

      store_data_to_table(HyperlinkCellData.new(self, row, col, index, xf, link_type, url, str, tip))
    end

    #
    # :call-seq:
    #   write_date_time (row, col, date_string [ , format ] )
    #
    # Write a datetime string in ISO8601 "yyyy-mm-ddThh:mm:ss.ss" format as a
    # number representing an Excel date. format is optional.
    #
    # The write_date_time() method can be used to write a date or time
    # to the cell specified by row and column:
    #
    #     worksheet.write_date_time('A1', '2004-05-13T23:20', date_format)
    #
    # The date_string should be in the following format:
    #
    #     yyyy-mm-ddThh:mm:ss.sss
    #
    # This conforms to an ISO8601 date but it should be noted that the
    # full range of ISO8601 formats are not supported.
    #
    # The following variations on the date_string parameter are permitted:
    #
    #     yyyy-mm-ddThh:mm:ss.sss         # Standard format
    #     yyyy-mm-ddT                     # No time
    #               Thh:mm:ss.sss         # No date
    #     yyyy-mm-ddThh:mm:ss.sssZ        # Additional Z (but not time zones)
    #     yyyy-mm-ddThh:mm:ss             # No fractional seconds
    #     yyyy-mm-ddThh:mm                # No seconds
    #
    # Note that the T is required in all cases.
    #
    # A date should always have a format, otherwise it will appear
    # as a number, see "DATES AND TIME IN EXCEL" and "CELL FORMATTING".
    # Here is a typical example:
    #
    #     date_format = workbook.add_format(:num_format => 'mm/dd/yy')
    #     worksheet.write_date_time('A1', '2004-05-13T23:20', date_format)
    #
    # Valid dates should be in the range 1900-01-01 to 9999-12-31,
    # for the 1900 epoch and 1904-01-01 to 9999-12-31, for the 1904 epoch.
    # As with Excel, dates outside these ranges will be written as a string.
    #
    # See also the date_time.rb program in the examples directory of the distro.
    #
    def write_date_time(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      row, col, str, xf = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, str].include?(nil)

      # Check that row and col are valid and store max and min values
      check_dimensions(row, col)
      store_row_col_max_min_values(row, col)

      date_time = convert_date_time(str)

      if date_time
        store_data_to_table(NumberCellData.new(self, row, col, date_time, xf))
      else
        # If the date isn't valid then write it as a string.
        write_string(*args)
      end
    end

    #
    # :call-seq:
    #   insert_chart(row, column, chart [ , x, y, scale_x, scale_y ] )
    #
    # Insert a chart into a worksheet. The chart argument should be a Chart
    # object or else it is assumed to be a filename of an external binary file.
    # The latter is for backwards compatibility.
    #
    # This method can be used to insert a Chart object into a worksheet.
    # The Chart must be created by the add_chart() Workbook method and
    # it must have the embedded option set.
    #
    #     chart = workbook.add_chart(:type => 'line', :embedded => 1)
    #
    #     # Configure the chart.
    #     ...
    #
    #     # Insert the chart into the a worksheet.
    #     worksheet.insert_chart('E2', chart)
    #
    # See add_chart() for details on how to create the Chart object and
    # Writexlsx::Chart for details on how to configure it. See also the
    # chart_*.rb programs in the examples directory of the distro.
    #
    # The x, y, scale_x and scale_y parameters are optional.
    #
    # The parameters x and y can be used to specify an offset from the top
    # left hand corner of the cell specified by row and column. The offset
    # values are in pixels.
    #
    #     worksheet1.insert_chart('E2', chart, 3, 3)
    #
    # The parameters scale_x and scale_y can be used to scale the inserted
    # image horizontally and vertically:
    #
    #     # Scale the width by 120% and the height by 150%
    #     worksheet.insert_chart('E2', chart, 0, 0, 1.2, 1.5)
    #
    def insert_chart(*args)
      # Check for a cell reference in A1 notation and substitute row and column.
      row, col, chart, x_offset, y_offset, scale_x, scale_y = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, chart].include?(nil)

      x_offset ||= 0
      y_offset ||= 0
      scale_x  ||= 1
      scale_y  ||= 1

      raise "Not a Chart object in insert_chart()" unless chart.is_a?(Chart) || chart.is_a?(Chartsheet)
      raise "Not a embedded style Chart object in insert_chart()" if chart.respond_to?(:embedded) && chart.embedded == 0

      @charts << [row, col, chart, x_offset, y_offset, scale_x, scale_y]
    end

    #
    # :call-seq:
    #   insert_image(row, column, filename [ , x, y, scale_x, scale_y ] )
    #
    # Partially supported. Currently only works for 96 dpi images. This
    # will be fixed in an upcoming release.
    #--
    # This method can be used to insert a image into a worksheet. The image
    # can be in PNG, JPEG or BMP format. The x, y, scale_x and scale_y
    # parameters are optional.
    #
    #     worksheet1.insert_image('A1', 'ruby.bmp')
    #     worksheet2.insert_image('A1', '../images/ruby.bmp')
    #     worksheet3.insert_image('A1', '.c:\images\ruby.bmp')
    #
    # The parameters x and y can be used to specify an offset from the top
    # left hand corner of the cell specified by row and column. The offset
    # values are in pixels.
    #
    #     worksheet1.insert_image('A1', 'ruby.bmp', 32, 10)
    #
    # The offsets can be greater than the width or height of the underlying
    # cell. This can be occasionally useful if you wish to align two or more
    # images relative to the same cell.
    #
    # The parameters scale_x and scale_y can be used to scale the inserted
    # image horizontally and vertically:
    #
    #     # Scale the inserted image: width x 2.0, height x 0.8
    #     worksheet.insert_image('A1', 'perl.bmp', 0, 0, 2, 0.8)
    #
    # See also the images.rb program in the examples directory of the distro.
    #
    # Note: you must call set_row() or set_column() before insert_image()
    # if you wish to change the default dimensions of any of the rows or
    # columns that the image occupies. The height of a row can also change
    # if you use a font that is larger than the default. This in turn will
    # affect the scaling of your image. To avoid this you should explicitly
    # set the height of the row using set_row() if it contains a font size
    # that will change the row height.
    #
    # BMP images must be 24 bit, true colour, bitmaps. In general it is
    # best to avoid BMP images since they aren't compressed.
    #++
    #
    def insert_image(*args)
      # Check for a cell reference in A1 notation and substitute row and column.
      row, col, image, x_offset, y_offset, scale_x, scale_y = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col, image].include?(nil)

      x_offset ||= 0
      y_offset ||= 0
      scale_x  ||= 1
      scale_y  ||= 1

      @images << [row, col, image, x_offset, y_offset, scale_x, scale_y]
    end

    #
    # :call-seq:
    #   repeat_formula(row, column, formula [ , format ] )
    #
    # Deprecated. This is a writeexcel gem's method that is no longer
    # required by WriteXLSX.
    #
    # In writeexcel it was computationally expensive to write formulas
    # since they were parsed by a recursive descent parser. The store_formula()
    # and repeat_formula() methods were used as a way of avoiding the overhead
    # of repeated formulas by reusing a pre-parsed formula.
    #
    # In WriteXLSX this is no longer necessary since it is just as quick
    # to write a formula as it is to write a string or a number.
    #
    # The methods remain for backward compatibility but new WriteXLSX
    # programs shouldn't use them.
    #
    def repeat_formula(*args)
      # Check for a cell reference in A1 notation and substitute row and column.
      row, col, formula, format, *pairs = row_col_notation(args)
      raise WriteXLSXInsufficientArgumentError if [row, col].include?(nil)

      raise "Odd number of elements in pattern/replacement list" unless pairs.size % 2 == 0
      raise "Not a valid formula" unless formula.respond_to?(:to_ary)

      tokens  = formula.join("\t").split("\t")
      raise "No tokens in formula" if tokens.empty?

      value = nil
      if pairs[-2] == 'result'
        value = pairs.pop
        pairs.pop
      end
      while !pairs.empty?
        pattern = pairs.shift
        replace = pairs.shift

        tokens.each do |token|
          break if token.sub!(pattern, replace)
        end
      end
      formula = tokens.join('')
      write_formula(row, col, formula, format, value)
    end

    #
    # convert_date_time(date_time_string)
    #
    # The function takes a date and time in ISO8601 "yyyy-mm-ddThh:mm:ss.ss" format
    # and converts it to a decimal number representing a valid Excel date.
    #
    # Dates and times in Excel are represented by real numbers. The integer part of
    # the number stores the number of days since the epoch and the fractional part
    # stores the percentage of the day in seconds. The epoch can be either 1900 or
    # 1904.
    #
    # Parameter: Date and time string in one of the following formats:
    #               yyyy-mm-ddThh:mm:ss.ss  # Standard
    #               yyyy-mm-ddT             # Date only
    #                         Thh:mm:ss.ss  # Time only
    #
    # Returns:
    #            A decimal number representing a valid Excel date, or
    #            nil if the date is invalid.
    #
    def convert_date_time(date_time_string)       #:nodoc:
      date_time = date_time_string

      days      = 0 # Number of days since epoch
      seconds   = 0 # Time expressed as fraction of 24h hours in seconds

      # Strip leading and trailing whitespace.
      date_time.sub!(/^\s+/, '')
      date_time.sub!(/\s+$/, '')

      # Check for invalid date char.
      return nil if date_time =~ /[^0-9T:\-\.Z]/

      # Check for "T" after date or before time.
      return nil unless date_time =~ /\dT|T\d/

      # Strip trailing Z in ISO8601 date.
      date_time.sub!(/Z$/, '')

      # Split into date and time.
      date, time = date_time.split(/T/)

      # We allow the time portion of the input DateTime to be optional.
      if time
        # Match hh:mm:ss.sss+ where the seconds are optional
        if time =~ /^(\d\d):(\d\d)(:(\d\d(\.\d+)?))?/
          hour   = $1.to_i
          min    = $2.to_i
          sec    = $4.to_f || 0
        else
          return nil # Not a valid time format.
        end

        # Some boundary checks
        return nil if hour >= 24
        return nil if min  >= 60
        return nil if sec  >= 60

        # Excel expresses seconds as a fraction of the number in 24 hours.
        seconds = (hour * 60* 60 + min * 60 + sec) / (24.0 * 60 * 60)
      end

      # We allow the date portion of the input DateTime to be optional.
      return seconds if date == ''

      # Match date as yyyy-mm-dd.
      if date =~ /^(\d\d\d\d)-(\d\d)-(\d\d)$/
        year   = $1.to_i
        month  = $2.to_i
        day    = $3.to_i
      else
        return nil  # Not a valid date format.
      end

      # Set the epoch as 1900 or 1904. Defaults to 1900.
      # Special cases for Excel.
      unless date_1904?
        return      seconds if date == '1899-12-31' # Excel 1900 epoch
        return      seconds if date == '1900-01-00' # Excel 1900 epoch
        return 60 + seconds if date == '1900-02-29' # Excel false leapday
      end


      # We calculate the date by calculating the number of days since the epoch
      # and adjust for the number of leap days. We calculate the number of leap
      # days by normalising the year in relation to the epoch. Thus the year 2000
      # becomes 100 for 4 and 100 year leapdays and 400 for 400 year leapdays.
      #
      epoch   = date_1904? ? 1904 : 1900
      offset  = date_1904? ?    4 :    0
      norm    = 300
      range   = year - epoch

      # Set month days and check for leap year.
      mdays   = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31]
      leap    = 0
      leap    = 1  if year % 4 == 0 && year % 100 != 0 || year % 400 == 0
      mdays[1]   = 29 if leap != 0

      # Some boundary checks
      return nil if year  < epoch or year  > 9999
      return nil if month < 1     or month > 12
      return nil if day   < 1     or day   > mdays[month - 1]

      # Accumulate the number of days since the epoch.
      days = day                               # Add days for current month
      (0 .. month-2).each do |m|
        days += mdays[m]                      # Add days for past months
      end
      days += range * 365                      # Add days for past years
      days += ((range)                /  4)    # Add leapdays
      days -= ((range + offset)       /100)    # Subtract 100 year leapdays
      days += ((range + offset + norm)/400)    # Add 400 year leapdays
      days -= leap                             # Already counted above

      # Adjust for Excel erroneously treating 1900 as a leap year.
      days += 1 if !date_1904? and days > 59

      date_time = sprintf("%0.10f", days + seconds)
      date_time = date_time.sub(/\.?0+$/, '') if date_time =~ /\./
      if date_time =~ /\./
        date_time.to_f
      else
        date_time.to_i
      end
    end

    #
    # :call-seq:
    #   set_row(row [ , height, format, hidden, level, collapsed ] )
    #
    # This method can be used to change the default properties of a row.
    # All parameters apart from row are optional.
    #
    # The most common use for this method is to change the height of a row:
    #
    #     worksheet.set_row(0, 20)    # Row 1 height set to 20
    #
    # If you wish to set the format without changing the height you can
    # pass nil as the height parameter:
    #
    #     worksheet.set_row(0, nil, format)
    #
    # The format parameter will be applied to any cells in the row that
    # don't have a format. For example
    #
    #     worksheet.set_row(0, nil, format1)      # Set the format for row 1
    #     worksheet.write('A1', 'Hello')          # Defaults to format1
    #     worksheet.write('B1', 'Hello', format2) # Keeps format2
    #
    # If you wish to define a row format in this way you should call the
    # method before any calls to write(). Calling it afterwards will overwrite
    # any format that was previously specified.
    #
    # The hidden parameter should be set to 1 if you wish to hide a row.
    # This can be used, for example, to hide intermediary steps in a
    # complicated calculation:
    #
    #     worksheet.set_row(0, 20,  format, 1)
    #     worksheet.set_row(1, nil, nil,    1)
    #
    # The level parameter is used to set the outline level of the row.
    # Outlines are described in "OUTLINES AND GROUPING IN EXCEL". Adjacent
    # rows with the same outline level are grouped together into a single
    # outline.
    #
    # The following example sets an outline level of 1 for rows 1
    # and 2 (zero-indexed):
    #
    #     worksheet.set_row(1, nil, nil, 0, 1)
    #     worksheet.set_row(2, nil, nil, 0, 1)
    #
    # The hidden parameter can also be used to hide collapsed outlined rows
    # when used in conjunction with the level parameter.
    #
    #     worksheet.set_row(1, nil, nil, 1, 1)
    #     worksheet.set_row(2, nil, nil, 1, 1)
    #
    # For collapsed outlines you should also indicate which row has the
    # collapsed + symbol using the optional collapsed parameter.
    #
    #     worksheet.set_row(3, nil, nil, 0, 0, 1)
    #
    # For a more complete example see the outline.rb and outline_collapsed.rb
    # programs in the examples directory of the distro.
    #
    # Excel allows up to 7 outline levels. Therefore the level parameter
    # should be in the range 0 <= level <= 7.
    #
    def set_row(*args)
      row = args[0]
      height = args[1] || 15
      xf     = args[2]
      hidden = args[3] || 0
      level  = args[4] || 0
      collapsed = args[5] || 0

      return if row.nil?

      # Use min col in check_dimensions. Default to 0 if undefined.
      min_col = @dim_colmin || 0

      # Check that row and col are valid and store max and min values.
      check_dimensions(row, min_col)
      store_row_col_max_min_values(row, min_col)

      # If the height is 0 the row is hidden and the height is the default.
      if height == 0
        hidden = 1
        height = 15
      end

      # Set the limits for the outline levels (0 <= x <= 7).
      level = 0 if level < 0
      level = 7 if level > 7

      @outline_row_level = level if level > @outline_row_level

      # Store the row properties.
      @set_rows[row] = [height, xf, hidden, level, collapsed]

      # Store the row change to allow optimisations.
      @row_size_changed = true

      # Store the row sizes for use when calculating image vertices.
      @row_sizes[row] = height
    end

    #
    # merge_range(first_row, first_col, last_row, last_col, string, format)
    #
    # Merge a range of cells. The first cell should contain the data and the others
    # should be blank. All cells should contain the same format.
    #
    def merge_range(*args)
      row_first, col_first, row_last, col_last, string, format, *extra_args = row_col_notation(args)

      raise "Incorrect number of arguments" if [row_first, col_first, row_last, col_last, format].include?(nil)
      raise "Fifth parameter must be a format object" unless format.respond_to?(:xf_index)
      raise "Can't merge single cell" if row_first == row_last && col_first == col_last

      # Swap last row/col with first row/col as necessary
      row_first,  row_last  = row_last,  row_first  if row_first > row_last
      col_first, col_last = col_last, col_first if col_first > col_last

      # Check that column number is valid and store the max value
      check_dimensions(row_last, col_last)
      store_row_col_max_min_values(row_last, col_last)

      # Store the merge range.
      @merge << [row_first, col_first, row_last, col_last]

      # Write the first cell
      write(row_first, col_first, string, format, *extra_args)

      # Pad out the rest of the area with formatted blank cells.
      write_formatted_blank_to_area(row_first, row_last, col_first, col_last, format)
    end

    #
    # Same as merge_range() above except the type of write() is specified.
    #
    def merge_range_type(type, *args)
      case type
      when 'array_formula', 'blank', 'rich_string'
        row_first, col_first, row_last, col_last, *others = row_col_notation(args)
        format = others.pop
      else
        row_first, col_first, row_last, col_last, token, format, *others = row_col_notation(args)
      end

      raise "Format object missing or in an incorrect position" unless format.respond_to?(:xf_index)
      raise "Can't merge single cell" if row_first == row_last && col_first == col_last

      # Swap last row/col with first row/col as necessary
      row_first, row_last = row_last, row_first if row_first > row_last
      col_first, col_last = col_last, col_first if col_first > col_last

      # Check that column number is valid and store the max value
      check_dimensions(row_last, col_last)
      store_row_col_max_min_values(row_last, col_last)

      # Store the merge range.
      @merge << [row_first, col_first, row_last, col_last]

      # Write the first cell
      case type
      when 'blank', 'rich_string', 'array_formula'
        others << format
      end

      if type == 'string'
        write_string(row_first, col_first, token, format, *others)
      elsif type == 'number'
        write_number(row_first, col_first, token, format, *others)
      elsif type == 'blank'
        write_blank(row_first, col_first, *others)
      elsif type == 'date_time'
        write_date_time(row_first, col_first, token, format, *others)
      elsif type == 'rich_string'
        write_rich_string(row_first, col_first, *others)
      elsif type == 'url'
        write_url(row_first, col_first, token, format, *others)
      elsif type == 'formula'
        write_formula(row_first, col_first, token, format, *others)
      elsif type == 'array_formula'
        write_formula_array(row_first, col_first, *others)
      else
        raise "Unknown type '#{type}'"
      end

      # Pad out the rest of the area with formatted blank cells.
      write_formatted_blank_to_area(row_first, row_last, col_first, col_last, format)
    end

    #
    # :call-seq:
    #   conditional_formatting(cell_or_cell_range, options)
    #
    # This method handles the interface to Excel conditional formatting.
    #
    # We allow the format to be called on one cell or a range of cells. The
    # hashref contains the formatting parameters and must be the last param:
    #
    #    conditional_formatting(row, col, {...})
    #    conditional_formatting(first_row, first_col, last_row, last_col, {...})
    #
    # The conditional_format() method is used to add formatting to a cell
    # or range of cells based on user defined criteria.
    #
    #     worksheet.conditional_formatting('A1:J10',
    #         {
    #             :type     => 'cell',
    #             :criteria => '>=',
    #             :value    => 50,
    #             :format   => format1
    #         }
    #     )
    #
    # This method contains a lot of parameters and is described in detail in
    # a separate section "CONDITIONAL FORMATTING IN EXCEL".
    #
    # See also the conditional_format.rb program in the examples directory of the distro
    #
    def conditional_formatting(*args)
      # Check for a cell reference in A1 notation and substitute row and column
      if args[0] =~ /^\D/
        # Check for a user defined multiple range like B3:K6,B8:K11.
        user_range = args[0].gsub(/\s*,\s*/, ' ').gsub(/\$/, '') if args[0] =~ /,/
      end
      row1, col1, row2, col2, param = row_col_notation(args)
      if row2.respond_to?(:keys)
        param = row2
        row2, col2 = row1, col1
      end
      raise WriteXLSXInsufficientArgumentError if [row1, col1, row2, col2, param].include?(nil)

      # Check that row and col are valid without storing the values.
      check_dimensions(row1, col1)
      check_dimensions(row2, col2)
      check_conditional_formatting_parameters(param)

      # Swap last row/col for first row/col as necessary
      row1, row2 = row2, row1 if row1 > row2
      col1, col2 = col2, col1 if col1 > col2

      # If the first and last cell are the same write a single cell.
      if row1 == row2 && col1 == col2
        range = xl_rowcol_to_cell(row1, col1)
        start_cell = range
      else
        range = xl_range(row1, row2, col1, col2)
        start_cell = xl_rowcol_to_cell(row1, col1)
      end

      # Override with user defined multiple range if provided.
      range = user_range if user_range

      param[:format] = param[:format].get_dxf_index if param[:format]
      param[:priority] = @dxf_priority
      @dxf_priority += 1

      # Special handling of text criteria.
      if param[:type] == 'text'
        case param[:criteria]
        when 'containsText'
          param[:type]    = 'containsText';
          param[:formula] = %Q!NOT(ISERROR(SEARCH("#{param[:value]}",#{start_cell})))!
        when 'notContains'
          param[:type]    = 'notContainsText';
          param[:formula] = %Q!ISERROR(SEARCH("#{param[:value]}",#{start_cell}))!
        when 'beginsWith'
          param[:type] = 'beginsWith'
          param[:formula] =
            %Q!LEFT(#{start_cell},#{param[:value].size})="#{param[:value]}"!
        when 'endsWith'
          param[:type] = 'endsWith'
          param[:formula] =
            %Q!RIGHT(#{start_cell},#{param[:value].size})="#{param[:value]}"!
        else
          raise "Invalid text criteria '#{param[:criteria]} in conditional_formatting()"
        end
      end

      # Special handling of time time_period criteria.
      if param[:type] == 'timePeriod'
        case param[:criteria]
        when 'yesterday'
            param[:formula] = "FLOOR(#{start_cell},1)=TODAY()-1"
        when 'today'
            param[:formula] = "FLOOR(#{start_cell},1)=TODAY()"
        when 'tomorrow'
            param[:formula] = "FLOOR(#{start_cell},1)=TODAY()+1"
        when 'last7Days'
          param[:formula] =
            "AND(TODAY()-FLOOR(#{start_cell},1)<=6,FLOOR(#{start_cell},1)<=TODAY())"
        when 'lastWeek'
            param[:formula] =
              "AND(TODAY()-ROUNDDOWN(#{start_cell},0)>=(WEEKDAY(TODAY())),TODAY()-ROUNDDOWN(#{start_cell},0)<(WEEKDAY(TODAY())+7))"
        when 'thisWeek'
            param[:formula] =
              "AND(TODAY()-ROUNDDOWN(#{start_cell},0)<=WEEKDAY(TODAY())-1,ROUNDDOWN(#{start_cell},0)-TODAY()<=7-WEEKDAY(TODAY()))"
        when 'nextWeek'
            param[:formula] =
              "AND(ROUNDDOWN(#{start_cell},0)-TODAY()>(7-WEEKDAY(TODAY())),ROUNDDOWN(#{start_cell},0)-TODAY()<(15-WEEKDAY(TODAY())))"
        when 'lastMonth'
            param[:formula] =
              "AND(MONTH(#{start_cell})=MONTH(TODAY())-1,OR(YEAR(#{start_cell})=YEAR(TODAY()),AND(MONTH(#{start_cell})=1,YEAR(A1)=YEAR(TODAY())-1)))"
        when 'thisMonth'
            param[:formula] =
              "AND(MONTH(#{start_cell})=MONTH(TODAY()),YEAR(#{start_cell})=YEAR(TODAY()))"
        when 'nextMonth'
            param[:formula] =
              "AND(MONTH(#{start_cell})=MONTH(TODAY())+1,OR(YEAR(#{start_cell})=YEAR(TODAY()),AND(MONTH(#{start_cell})=12,YEAR(#{start_cell})=YEAR(TODAY())+1)))"
        else
            raise "Invalid time_period criteria '#{param[:criteria]}' in conditional_formatting()"
        end
      end

      # Special handling of blanks/error types.
      case param[:type]
      when 'containsBlanks'
        param[:formula] = "LEN(TRIM(#{start_cell}))=0"
      when 'notContainsBlanks'
        param[:formula] = "LEN(TRIM(#{start_cell}))>0"
      when 'containsErrors'
        param[:formula] = "ISERROR(#{start_cell})"
      when 'notContainsErrors'
        param[:formula] = "NOT(ISERROR(#{start_cell}))"
      when '2_color_scale'
        param[:type] = 'colorScale'

        # Color scales don't use any additional formatting.
        param[:format] = nil

        # Turn off 3 color parameters.
        param[:mid_type]  = nil
        param[:mid_color] = nil

        param[:min_type]  ||= 'min'
        param[:max_type]  ||= 'max'
        param[:min_value] ||= 0
        param[:max_value] ||= 0
        param[:min_color] ||= '#FF7128'
        param[:max_color] ||= '#FFEF9C'

        param[:max_color] = get_palette_color( param[:max_color] )
        param[:min_color] = get_palette_color( param[:min_color] )
      when '3_color_scale'
        param[:type] = 'colorScale'

        # Color scales don't use any additional formatting.
        param[:format] = nil

        param[:min_type]  ||= 'min'
        param[:mid_type]  ||= 'percentile'
        param[:max_type]  ||= 'max'
        param[:min_value] ||= 0
        param[:mid_value] ||= 50
        param[:max_value] ||= 0
        param[:min_color] ||= '#F8696B'
        param[:mid_color] ||= '#FFEB84'
        param[:max_color] ||= '#63BE7B'

        param[:max_color] = get_palette_color(param[:max_color])
        param[:mid_color] = get_palette_color(param[:mid_color])
        param[:min_color] = get_palette_color(param[:min_color])
      when 'dataBar'
        # Color scales don't use any additional formatting.
        param[:format] = nil

        param[:min_type]  ||= 'min'
        param[:max_type]  ||= 'max'
        param[:min_value] ||= 0
        param[:max_value] ||= 0
        param[:bar_color] ||= '#638EC6'

        param[:bar_color] = get_palette_color(param[:bar_color])
      end

      # Store the validation information until we close the worksheet.
      @cond_formats[range] ||= []
      @cond_formats[range] << param
    end

    #
    # Add an Excel table to a worksheet.
    #
    # The add_table() method is used to group a range of cells into
    # an Excel Table.
    #
    #   worksheet.add_table('B3:F7', { ... } )
    #
    # This method contains a lot of parameters and is described
    # in detail in a separate section "TABLES IN EXCEL".
    #
    # See also the tables.rb program in the examples directory of the distro
    #
    def add_table(*args)
      col_formats = []
=begin
      # We would need to order the write statements very carefully within this
      # function to support optimisation mode. Disable add_table() when it is
      # on for now.
      if @optimization
        carp "add_table() isn't supported when set_optimization() is on"
        return -1
      end
=end
      # Check for a cell reference in A1 notation and substitute row and column
      row1, col1, row2, col2, param = row_col_notation(args)

      # Check for a valid number of args.
      raise "Not enough parameters to add_table()" if [row1, col1, row2, col2].include?(nil)

      # Check that row and col are valid without storing the values.
      check_dimensions_and_update_max_min_values(row1, col1, 1, 1)
      check_dimensions_and_update_max_min_values(row2, col2, 1, 1)

      # The final hashref contains the validation parameters.
      param ||= {}

      check_parameter(param, valid_table_parameter, 'add_table')

      # Table count is a member of Workbook, global to all Worksheet.
      @workbook.table_count += 1
      table = {}
      table[:_columns] = []
      table[:id] = @workbook.table_count

      # Turn on Excel's defaults.
      param[:banded_rows] ||= 1
      param[:header_row]  ||= 1
      param[:autofilter]  ||= 1

      # Set the table options.
      table[:_show_first_col]   = ptrue?(param[:first_column])   ? 1 : 0
      table[:_show_last_col]    = ptrue?(param[:last_column])    ? 1 : 0
      table[:_show_row_stripes] = ptrue?(param[:banded_rows])    ? 1 : 0
      table[:_show_col_stripes] = ptrue?(param[:banded_columns]) ? 1 : 0
      table[:_header_row_count] = ptrue?(param[:header_row])     ? 1 : 0
      table[:_totals_row_shown] = ptrue?(param[:total_row])      ? 1 : 0

      # Set the table name.
      if param[:name]
        table[:_name] = param[:name]
      else
        # Set a default name.
        table[:_name] = "Table#{table[:id]}"
      end

      # Set the table style.
      if param[:style]
        table[:_style] = param[:style]
        # Remove whitespace from style name.
        table[:_style].gsub!(/\s/, '')
      else
        table[:_style] = "TableStyleMedium9"
      end

      # Swap last row/col for first row/col as necessary.
      row1, row2 = row2, row1 if row1 > row2
      col1, col2 = col2, col1 if col1 > col2

      # Set the data range rows (without the header and footer).
      first_data_row = row1
      last_data_row  = row2
      first_data_row += 1 if param[:header_row] != 0
      last_data_row  -= 1 if param[:total_row]

      # Set the table and autofilter ranges.
      table[:_range]   = xl_range(row1, row2,          col1, col2)
      table[:_a_range] = xl_range(row1, last_data_row, col1, col2)

      # If the header row if off the default is to turn autofilter off.
      param[:autofilter] = 0 if param[:header_row] == 0

      # Set the autofilter range.
      if param[:autofilter] && param[:autofilter] != 0
        table[:_autofilter] = table[:_a_range]
      end

      # Add the table columns.
      col_id = 1
      (col1..col2).each do |col_num|
        # Set up the default column data.
        col_data = {
            :_id             => col_id,
            :_name           => "Column#{col_id}",
            :_total_string   => '',
            :_total_function => '',
            :_formula        => '',
            :_format         => nil
        }

        # Overwrite the defaults with any use defined values.
        if param[:columns]
          # Check if there are user defined values for this column.
          if user_data = param[:columns][col_id - 1]
            # Map user defined values to internal values.
            if user_data[:header] && !user_data[:header].empty?
              col_data[:_name] = user_data[:header]
            end
            # Handle the column formula.
            if user_data[:formula]
              formula = user_data[:formula]
              # Remove the leading = from formula.
              formula.sub!(/^=/, '')
              # Covert Excel 2010 "@" ref to 2007 "#This Row".
              formula.gsub!(/@/,'[#This Row],')

              col_data[:_formula] = formula

              (first_data_row..last_data_row).each do |row|
                write_formula(row, col_num, formula, user_data[:format])
              end
            end

            # Handle the function for the total row.
            if user_data[:total_function]
              function = user_data[:total_function]

              # Massage the function name.
              function = function.downcase
              function.gsub!(/_/, '')
              function.gsub!(/\s/,'')

              function = 'countNums' if function == 'countnums'
              function = 'stdDev'    if function == 'stddev'

              col_data[:_total_function] = function

              formula = table_function_to_formula(function, col_data[:_name])
              write_formula(row2, col_num, formula, user_data[:format])
            elsif user_data[:total_string]
              # Total label only (not a function).
              total_string = user_data[:total_string]
              col_data[:_total_string] = total_string

              write_string(row2, col_num, total_string, user_data[:format])
            end

            # Get the dxf format index.
            if user_data[:format]
              col_data[:_format] = user_data[:format].get_dxf_index
            end

            # Store the column format for writing the cell data.
            # It doesn't matter if it is undefined.
            col_formats[col_id - 1] = user_data[:format]
          end
        end

        # Store the column data.
        table[:_columns] << col_data

        # Write the column headers to the worksheet.
        if param[:header_row] != 0
          write_string(row1, col_num, col_data[:_name])
        end

        col_id += 1
      end    # Table columns.

      # Write the cell data if supplied.
      if data = param[:data]

        i = 0    # For indexing the row data.
        (first_data_row..last_data_row).each do |row|
          next unless data[i]

          j = 0    # For indexing the col data.
          (col1..col2).each do |col|
            token = data[i][j]
            write(row, col, token, col_formats[j]) if token
            j += 1
          end
          i += 1
        end
      end

      # Store the table data.
      @tables << table

      # Store the link used for the rels file.
      @external_table_links << ['/table', "../tables/table#{table[:id]}.xml"]

      return table
    end

    # List of valid input parameters.
    def valid_table_parameter
      [
        :autofilter,
        :banded_columns,
        :banded_rows,
        :columns,
        :data,
        :first_column,
        :header_row,
        :last_column,
        :name,
        :style,
       :total_row
       ]
    end
    private :valid_table_parameter

    #
    # Add sparklines to the worksheet.
    #
    def add_sparkline(param)
      sparkline = {}

      # Check for valid input parameters.
      param.each_key do |k|
        unless valid_sparkline_parameter[k]
          raise "Unknown parameter '#{k}' in add_sparkline()"
        end
      end
      [:location, :range].each do |required_key|
        unless param[required_key]
          raise "Parameter '#{required_key}' is required in add_sparkline()"
        end
      end

      # Handle the sparkline type.
      type = param[:type] || 'line'
      unless ['line', 'column', 'win_loss'].include?(type)
        raise "Parameter ':type' must be 'line', 'column' or 'win_loss' in add_sparkline()"
      end
      type = 'stacked' if type == 'win_loss'
      sparkline[:_type] = type

      # We handle single location/range values or array refs of values.
      sparkline[:_locations] = [param[:location]].flatten
      sparkline[:_ranges]    = [param[:range]].flatten

      if sparkline[:_ranges].size != sparkline[:_locations].size
        raise "Must have the same number of location and range parameters in add_sparkline()"
      end

      # Store the count.
      sparkline[:_count] = sparkline[:_locations].size

      # Get the worksheet name for the range conversion below.
      sheetname = quote_sheetname(@name)

      # Cleanup the input ranges.
      sparkline[:_ranges].collect! do |range|
        # Remove the absolute reference $ symbols.
        range = range.gsub(/\$/, '')
        # Convert a simiple range into a full Sheet1!A1:D1 range.
        range = "#{sheetname}!#{range}" unless range =~ /!/
        range
      end

      # Cleanup the input locations.
      sparkline[:_locations].collect! { |location| location.gsub(/\$/, '') }

      # Map options.
      sparkline[:_high]      = param[:high_point]
      sparkline[:_low]       = param[:low_point]
      sparkline[:_negative]  = param[:negative_points]
      sparkline[:_first]     = param[:first_point]
      sparkline[:_last]      = param[:last_point]
      sparkline[:_markers]   = param[:markers]
      sparkline[:_min]       = param[:min]
      sparkline[:_max]       = param[:max]
      sparkline[:_axis]      = param[:axis]
      sparkline[:_reverse]   = param[:reverse]
      sparkline[:_hidden]    = param[:show_hidden]
      sparkline[:_weight]    = param[:weight]

      # Map empty cells options.
      empty = param[:empty_cells] || ''
      sparkline[:_empty] = case empty
      when 'zero'
        0
      when 'connect'
        'span'
      else
        'gap'
      end

      # Map the date axis range.
      date_range = param[:date_axis]
      if ptrue?(date_range) && !(date_range =~ /!/)
        date_range = "#{sheetname}!#{date_range}"
      end
      sparkline[:_date_axis] = date_range

      # Set the sparkline styles.
      style_id = param[:style] || 0
      style = spark_styles[style_id]

      sparkline[:_series_color]   = style[:series]
      sparkline[:_negative_color] = style[:negative]
      sparkline[:_markers_color]  = style[:markers]
      sparkline[:_first_color]    = style[:first]
      sparkline[:_last_color]     = style[:last]
      sparkline[:_high_color]     = style[:high]
      sparkline[:_low_color]      = style[:low]

      # Override the style colours with user defined colors.
      set_spark_color(sparkline, param, :series_color)
      set_spark_color(sparkline, param, :negative_color)
      set_spark_color(sparkline, param, :markers_color)
      set_spark_color(sparkline, param, :first_color)
      set_spark_color(sparkline, param, :last_color)
      set_spark_color(sparkline, param, :high_color)
      set_spark_color(sparkline, param, :low_color)

      @sparklines << sparkline
    end

    #
    # :call-seq:
    #   data_validation(cell_or_cell_range, options)
    #
    # Data validation is a feature of Excel which allows you to restrict
    # the data that a users enters in a cell and to display help and
    # warning messages. It also allows you to restrict input to values
    # in a drop down list.
    #
    # A typical use case might be to restrict data in a cell to integer
    # values in a certain range, to provide a help message to indicate
    # the required value and to issue a warning if the input data doesn't
    # meet the stated criteria. In WriteXLSX we could do that as follows:
    #
    #     worksheet.data_validation('B3',
    #         {
    #             :validate        => 'integer',
    #             :criteria        => 'between',
    #             :minimum         => 1,
    #             :maximum         => 100,
    #             :input_title     => 'Input an integer:',
    #             :input_message   => 'Between 1 and 100',
    #             :error_message   => 'Sorry, try again.'
    #         })
    #
    # For more information on data validation see the following Microsoft
    # support article "Description and examples of data validation in Excel":
    # http://support.microsoft.com/kb/211485.
    #
    # The following sections describe how to use the data_validation()
    # method and its various options.
    #
    # The data_validation() method is used to construct an Excel
    # data validation.
    #
    # It can be applied to a single cell or a range of cells. You can pass
    # 3 parameters such as (row, col, {...})
    # or 5 parameters such as (first_row, first_col, last_row, last_col, {...}).
    # You can also use A1 style notation. For example:
    #
    #     worksheet.data_validation( 0, 0,       {...} )
    #     worksheet.data_validation( 0, 0, 4, 1, {...} )
    #
    #     # Which are the same as:
    #
    #     worksheet.data_validation( 'A1',       {...} )
    #     worksheet.data_validation( 'A1:B5',    {...} )
    # See also the note about "Cell notation" for more information.
    #
    # The last parameter in data_validation() must be a hash ref containing
    # the parameters that describe the type and style of the data validation.
    # The allowable parameters are:
    #
    #     :validate
    #     :criteria
    #     :value | minimum | source
    #     :maximum
    #     :ignore_blank
    #     :dropdown
    #
    #     :input_title
    #     :input_message
    #     :show_input
    #
    #     :error_title
    #     :error_message
    #     :error_type
    #     :show_error
    #
    # These parameters are explained in the following sections. Most of
    # the parameters are optional, however, you will generally require
    # the three main options validate, criteria and value.
    #
    #     worksheet.data_validation('B3',
    #         {
    #             :validate => 'integer',
    #             :criteria => '>',
    #             :value    => 100
    #         })
    #
    # ===validate
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The validate parameter is used to set the type of data that you wish
    # to validate. It is always required and it has no default value.
    # Allowable values are:
    #
    #     :any
    #     :integer
    #     :decimal
    #     :list
    #     :date
    #     :time
    #     :length
    #     :custom
    #
    # :any is used to specify that the type of data is unrestricted.
    # This is the same as not applying a data validation. It is only
    # provided for completeness and isn't used very often in the
    # context of WriteXLSX.
    #
    # :integer restricts the cell to integer values. Excel refers to this
    # as 'whole number'.
    #     :validate => 'integer',
    #     :criteria => '>',
    #     :value    => 100,
    # :decimal restricts the cell to decimal values.
    #     :validate => 'decimal',
    #     :criteria => '>',
    #     :value    => 38.6,
    # :list restricts the cell to a set of user specified values. These
    # can be passed in an array ref or as a cell range (named ranges aren't
    # currently supported):
    #     :validate => 'list',
    #     :value    => ['open', 'high', 'close'],
    #     # Or like this:
    #     :value    => 'B1:B3',
    # Excel requires that range references are only to cells on the same
    # worksheet.
    #
    # :date restricts the cell to date values. Dates in Excel are expressed
    # as integer values but you can also pass an ISO860 style string as used
    # in write_date_time(). See also "DATES AND TIME IN EXCEL" for more
    # information about working with Excel's dates.
    #     :validate => 'date',
    #     :criteria => '>',
    #     :value    => 39653, # 24 July 2008
    #     # Or like this:
    #     :value    => '2008-07-24T',
    # :time restricts the cell to time values. Times in Excel are expressed
    # as decimal values but you can also pass an ISO860 style string as used
    # in write_date_time(). See also "DATES AND TIME IN EXCEL" for more
    # information about working with Excel's times.
    #     :validate => 'time',
    #     :criteria => '>',
    #     :value    => 0.5, # Noon
    #     # Or like this:
    #     :value    => 'T12:00:00',
    # :length restricts the cell data based on an integer string length.
    # Excel refers to this as 'Text length'.
    #     :validate => 'length',
    #     :criteria => '>',
    #     :value    => 10,
    # :custom restricts the cell based on an external Excel formula
    # that returns a TRUE/FALSE value.
    #     :validate => 'custom',
    #     :value    => '=IF(A10>B10,TRUE,FALSE)',
    # ===criteria
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The criteria parameter is used to set the criteria by which the data
    # in the cell is validated. It is almost always required except for
    # the list and custom validate options. It has no default value.
    # Allowable values are:
    #
    #     'between'
    #     'not between'
    #     'equal to'                  |  '=='  |  '='
    #     'not equal to'              |  '!='  |  '<>'
    #     'greater than'              |  '>'
    #     'less than'                 |  '<'
    #     'greater than or equal to'  |  '>='
    #     'less than or equal to'     |  '<='
    #
    # You can either use Excel's textual description strings, in the first
    # column above, or the more common symbolic alternatives. The following
    # are equivalent:
    #
    #     :validate => 'integer',
    #     :criteria => 'greater than',
    #     :value    => 100,
    #
    #     :validate => 'integer',
    #     :criteria => '>',
    #     :value    => 100,
    #
    # The list and custom validate options don't require a criteria.
    # If you specify one it will be ignored.
    #
    #     :validate => 'list',
    #     :value    => ['open', 'high', 'close'],
    #
    #     :validate => 'custom',
    #     :value    => '=IF(A10>B10,TRUE,FALSE)',
    # ===value | minimum | source
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The value parameter is used to set the limiting value to which the
    # criteria is applied. It is always required and it has no default value.
    # You can also use the synonyms minimum or source to make the validation
    # a little clearer and closer to Excel's description of the parameter:
    #
    #     # Use 'value'
    #     :validate => 'integer',
    #     :criteria => '>',
    #     :value    => 100,
    #
    #     # Use 'minimum'
    #     :validate => 'integer',
    #     :criteria => 'between',
    #     :minimum  => 1,
    #     :maximum  => 100,
    #
    #     # Use 'source'
    #     :validate => 'list',
    #     :source   => '$B$1:$B$3',
    # ===maximum
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The maximum parameter is used to set the upper limiting value when
    # the criteria is either 'between' or 'not between':
    #
    #     :validate => 'integer',
    #     :criteria => 'between',
    #     :minimum  => 1,
    #     :maximum  => 100,
    # ===ignore_blank
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The ignore_blank parameter is used to toggle on and off the
    # 'Ignore blank' option in the Excel data validation dialog. When the
    # option is on the data validation is not applied to blank data in the
    # cell. It is on by default.
    #
    #     :ignore_blank => 0,  # Turn the option off
    # ===dropdown
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The dropdown parameter is used to toggle on and off the
    # 'In-cell dropdown' option in the Excel data validation dialog.
    # When the option is on a dropdown list will be shown for list validations.
    # It is on by default.
    #
    #     :dropdown => 0,      # Turn the option off
    # ===input_title
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The input_title parameter is used to set the title of the input
    # message that is displayed when a cell is entered. It has no default
    # value and is only displayed if the input message is displayed.
    # See the input_message parameter below.
    #
    #     :input_title   => 'This is the input title',
    # The maximum title length is 32 characters.
    #
    # ===input_message
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The input_message parameter is used to set the input message that
    # is displayed when a cell is entered. It has no default value.
    #
    #     :validate      => 'integer',
    #     :criteria      => 'between',
    #     :minimum       => 1,
    #     :maximum       => 100,
    #     :input_title   => 'Enter the applied discount:',
    #     :input_message => 'between 1 and 100',
    #
    # The message can be split over several lines using newlines, "\n" in
    # double quoted strings.
    #
    #     input_message => "This is\na test.",
    #
    # The maximum message length is 255 characters.
    #
    # ===show_input
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The show_input parameter is used to toggle on and off the 'Show input
    # message when cell is selected' option in the Excel data validation
    # dialog. When the option is off an input message is not displayed even
    # if it has been set using input_message. It is on by default.
    #
    #     :show_input => 0,      # Turn the option off
    #
    # ===error_title
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The error_title parameter is used to set the title of the error message
    # that is displayed when the data validation criteria is not met.
    # The default error title is 'Microsoft Excel'.
    #
    #     :error_title   => 'Input value is not valid',
    #
    # The maximum title length is 32 characters.
    #
    # ===error_message
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The error_message parameter is used to set the error message that is
    # displayed when a cell is entered. The default error message is
    # "The value you entered is not valid.\nA user has restricted values
    # that can be entered into the cell.".
    #
    #     :validate      => 'integer',
    #     :criteria      => 'between',
    #     :minimum       => 1,
    #     :maximum       => 100,
    #     :error_title   => 'Input value is not valid',
    #     :error_message => 'It should be an integer between 1 and 100',
    #
    # The message can be split over several lines using newlines, "\n"
    # in double quoted strings.
    #
    #     :input_message => "This is\na test.",
    #
    # The maximum message length is 255 characters.
    #
    # ===error_type
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The error_type parameter is used to specify the type of error dialog that is displayed. There are 3 options:
    #
    #     'stop'
    #     'warning'
    #     'information'
    #
    # The default is 'stop'.
    #
    # ===show_error
    #
    # This parameter is passed in a hash ref to data_validation().
    #
    # The show_error parameter is used to toggle on and off the 'Show error
    # alert after invalid data is entered' option in the Excel data validation
    # dialog. When the option is off an error message is not displayed
    # even if it has been set using error_message. It is on by default.
    #
    #     :show_error => 0,      # Turn the option off
    #
    # ===Data Validation Examples
    #
    # ====Example 1. Limiting input to an integer greater than a fixed value.
    #
    #     worksheet.data_validation('A1',
    #         {
    #             :validate        => 'integer',
    #             :criteria        => '>',
    #             :value           => 0,
    #         });
    # ====Example 2. Limiting input to an integer greater than a fixed value where the value is referenced from a cell.
    #
    #     worksheet.data_validation('A2',
    #         {
    #             :validate        => 'integer',
    #             :criteria        => '>',
    #             :value           => '=E3',
    #         });
    # ====Example 3. Limiting input to a decimal in a fixed range.
    #
    #     worksheet.data_validation('A3',
    #         {
    #             :validate        => 'decimal',
    #             :criteria        => 'between',
    #             :minimum         => 0.1,
    #             :maximum         => 0.5,
    #         });
    # ====Example 4. Limiting input to a value in a dropdown list.
    #
    #     worksheet.data_validation('A4',
    #         {
    #             :validate        => 'list',
    #             :source          => ['open', 'high', 'close'],
    #         });
    # ====Example 5. Limiting input to a value in a dropdown list where the list is specified as a cell range.
    #
    #     worksheet.data_validation('A5',
    #         {
    #             :validate        => 'list',
    #             :source          => '=$E$4:$G$4',
    #         });
    # ====Example 6. Limiting input to a date in a fixed range.
    #
    #     worksheet.data_validation('A6',
    #         {
    #             :validate        => 'date',
    #             :criteria        => 'between',
    #             :minimum         => '2008-01-01T',
    #             :maximum         => '2008-12-12T',
    #         });
    # ====Example 7. Displaying a message when the cell is selected.
    #
    #     worksheet.data_validation('A7',
    #         {
    #             :validate      => 'integer',
    #             :criteria      => 'between',
    #             :minimum       => 1,
    #             :maximum       => 100,
    #             :input_title   => 'Enter an integer:',
    #             :input_message => 'between 1 and 100',
    #         });
    # See also the data_validate.rb program in the examples directory
    # of the distro.
    #
    def data_validation(*args)
      # Check for a cell reference in A1 notation and substitute row and column.
      row1, col1, row2, col2, options = row_col_notation(args)
      if row2.respond_to?(:keys)
        param = row2.dup
        row2, col2 = row1, col1
      elsif options.respond_to?(:keys)
        param = options.dup
      else
        raise WriteXLSXInsufficientArgumentError
      end
      raise WriteXLSXInsufficientArgumentError if [row1, col1, row2, col2, param].include?(nil)

      check_dimensions(row1, col1)
      check_dimensions(row2, col2)

      check_for_valid_input_params(param)

      param[:value] = param[:source]  if param[:source]
      param[:value] = param[:minimum] if param[:minimum]

      param[:validate] = valid_validation_type[param[:validate].downcase]
      return if param[:validate] == 'none'
      if ['list', 'custom'].include?(param[:validate])
        param[:criteria]  = 'between'
        param[:maximum]   = nil
      end

      check_criteria_required(param)
      check_valid_citeria_types(param)
      param[:criteria] = valid_criteria_type[param[:criteria].downcase]

      check_maximum_value_when_criteria_is_between_or_notbetween(param)
      param[:error_type] = param.has_key?(:error_type) ? error_type[param[:error_type].downcase] : 0

      convert_date_time_value_if_required(param)
      set_some_defaults(param)

      param[:cells] = [[row1, col1, row2, col2]]

      # A (for now) undocumented parameter to pass additional cell ranges.
      param[:other_cells].each { |cells| param[:cells] << cells } if param.has_key?(:other_cells)

      # Store the validation information until we close the worksheet.
      @validations << param
    end

    #
    # Set the option to hide gridlines on the screen and the printed page.
    #
    # This was mainly useful for Excel 5 where printed gridlines were on by
    # default.
    #
    # This method is used to hide the gridlines on the screen and printed
    # page. Gridlines are the lines that divide the cells on a worksheet.
    # Screen and printed gridlines are turned on by default in an Excel
    # worksheet. If you have defined your own cell borders you may wish
    # to hide the default gridlines.
    #
    #     worksheet.hide_gridlines
    #
    # The following values of option are valid:
    #
    #     0 : Don't hide gridlines
    #     1 : Hide printed gridlines only
    #     2 : Hide screen and printed gridlines
    #
    # If you don't supply an argument or use nil the default option
    # is true, i.e. only the printed gridlines are hidden.
    #
    def hide_gridlines(option = 1)
      if option == 0 || !option
        @print_gridlines       = true    # 1 = display, 0 = hide
        @screen_gridlines      = true
        @print_options_changed = true
      elsif option == 1
        @print_gridlines  = false
        @screen_gridlines = true
      else
        @print_gridlines  = false
        @screen_gridlines = false
      end
    end

    # Set the option to print the row and column headers on the printed page.
    #
    # An Excel worksheet looks something like the following;
    #
    #      ------------------------------------------
    #     |   |   A   |   B   |   C   |   D   |  ...
    #      ------------------------------------------
    #     | 1 |       |       |       |       |  ...
    #     | 2 |       |       |       |       |  ...
    #     | 3 |       |       |       |       |  ...
    #     | 4 |       |       |       |       |  ...
    #     |...|  ...  |  ...  |  ...  |  ...  |  ...
    #
    # The headers are the letters and numbers at the top and the left of the
    # worksheet. Since these headers serve mainly as a indication of position
    # on the worksheet they generally do not appear on the printed page.
    # If you wish to have them printed you can use the
    # print_row_col_headers() method :
    #
    #     worksheet.print_row_col_headers
    #
    # Do not confuse these headers with page headers as described in the
    # set_header() section above.
    #
    def print_row_col_headers(headers = 1)
      if headers
        @print_headers         = 1
        @print_options_changed = 1
      else
        @print_headers = 0
      end
    end

    #
    # The fit_to_pages() method is used to fit the printed area to a specific
    # number of pages both vertically and horizontally. If the printed area
    # exceeds the specified number of pages it will be scaled down to fit.
    # This guarantees that the printed area will always appear on the
    # specified number of pages even if the page size or margins change.
    #
    #     worksheet1.fit_to_pages(1, 1)    # Fit to 1x1 pages
    #     worksheet2.fit_to_pages(2, 1)    # Fit to 2x1 pages
    #     worksheet3.fit_to_pages(1, 2)    # Fit to 1x2 pages
    #
    # The print area can be defined using the print_area() method
    # as described above.
    #
    # A common requirement is to fit the printed output to n pages wide
    # but have the height be as long as necessary. To achieve this set
    # the height to zero:
    #
    #     worksheet1.fit_to_pages(1, 0)    # 1 page wide and as long as necessary
    #
    # Note that although it is valid to use both fit_to_pages() and
    # set_print_scale() on the same worksheet only one of these options can
    # be active at a time. The last method call made will set the active option.
    #
    # Note that fit_to_pages() will override any manual page breaks that
    # are defined in the worksheet.
    #
    def fit_to_pages(width = 1, height = 1)
      @print_style.fit_page   = true
      @print_style.fit_width  = width
      @print_style.fit_height  = height
      @print_style.page_setup_changed = true
    end

    #
    # :call-seq:
    #   autofilter(first_row, first_col, last_row, last_col)
    #
    # Set the autofilter area in the worksheet.
    #
    # This method allows an autofilter to be added to a worksheet.
    # An autofilter is a way of adding drop down lists to the headers of a 2D
    # range of worksheet data. This is turn allow users to filter the data
    # based on simple criteria so that some data is shown and some is hidden.
    #
    # To add an autofilter to a worksheet:
    #
    #     worksheet.autofilter(0, 0, 10, 3)
    #     worksheet.autofilter('A1:D11')    # Same as above in A1 notation.
    #
    # Filter conditions can be applied using the filter_column() or
    # filter_column_list() method.
    #
    # See the autofilter.rb program in the examples directory of the distro
    # for a more detailed example.
    #
    def autofilter(*args)
      row1, col1, row2, col2 = row_col_notation(args)
      return if [row1, col1, row2, col2].include?(nil)

      # Reverse max and min values if necessary.
      row1, row2 = row2, row1 if row2 < row1
      col1, col2 = col2, col1 if col2 < col1

      @autofilter_area = convert_name_area(row1, col1, row2, col2)
      @autofilter_ref  = xl_range(row1, row2, col1, col2)
      @filter_range    = [col1, col2]
    end

    #
    # Set the column filter criteria.
    #
    # The filter_column method can be used to filter columns in a autofilter
    # range based on simple conditions.
    #
    # NOTE: It isn't sufficient to just specify the filter condition.
    # You must also hide any rows that don't match the filter condition.
    # Rows are hidden using the set_row() visible parameter. WriteXLSX cannot
    # do this automatically since it isn't part of the file format.
    # See the autofilter.rb program in the examples directory of the distro
    # for an example.
    #
    # The conditions for the filter are specified using simple expressions:
    #
    #     worksheet.filter_column('A', 'x > 2000')
    #     worksheet.filter_column('B', 'x > 2000 and x < 5000')
    #
    # The column parameter can either be a zero indexed column number or
    # a string column name.
    #
    # The following operators are available:
    #
    #     Operator        Synonyms
    #        ==           =   eq  =~
    #        !=           <>  ne  !=
    #        >
    #        <
    #        >=
    #        <=
    #
    #        and          &&
    #        or           ||
    #
    # The operator synonyms are just syntactic sugar to make you more
    # comfortable using the expressions. It is important to remember that
    # the expressions will be interpreted by Excel and not by ruby.
    #
    # An expression can comprise a single statement or two statements
    # separated by the and and or operators. For example:
    #
    #     'x <  2000'
    #     'x >  2000'
    #     'x == 2000'
    #     'x >  2000 and x <  5000'
    #     'x == 2000 or  x == 5000'
    #
    # Filtering of blank or non-blank data can be achieved by using a value
    # of Blanks or NonBlanks in the expression:
    #
    #     'x == Blanks'
    #     'x == NonBlanks'
    #
    # Excel also allows some simple string matching operations:
    #
    #     'x =~ b*'   # begins with b
    #     'x !~ b*'   # doesn't begin with b
    #     'x =~ *b'   # ends with b
    #     'x !~ *b'   # doesn't end with b
    #     'x =~ *b*'  # contains b
    #     'x !~ *b*'  # doesn't contains b
    #
    # You can also use * to match any character or number and ? to match any
    # single character or number. No other regular expression quantifier is
    # supported by Excel's filters. Excel's regular expression characters can
    # be escaped using ~.
    #
    # The placeholder variable x in the above examples can be replaced by any
    # simple string. The actual placeholder name is ignored internally so the
    # following are all equivalent:
    #
    #     'x     < 2000'
    #     'col   < 2000'
    #     'Price < 2000'
    #
    # Also, note that a filter condition can only be applied to a column
    # in a range specified by the autofilter() Worksheet method.
    #
    # See the autofilter.rb program in the examples directory of the distro
    # for a more detailed example.
    #
    # Note Spreadsheet::WriteExcel supports Top 10 style filters. These aren't
    # currently supported by WriteXLSX but may be added later.
    #
    def filter_column(col, expression)
      raise "Must call autofilter before filter_column" unless @autofilter_area

      col = prepare_filter_column(col)

      tokens = extract_filter_tokens(expression)

      unless tokens.size == 3 || tokens.size == 7
        raise "Incorrect number of tokens in expression '#{expression}'"
      end

      tokens = parse_filter_expression(expression, tokens)

      # Excel handles single or double custom filters as default filters. We need
      # to check for them and handle them accordingly.
      if tokens.size == 2 && tokens[0] == 2
        # Single equality.
        filter_column_list(col, tokens[1])
      elsif tokens.size == 5 && tokens[0] == 2 && tokens[2] == 1 && tokens[3] == 2
        # Double equality with "or" operator.
        filter_column_list(col, tokens[1], tokens[4])
      else
        # Non default custom filter.
        @filter_cols[col] = Array.new(tokens)
        @filter_type[col] = 0
      end

      @filter_on = 1
    end

    #
    # Set the column filter criteria in Excel 2007 list style.
    #
    # Prior to Excel 2007 it was only possible to have either 1 or 2 filter
    # conditions such as the ones shown above in the filter_column method.
    #
    # Excel 2007 introduced a new list style filter where it is possible
    # to specify 1 or more 'or' style criteria. For example if your column
    # contained data for the first six months the initial data would be
    # displayed as all selected as shown on the left. Then if you selected
    # 'March', 'April' and 'May' they would be displayed as shown on the right.
    #
    #     No criteria selected      Some criteria selected.
    #
    #     [/] (Select all)          [X] (Select all)
    #     [/] January               [ ] January
    #     [/] February              [ ] February
    #     [/] March                 [/] March
    #     [/] April                 [/] April
    #     [/] May                   [/] May
    #     [/] June                  [ ] June
    #
    # The filter_column_list() method can be used to represent these types of
    # filters:
    #
    #     worksheet.filter_column_list('A', 'March', 'April', 'May')
    #
    # The column parameter can either be a zero indexed column number or
    # a string column name.
    #
    # One or more criteria can be selected:
    #
    #     worksheet.filter_column_list(0, 'March')
    #     worksheet.filter_column_list(1, 100, 110, 120, 130)
    #
    # NOTE: It isn't sufficient to just specify the filter condition. You must
    # also hide any rows that don't match the filter condition. Rows are hidden
    # using the set_row() visible parameter. WriteXLSX cannot do this
    # automatically since it isn't part of the file format.
    # See the autofilter.rb program in the examples directory of the distro
    # for an example. e conditions for the filter are specified
    # using simple expressions:
    #
    def filter_column_list(col, *tokens)
      tokens.flatten!
      raise "Incorrect number of arguments to filter_column_list" if tokens.empty?
      raise "Must call autofilter before filter_column_list" unless @autofilter_area

      col = prepare_filter_column(col)

      @filter_cols[col] = tokens
      @filter_type[col] = 1           # Default style.
      @filter_on        = 1
    end

    #
    # Store the horizontal page breaks on a worksheet.
    #
    # Add horizontal page breaks to a worksheet. A page break causes all
    # the data that follows it to be printed on the next page. Horizontal
    # page breaks act between rows. To create a page break between rows
    # 20 and 21 you must specify the break at row 21. However in zero index
    # notation this is actually row 20. So you can pretend for a small
    # while that you are using 1 index notation:
    #
    #     worksheet1.set_h_pagebreaks( 20 )    # Break between row 20 and 21
    #
    # The set_h_pagebreaks() method will accept a list of page breaks
    # and you can call it more than once:
    #
    #     worksheet2.set_h_pagebreaks( 20,  40,  60,  80,  100 )    # Add breaks
    #     worksheet2.set_h_pagebreaks( 120, 140, 160, 180, 200 )    # Add some more
    #
    # Note: If you specify the "fit to page" option via the fit_to_pages()
    # method it will override all manual page breaks.
    #
    # There is a silent limitation of about 1000 horizontal page breaks
    # per worksheet in line with an Excel internal limitation.
    #
    def set_h_pagebreaks(*args)
      breaks = args.collect do |brk|
        brk.respond_to?(:to_a) ? brk.to_a : brk
      end.flatten
      @print_style.hbreaks += breaks
    end

    #
    # Store the vertical page breaks on a worksheet.
    #
    # Add vertical page breaks to a worksheet. A page break causes all the
    # data that follows it to be printed on the next page. Vertical page breaks
    # act between columns. To create a page break between columns 20 and 21
    # you must specify the break at column 21. However in zero index notation
    # this is actually column 20. So you can pretend for a small while that
    # you are using 1 index notation:
    #
    #     worksheet1.set_v_pagebreaks(20) # Break between column 20 and 21
    #
    # The set_v_pagebreaks() method will accept a list of page breaks
    # and you can call it more than once:
    #
    #     worksheet2.set_v_pagebreaks( 20,  40,  60,  80,  100 )    # Add breaks
    #     worksheet2.set_v_pagebreaks( 120, 140, 160, 180, 200 )    # Add some more
    #
    # Note: If you specify the "fit to page" option via the fit_to_pages()
    # method it will override all manual page breaks.
    #
    def set_v_pagebreaks(*args)
      @print_style.vbreaks += args
    end

    #
    # Make any comments in the worksheet visible.
    #
    # This method is used to make all cell comments visible when a worksheet
    # is opened.
    #
    #     worksheet.show_comments
    #
    # Individual comments can be made visible using the visible parameter of
    # the write_comment method (see above):
    #
    #     worksheet.write_comment('C3', 'Hello', :visible => 1)
    #
    # If all of the cell comments have been made visible you can hide
    # individual comments as follows:
    #
    #     worksheet.show_comments
    #     worksheet.write_comment('C3', 'Hello', :visible => 0)
    #
    def show_comments(visible = true)
      @comments_visible = visible
    end

    #
    # Set the default author of the cell comments.
    #
    # This method is used to set the default author of all cell comments.
    #
    #     worksheet.set_comments_author('Ruby')
    #
    # Individual comment authors can be set using the author parameter
    # of the write_comment method.
    #
    # The default comment author is an empty string, '',
    # if no author is specified.
    #
    def set_comments_author(author = '')
      @comments_author = author if author
    end

    def comments_count # :nodoc:
      @comments.size
    end

    def has_comments? # :nodoc:
      !@comments.empty?
    end

    def is_chartsheet? # :nodoc:
      !!@is_chartsheet
    end

    #
    # Turn the HoH that stores the comments into an array for easier handling
    # and set the external links.
    #
    def set_vml_data_id(vml_data_id) # :nodoc:
      count = @comments.sorted_comments.size
      start_data_id = vml_data_id

      # The VML o:idmap data id contains a comma separated range when there is
      # more than one 1024 block of comments, like this: data="1,2".
      (1 .. (count / 1024)).each do |i|
        vml_data_id = "#{vml_data_id},#{start_data_id + i}"
      end
      @vml_data_id = vml_data_id

      count
    end

    def set_external_vml_links(comment_id) # :nodoc:
      @external_vml_links <<
        ['/vmlDrawing', "../drawings/vmlDrawing#{comment_id}.vml"]
    end

    def set_external_comment_links(comment_id) # :nodoc:
      @external_comment_links <<
        ['/comments',   "../comments#{comment_id}.xml"]
    end

    #
    # Set up chart/drawings.
    #
    def prepare_chart(index, chart_id, drawing_id) # :nodoc:
      drawing_type = 1

      row, col, chart, x_offset, y_offset, scale_x, scale_y  = @charts[index]
      chart.id = chart_id - 1
      scale_x ||= 0
      scale_y ||= 0

      width  = (0.5 + (480 * scale_x)).to_i
      height = (0.5 + (288 * scale_y)).to_i

      dimensions = position_object_emus(col, row, x_offset, y_offset, width, height)

      # Set the chart name for the embedded object if it has been specified.
      name = chart.name

      # Create a Drawing object to use with worksheet unless one already exists.
      if !drawing?
        drawing = Drawing.new
        drawing.add_drawing_object(drawing_type, dimensions, 0, 0, name)
        drawing.embedded = 1

        @drawing = drawing

        @external_drawing_links << ['/drawing', "../drawings/drawing#{drawing_id}.xml" ]
      else
        @drawing.add_drawing_object(drawing_type, dimensions, 0, 0, name)
      end
      @drawing_links << ['/chart', "../charts/chart#{chart_id}.xml"]
    end

    #
    # Returns a range of data from the worksheet _table to be used in chart
    # cached data. Strings are returned as SST ids and decoded in the workbook.
    # Return nils for data that doesn't exist since Excel can chart series
    # with data missing.
    #
    def get_range_data(row_start, col_start, row_end, col_end) # :nodoc:
      # TODO. Check for worksheet limits.

      # Iterate through the table data.
      data = []
      (row_start .. row_end).each do |row_num|
        # Store nil if row doesn't exist.
        if !@cell_data_table[row_num]
          data << nil
          next
        end

        (col_start .. col_end).each do |col_num|
          if cell = @cell_data_table[row_num][col_num]
            data << cell.data
          else
            # Store nil if col doesn't exist.
            data << nil
          end
        end
      end

      return data
    end

    #
    # Calculate the vertices that define the position of a graphical object within
    # the worksheet in pixels.
    #
    #         +------------+------------+
    #         |     A      |      B     |
    #   +-----+------------+------------+
    #   |     |(x1,y1)     |            |
    #   |  1  |(A1)._______|______      |
    #   |     |    |              |     |
    #   |     |    |              |     |
    #   +-----+----|    BITMAP    |-----+
    #   |     |    |              |     |
    #   |  2  |    |______________.     |
    #   |     |            |        (B2)|
    #   |     |            |     (x2,y2)|
    #   +---- +------------+------------+
    #
    # Example of an object that covers some of the area from cell A1 to cell B2.
    #
    # Based on the width and height of the object we need to calculate 8 vars:
    #
    #     col_start, row_start, col_end, row_end, x1, y1, x2, y2.
    #
    # We also calculate the absolute x and y position of the top left vertex of
    # the object. This is required for images.
    #
    #    x_abs, y_abs
    #
    # The width and height of the cells that the object occupies can be variable
    # and have to be taken into account.
    #
    # The values of col_start and row_start are passed in from the calling
    # function. The values of col_end and row_end are calculated by subtracting
    # the width and height of the object from the width and height of the
    # underlying cells.
    #
    #    col_start    # Col containing upper left corner of object.
    #    x1           # Distance to left side of object.
    #    row_start    # Row containing top left corner of object.
    #    y1           # Distance to top of object.
    #    col_end      # Col containing lower right corner of object.
    #    x2           # Distance to right side of object.
    #    row_end      # Row containing bottom right corner of object.
    #    y2           # Distance to bottom of object.
    #    width        # Width of object frame.
    #    height       # Height of object frame.
    def position_object_pixels(col_start, row_start, x1, y1, width, height, is_drawing = false) #:nodoc:
      # Calculate the absolute x offset of the top-left vertex.
      if @col_size_changed
        x_abs = (1 .. col_start).inject(0) {|sum, col| sum += size_col(col)}
      else
        # Optimisation for when the column widths haven't changed.
        x_abs = 64 * col_start
      end
      x_abs += x1

      # Calculate the absolute y offset of the top-left vertex.
      # Store the column change to allow optimisations.
      if @row_size_changed
        y_abs = (1 .. row_start).inject(0) {|sum, row| sum += size_row(row)}
      else
        # Optimisation for when the row heights haven't changed.
        y_abs = 20 * row_start
      end
      y_abs += y1

      # Adjust start column for offsets that are greater than the col width.
      x1, col_start = adjust_column_offset(x1, col_start)

      # Adjust start row for offsets that are greater than the row height.
      y1, row_start = adjust_row_offset(y1, row_start)

      # Initialise end cell to the same as the start cell.
      col_end = col_start
      row_end = row_start

      width  += x1
      height += y1

      # Subtract the underlying cell widths to find the end cell of the object.
      width, col_end = adjust_column_offset(width, col_end)

      # Subtract the underlying cell heights to find the end cell of the object.
      height, row_end = adjust_row_offset(height, row_end)

      # The following is only required for positioning drawing/chart objects
      # and not comments. It is probably the result of a bug.
      if ptrue?(is_drawing)
        col_end -= 1 if width == 0
        row_end -= 1 if height == 0
      end

      # The end vertices are whatever is left from the width and height.
      x2 = width
      y2 = height

      [col_start, row_start, x1, y1, col_end, row_end, x2, y2, x_abs, y_abs]
    end

    def comments_visible? # :nodoc:
      !!@comments_visible
    end

    def comments_xml_writer=(file) # :nodoc:
      @comments.set_xml_writer(file)
    end

    def comments_assemble_xml_file # :nodoc:
      @comments.assemble_xml_file
    end

    def comments_array # :nodoc:
      @comments.sorted_comments
    end

    #
    # Write the cell value <v> element.
    #
    def write_cell_value(value = '') #:nodoc:
      value ||= ''
      value = value.to_i if value == value.to_i
      @writer.data_element('v', value)
    end

    #
    # Write the cell formula <f> element.
    #
    def write_cell_formula(formula = '') #:nodoc:
      @writer.data_element('f', formula)
    end

    #
    # Write the cell array formula <f> element.
    #
    def write_cell_array_formula(formula, range) #:nodoc:
      attributes = ['t', 'array', 'ref', range]

      @writer.data_element('f', formula, attributes)
    end

    private

    #
    # Convert a table total function to a worksheet formula.
    #
    def table_function_to_formula(function, col_name)
      subtotals = {
        :average   => 101,
        :countNums => 102,
        :count     => 103,
        :max       => 104,
        :min       => 105,
        :stdDev    => 107,
        :sum       => 109,
        :var       => 110
      }

      unless func_num = subtotals[function.to_sym]
        raise "Unsupported function '#{function}' in add_table()"
      end
      "SUBTOTAL(#{func_num},[#{col_name}])"
    end

    def check_for_valid_input_params(param)
      check_parameter(param, valid_validation_parameter, 'data_validation')

      unless param.has_key?(:validate)
        raise WriteXLSXOptionParameterError, "Parameter :validate is required in data_validation()"
      end
      unless valid_validation_type.has_key?(param[:validate].downcase)
        raise WriteXLSXOptionParameterError,
        "Unknown validation type '#{param[:validate]}' for parameter :validate in data_validation()"
      end
      if param[:error_type] && !error_type.has_key?(param[:error_type].downcase)
        raise WriteXLSXOptionParameterError,
          "Unknown criteria type '#param[:error_type}' for parameter :error_type in data_validation()"
      end
    end

    def check_criteria_required(param)
      unless param.has_key?(:criteria)
        raise WriteXLSXOptionParameterError, "Parameter :criteria is required in data_validation()"
      end
    end

    def check_valid_citeria_types(param)
      unless valid_criteria_type.has_key?(param[:criteria].downcase)
        raise WriteXLSXOptionParameterError,
          "Unknown criteria type '#{param[:criteria]}' for parameter :criteria in data_validation()"
      end
    end

    def check_maximum_value_when_criteria_is_between_or_notbetween(param)
      if param[:criteria] == 'between' || param[:criteria] == 'notBetween'
        unless param.has_key?(:maximum)
          raise WriteXLSXOptionParameterError,
            "Parameter :maximum is required in data_validation() when using :between or :not between criteria"
        end
      else
        param[:maximum] = nil
      end
    end

    def error_type
      {'stop' => 0, 'warning' => 1, 'information' => 2}
    end

    def convert_date_time_value_if_required(param)
      if param[:validate] == 'date' || param[:validate] == 'time'
        unless convert_date_time_value(param, :value) && convert_date_time_value(param, :maximum)
          raise WriteXLSXOptionParameterError, "Invalid date/time value."
        end
      end
    end

    def set_some_defaults(param)
      param[:ignore_blank]  ||= 1
      param[:dropdown]      ||= 1
      param[:show_input]    ||= 1
      param[:show_error]    ||= 1
    end

    # List of valid input parameters.
    def valid_validation_parameter
      [
        :validate,
        :criteria,
        :value,
        :source,
        :minimum,
        :maximum,
        :ignore_blank,
        :dropdown,
        :show_input,
        :input_title,
        :input_message,
        :show_error,
        :error_title,
        :error_message,
        :error_type,
        :other_cells
      ]
    end

    def valid_validation_type # :nodoc:
      {
        'any'             => 'none',
        'any value'       => 'none',
        'whole number'    => 'whole',
        'whole'           => 'whole',
        'integer'         => 'whole',
        'decimal'         => 'decimal',
        'list'            => 'list',
        'date'            => 'date',
        'time'            => 'time',
        'text length'     => 'textLength',
        'length'          => 'textLength',
        'custom'          => 'custom'
      }
    end

    # Convert the list of format, string tokens to pairs of (format, string)
    # except for the first string fragment which doesn't require a default
    # formatting run. Use the default for strings without a leading format.
    def rich_strings_fragments(rich_strings) # :nodoc:
      # Create a temp format with the default font for unformatted fragments.
      default = Format.new(0)

      length = 0                     # String length.
      last = 'format'
      pos  = 0

      fragments = []
      rich_strings.each do |token|
        if token.respond_to?(:xf_index)
          # Can't allow 2 formats in a row
          return nil if last == 'format' && pos > 0

          # Token is a format object. Add it to the fragment list.
          fragments << token
          last = 'format'
        else
          # Token is a string.
          if last != 'format'
            # If previous token wasn't a format add one before the string.
            fragments << default << token
          else
            # If previous token was a format just add the string.
            fragments << token
          end

          length += token.size    # Keep track of actual string length.
          last = 'string'
        end
        pos += 1
      end
      [fragments, length]
    end

    def check_conditional_formatting_parameters(param)  # :nodoc:
      # Check for valid input parameters.
      unless (param.keys.uniq - valid_parameter_for_conditional_formatting).empty? &&
          param.has_key?(:type)                                   &&
          valid_type_for_conditional_formatting.has_key?(param[:type].downcase)
        raise WriteXLSXOptionParameterError, "Invalid type : #{param[:type]}"
      end

      param[:direction] = 'bottom' if param[:type] == 'bottom'
      param[:type] = valid_type_for_conditional_formatting[param[:type].downcase]

      # Check for valid criteria types.
      if param.has_key?(:criteria) && valid_criteria_type_for_conditional_formatting.has_key?(param[:criteria].downcase)
        param[:criteria] = valid_criteria_type_for_conditional_formatting[param[:criteria].downcase]
      end

      # Convert date/times value if required.
      if %w[date time cellIs].include?(param[:type])
        param[:type] = 'cellIs'

        param[:value]   = convert_date_time_if_required(param[:value])
        param[:minimum] = convert_date_time_if_required(param[:minimum])
        param[:maximum] = convert_date_time_if_required(param[:maximum])
      end

      # 'Between' and 'Not between' criteria require 2 values.
      if param[:criteria] == 'between' || param[:criteria] == 'notBetween'
        unless param.has_key?(:minimum) || param.has_key?(:maximum)
          raise WriteXLSXOptionParameterError, "Invalid criteria : #{param[:criteria]}"
        end
      else
        param[:minimum] = nil
        param[:maximum] = nil
      end

      # Convert date/times value if required.
      if param[:type] == 'date' || param[:type] == 'time'
        unless convert_date_time_value(param, :value) || convert_date_time_value(param, :maximum)
          raise WriteXLSXOptionParameterError
        end
      end
    end

    def convert_date_time_if_required(val)
      if val =~ /T/
        date_time = convert_date_time(val)
        raise "Invalid date/time value '#{val}' in conditional_formatting()" unless date_time
        date_time
      else
        val
      end
    end

    # List of valid input parameters for conditional_formatting.
    def valid_parameter_for_conditional_formatting
      [
        :type,
        :format,
        :criteria,
        :value,
        :minimum,
        :maximum,
        :min_type,
        :mid_type,
        :max_type,
        :min_value,
        :mid_value,
        :max_value,
        :min_color,
        :mid_color,
        :max_color,
        :bar_color
      ]
    end

    # List of  valid validation types for conditional_formatting.
    def valid_type_for_conditional_formatting
      {
        'cell'          => 'cellIs',
        'date'          => 'date',
        'time'          => 'time',
        'average'       => 'aboveAverage',
        'duplicate'     => 'duplicateValues',
        'unique'        => 'uniqueValues',
        'top'           => 'top10',
        'bottom'        => 'top10',
        'text'          => 'text',
        'time_period'   => 'timePeriod',
        'blanks'        => 'containsBlanks',
        'no_blanks'     => 'notContainsBlanks',
        'errors'        => 'containsErrors',
        'no_errors'     => 'notContainsErrors',
        '2_color_scale' => '2_color_scale',
        '3_color_scale' => '3_color_scale',
        'data_bar'      => 'dataBar',
        'formula'       => 'expression'
      }
    end

    # List of valid criteria types for conditional_formatting.
    def valid_criteria_type_for_conditional_formatting
      {
        'between'                  => 'between',
        'not between'              => 'notBetween',
        'equal to'                 => 'equal',
        '='                        => 'equal',
        '=='                       => 'equal',
        'not equal to'             => 'notEqual',
        '!='                       => 'notEqual',
        '<>'                       => 'notEqual',
        'greater than'             => 'greaterThan',
        '>'                        => 'greaterThan',
        'less than'                => 'lessThan',
        '<'                        => 'lessThan',
        'greater than or equal to' => 'greaterThanOrEqual',
        '>='                       => 'greaterThanOrEqual',
        'less than or equal to'    => 'lessThanOrEqual',
        '<='                       => 'lessThanOrEqual',
        'containing'               => 'containsText',
        'not containing'           => 'notContains',
        'begins with'              => 'beginsWith',
        'ends with'                => 'endsWith',
        'yesterday'                => 'yesterday',
        'today'                    => 'today',
        'last 7 days'              => 'last7Days',
        'last week'                => 'lastWeek',
        'this week'                => 'thisWeek',
        'next week'                => 'nextWeek',
        'last month'               => 'lastMonth',
        'this month'               => 'thisMonth',
        'next month'               => 'nextMonth'
      }
    end
    # Pad out the rest of the area with formatted blank cells.
    def write_formatted_blank_to_area(row_first, row_last, col_first, col_last, format)
      (row_first .. row_last).each do |row|
        (col_first .. col_last).each do |col|
          next if row == row_first && col == col_first
          write_blank(row, col, format)
        end
      end
    end

    #
    # Extract the tokens from the filter expression. The tokens are mainly non-
    # whitespace groups. The only tricky part is to extract string tokens that
    # contain whitespace and/or quoted double quotes (Excel's escaped quotes).
    #
    # Examples: 'x <  2000'
    #           'x >  2000 and x <  5000'
    #           'x = "foo"'
    #           'x = "foo bar"'
    #           'x = "foo "" bar"'
    #
    def extract_filter_tokens(expression = nil) #:nodoc:
      return [] unless expression

      tokens = []
      str = expression
      while str =~ /"(?:[^"]|"")*"|\S+/
        tokens << $&
        str = $~.post_match
      end

      # Remove leading and trailing quotes and unescape other quotes
      tokens.map! do |token|
        token.sub!(/^"/, '')
        token.sub!(/"$/, '')
        token.gsub!(/""/, '"')

        # if token is number, convert to numeric.
        if token =~ /^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/
          token.to_f == token.to_i ? token.to_i : token.to_f
        else
          token
        end
      end

      tokens
    end

    #
    # Converts the tokens of a possibly conditional expression into 1 or 2
    # sub expressions for further parsing.
    #
    # Examples:
    #          ('x', '==', 2000) -> exp1
    #          ('x', '>',  2000, 'and', 'x', '<', 5000) -> exp1 and exp2
    #
    def parse_filter_expression(expression, tokens) #:nodoc:
      # The number of tokens will be either 3 (for 1 expression)
      # or 7 (for 2  expressions).
      #
      if (tokens.size == 7)
        conditional = tokens[3]
        if conditional =~ /^(and|&&)$/
          conditional = 0
        elsif conditional =~ /^(or|\|\|)$/
          conditional = 1
        else
          raise "Token '#{conditional}' is not a valid conditional " +
          "in filter expression '#{expression}'"
        end
        expression_1 = parse_filter_tokens(expression, tokens[0..2])
        expression_2 = parse_filter_tokens(expression, tokens[4..6])
        [expression_1, conditional, expression_2].flatten
      else
        parse_filter_tokens(expression, tokens)
      end
    end

    #
    # Parse the 3 tokens of a filter expression and return the operator and token.
    #
    def parse_filter_tokens(expression, tokens)     #:nodoc:
      operators = {
        '==' => 2,
        '='  => 2,
        '=~' => 2,
        'eq' => 2,

        '!=' => 5,
        '!~' => 5,
        'ne' => 5,
        '<>' => 5,

        '<'  => 1,
        '<=' => 3,
        '>'  => 4,
        '>=' => 6,
      }

      operator = operators[tokens[1]]
      token    = tokens[2]

      # Special handling of "Top" filter expressions.
      if tokens[0] =~ /^top|bottom$/i
        value = tokens[1]
        if (value =~ /\D/ or value.to_i < 1 or value.to_i > 500)
          raise "The value '#{value}' in expression '#{expression}' " +
          "must be in the range 1 to 500"
        end
        token.downcase!
        if (token != 'items' and token != '%')
          raise "The type '#{token}' in expression '#{expression}' " +
          "must be either 'items' or '%'"
        end

        if (tokens[0] =~ /^top$/i)
          operator = 30
        else
          operator = 32
        end

        if (tokens[2] == '%')
          operator += 1
        end

        token    = value
      end

      if (not operator and tokens[0])
        raise "Token '#{tokens[1]}' is not a valid operator " +
        "in filter expression '#{expression}'"
      end

      # Special handling for Blanks/NonBlanks.
      if (token =~ /^blanks|nonblanks$/i)
        # Only allow Equals or NotEqual in this context.
        if (operator != 2 and operator != 5)
          raise "The operator '#{tokens[1]}' in expression '#{expression}' " +
          "is not valid in relation to Blanks/NonBlanks'"
        end

        token.downcase!

        # The operator should always be 2 (=) to flag a "simple" equality in
        # the binary record. Therefore we convert <> to =.
        if token == 'blanks'
          if operator == 5
            token = ' '
          end
        else
          if operator == 5
            operator = 2
            token    = 'blanks'
          else
            operator = 5
            token    = ' '
          end
        end
      end

      # if the string token contains an Excel match character then change the
      # operator type to indicate a non "simple" equality.
      if (operator == 2 and token =~ /[*?]/)
        operator = 22
      end

      [operator, token]
    end

    #
    # Convert from an Excel internal colour index to a XML style #RRGGBB index
    # based on the default or user defined values in the Workbook palette.
    #
    def get_palette_color(index) #:nodoc:
      if index =~ /^#([0-9A-F]{6})$/i
        return "FF#{$~[1]}"
      end

      # Adjust the colour index.
      index -= 8

      # Palette is passed in from the Workbook class.
      rgb = @workbook.palette[index]

      # TODO Add the alpha part to the RGB.
      sprintf("FF%02X%02X%02X", *rgb[0, 3])
    end

    #
    # This is an internal method that is used to filter elements of the array of
    # pagebreaks used in the _store_hbreak() and _store_vbreak() methods. It:
    #   1. Removes duplicate entries from the list.
    #   2. Sorts the list.
    #   3. Removes 0 from the list if present.
    #
    def sort_pagebreaks(*args) #:nodoc:
      return [] if args.empty?

      breaks = args.uniq.sort
      breaks.delete(0)

      # The Excel 2007 specification says that the maximum number of page breaks
      # is 1026. However, in practice it is actually 1023.
      max_num_breaks = 1023
      if breaks.size > max_num_breaks
        breaks[0, max_num_breaks]
      else
        breaks
      end
    end

    def adjust_column_offset(x, column)
      while x >= size_col(column)
        x -= size_col(column)
        column += 1
      end
      [x, column]
    end

    def adjust_row_offset(y, row)
      while y >= size_row(row)
        y -= size_row(row)
        row += 1
      end
      [y, row]
    end

    #
    # Calculate the vertices that define the position of a graphical object within
    # the worksheet in EMUs.
    #
    # The vertices are expressed as English Metric Units (EMUs). There are 12,700
    # EMUs per point. Therefore, 12,700 * 3 /4 = 9,525 EMUs per pixel.
    #
    def position_object_emus(col_start, row_start, x1, y1, width, height) #:nodoc:
      is_drawing = true
      col_start, row_start, x1, y1, col_end, row_end, x2, y2, x_abs, y_abs =
        position_object_pixels(col_start, row_start, x1, y1, width, height, is_drawing)

      # Convert the pixel values to EMUs. See above.
      x1    *= 9_525
      y1    *= 9_525
      x2    *= 9_525
      y2    *= 9_525
      x_abs *= 9_525
      y_abs *= 9_525

      [col_start, row_start, x1, y1, col_end, row_end, x2, y2, x_abs, y_abs]
    end

    #
    # Calculate the vertices that define the position of a shape object within
    # the worksheet in EMUs.  Save the vertices with the object.
    #
    # The vertices are expressed as English Metric Units (EMUs). There are 12,700
    # EMUs per point. Therefore, 12,700 * 3 /4 = 9,525 EMUs per pixel.
    #
    def position_shape_emus(shape)
      col_start, row_start, x1, y1, col_end, row_end, x2, y2, x_abs, y_abs =
        position_object_pixels(
                               shape[:column_start],
                               shape[:row_start],
                               shape[:x_offset],
                               shape[:y_offset],
                               shape[:width] * shape[:scale_x],
                               shape[:height] * shape[:scale_y],
                               shape[:drawing]
                               )

      # Now that x2/y2 have been calculated with a potentially negative
      # width/height we use the absolute value and convert to EMUs.
      shape[:width_emu]  = (shape[:width]  * 9_525).abs.to_i
      shape[:height_emu] = (shape[:height] * 9_525).abs.to_i

      shape[:column_start] = col_start.to_i
      shape[:row_start]    = row_start.to_i
      shape[:column_end]   = col_end.to_i
      shape[:row_end]      = row_end.to_i

      # Convert the pixel values to EMUs. See above.
      shape[:x1]    = (x1 * 9_525).to_i
      shape[:y1]    = (y1 * 9_525).to_i
      shape[:x2]    = (x2 * 9_525).to_i
      shape[:y2]    = (y2 * 9_525).to_i
      shape[:x_abs] = (x_abs * 9_525).to_i
      shape[:y_abs] = (y_abs * 9_525).to_i
    end

    #
    # Convert the width of a cell from user's units to pixels. Excel rounds the
    # column width to the nearest pixel. If the width hasn't been set by the user
    # we use the default value. If the column is hidden it has a value of zero.
    #
    def size_col(col) #:nodoc:
      max_digit_width = 7    # For Calabri 11.
      padding         = 5

      # Look up the cell value to see if it has been changed.
      if @col_sizes[col]
        width = @col_sizes[col]

        # Convert to pixels.
        if width == 0
          pixels = 0
        elsif width < 1
          pixels = (width * 12 + 0.5).to_i
        else
          pixels = (width * max_digit_width + 0.5).to_i + padding
        end
      else
        pixels = 64
      end
      pixels
    end

    #
    # Convert the height of a cell from user's units to pixels. If the height
    # hasn't been set by the user we use the default value. If the row is hidden
    # it has a value of zero.
    #
    def size_row(row) #:nodoc:
      # Look up the cell value to see if it has been changed
      if @row_sizes[row]
        height = @row_sizes[row]

        if height == 0
          pixels = 0
        else
          pixels = (4 / 3.0 * height).to_i
        end
      else
        pixels = 20
      end
      pixels
    end

    #
    # Set up image/drawings.
    #
    def prepare_image(index, image_id, drawing_id, width, height, name, image_type) #:nodoc:
      drawing_type = 2
      drawing

      row, col, image, x_offset, y_offset, scale_x, scale_y = @images[index]

      width  *= scale_x
      height *= scale_y

      dimensions = position_object_emus(col, row, x_offset, y_offset, width, height)

      # Convert from pixels to emus.
      width  = (0.5 + (width  * 9_525)).to_i
      height = (0.5 + (height * 9_525)).to_i

      # Create a Drawing object to use with worksheet unless one already exists.
      if !drawing?
        drawing = Drawing.new
        drawing.embedded = 1

        @drawing = drawing

        @external_drawing_links << ['/drawing', "../drawings/drawing#{drawing_id}.xml"]
      else
        drawing = @drawing
      end

      drawing.add_drawing_object(drawing_type, dimensions, width, height, name)

      @drawing_links << ['/image', "../media/image#{image_id}.#{image_type}"]
    end
    public :prepare_image

    #
    # Insert a shape into the worksheet.
    #
    # This method can be used to insert a Shape object into a worksheet.
    # The Shape must be created by the add_shape() Workbook method.
    #
    #   shape = workbook.add_shape(:name => 'My Shape', :type => 'plus')
    #
    #   # Configure the shape.
    #   shape.set_text('foo')
    #   ...
    #
    #   # Insert the shape into the a worksheet.
    #   worksheet.insert_shape('E2', shape)
    #
    # See add_shape() for details on how to create the Shape object
    # and Excel::Writer::XLSX::Shape for details on how to configure it.
    #
    # The x, y, scale_x and scale_y parameters are optional.
    #
    # The parameters x and y can be used to specify an offset
    # from the top left hand corner of the cell specified by row and col.
    # The offset values are in pixels.
    #
    #   worksheet1.insert_shape('E2', chart, 3, 3)
    #
    # The parameters scale_x and scale_y can be used to scale the
    # inserted shape horizontally and vertically:
    #
    #   # Scale the width by 120% and the height by 150%
    #   worksheet.insert_shape('E2', shape, 0, 0, 1.2, 1.5)
    # See also the shape*.pl programs in the examples directory of the distro.
    #
    def insert_shape(*args)
      # Check for a cell reference in A1 notation and substitute row and column.
      row_start, column_start, shape, x_offset, y_offset, scale_x, scale_y =
        row_col_notation(args)
      if [row_start, column_start, shape].include?(nil)
        raise "Insufficient arguments in insert_shape()"
      end

      # Set the shape properties
      shape[:row_start]    = row_start
      shape[:column_start] = column_start
      shape[:x_offset]     = x_offset || 0
      shape[:y_offset]     = y_offset || 0

      # Override shape scale if supplied as an argument. Otherwise, use the
      # existing shape scale factors.
      shape[:scale_x] = scale_x if scale_x
      shape[:scale_y] = scale_y if scale_y

      # Assign a shape ID.
      while true
        id = shape[:id] || 0
        used = @shape_hash[id]

        # Test if shape ID is already used. Otherwise assign a new one.
        if !used && id != 0
          break
        else
          @last_shape_id += 1
          shape[:id] = @last_shape_id
        end
      end

      shape[:element] = @shapes.size

      # Allow lookup of entry into shape array by shape ID.
      @shape_hash[shape[:id]] = shape[:element]

      # Create link to Worksheet color palette.
      shape[:palette] = @workbook.palette

      if ptrue?(shape[:stencil])
        # Insert a copy of the shape, not a reference so that the shape is
        # used as a stencil. Previously stamped copies don't get modified
        # if the stencil is modified.
        insert = shape.dup

        # For connectors change x/y coords based on location of connected shapes.
        auto_locate_connectors(insert)

        @shapes << insert
        insert
      else
        # For connectors change x/y coords based on location of connected shapes.
        auto_locate_connectors(shape)

        # Insert a link to the shape on the list of shapes. Connection to
        # the parent shape is maintained.
        @shapes << shape
        return shape
      end
    end
    public :insert_shape

    #
    # Set up drawing shapes
    #
    def prepare_shape(index, drawing_id)
      shape = @shapes[index]
      drawing_type = 3

      # Create a Drawing object to use with worksheet unless one already exists.
      unless drawing?
        @drawing = Drawing.new
        @drawing.embedded = 1
        @external_drawing_links << ['/drawing', "../drawings/drawing#{drawing_id}.xml"]
      end

      # Validate the he shape against various rules.
      validate_shape(shape, index)
      position_shape_emus(shape)

      dimensions = [
                    shape[:column_start], shape[:row_start],
                    shape[:x1],           shape[:y1],
                    shape[:column_end],   shape[:row_end],
                    shape[:x2],           shape[:y2],
                    shape[:x_abs],        shape[:y_abs],
                    shape[:width_emu],    shape[:height_emu]
                   ]

      drawing.add_drawing_object(drawing_type, dimensions, shape[:name], shape)
    end
    public :prepare_shape

    #
    # Re-size connector shapes if they are connected to other shapes.
    #
    def auto_locate_connectors(shape)
      # Valid connector shapes.
      connector_shapes = {
        :straightConnector => 1,
        :Connector         => 1,
        :bentConnector     => 1,
        :curvedConnector   => 1,
        :line              => 1
      }

      shape_base = shape[:type].chop.to_sym # Remove the number of segments from end of type.
      shape[:connect] = connector_shapes[shape_base] ? 1 : 0
      return if shape[:connect] == 0

      # Both ends have to be connected to size it.
      return if shape[:start] == 0 && shape[:end] == 0

      # Both ends need to provide info about where to connect.
      return if shape[:start_side] == 0 && shape[:end_side] == 0

      sid = shape[:start]
      eid = shape[:end]

      slink_id = @shape_hash[sid] || 0
      sls      = @shapes.fetch(slink_id, Hash.new(0))
      elink_id = @shape_hash[eid] || 0
      els      = @shapes.fetch(elink_id, Hash.new(0))

      # Assume shape connections are to the middle of an object, and
      # not a corner (for now).
      connect_type = shape[:start_side] + shape[:end_side]
      smidx        = sls[:x_offset] + sls[:width] / 2
      emidx        = els[:x_offset] + els[:width] / 2
      smidy        = sls[:y_offset] + sls[:height] / 2
      emidy        = els[:y_offset] + els[:height] / 2
      netx         = (smidx - emidx).abs
      nety         = (smidy - emidy).abs

      if connect_type == 'bt'
        sy = sls[:y_offset] + sls[:height]
        ey = els[:y_offset]

        shape[:width] = (emidx - smidx).to_i.abs
        shape[:x_offset] = [smidx, emidx].min.to_i
        shape[:height] =
          (els[:y_offset] - (sls[:y_offset] + sls[:height])).to_i.abs
        shape[:y_offset] =
          [sls[:y_offset] + sls[:height], els[:y_offset]].min.to_i
        shape[:flip_h] = smidx < emidx ? 1 : 0
        shape[:rotation] = 90

        if sy > ey
          shape[:flip_v] = 1

          # Create 3 adjustments for an end shape vertically above a
          # start shape. Adjustments count from the upper left object.
          if shape[:adjustments].empty?
            shape[:adjustments] = [-10, 50, 110]
          end
          shape[:type] = 'bentConnector5'
        end
      elsif connect_type == 'rl'
        shape[:width] =
          (els[:x_offset] - (sls[:x_offset] + sls[:width])).to_i.abs
        shape[:height] = (emidy - smidy).to_i.abs
        shape[:x_offset] =
          [sls[:x_offset] + sls[:width], els[:x_offset]].min
        shape[:y_offset] = [smidy, emidy].min

        shape[:flip_h] = 1 if smidx < emidx && smidy > emidy
        shape[:flip_h] = 1 if smidx > emidx && smidy < emidy

        if smidx > emidx
          # Create 3 adjustments for an end shape to the left of a
          # start shape.
          if shape[:adjustments].empty?
            shape[:adjustments] = [-10, 50, 110]
          end
          shape[:type] = 'bentConnector5'
        end
      end
    end

    #
    # Check shape attributes to ensure they are valid.
    #
    def validate_shape(shape, index)
      unless %w[l ctr r just].include?(shape[:align])
        raise "Shape #{index} (#{shape[:type]}) alignment (#{shape[:align]}) not in ['l', 'ctr', 'r', 'just']\n"
      end

      unless %w[t ctr b].include?(shape[:valign])
        raise "Shape #{index} (#{shape[:type]}) vertical alignment (#{shape[:valign]}) not in ['t', 'ctr', 'v']\n"
      end
    end

    #
    # Based on the algorithm provided by Daniel Rentz of OpenOffice.
    #
    def encode_password(password) #:nodoc:
      i = 0
      chars = password.split(//)
      count = chars.size

      chars.collect! do |char|
        i += 1
        char     = char.ord << i
        low_15   = char & 0x7fff
        high_15  = char & 0x7fff << 15
        high_15  = high_15 >> 15
        char     = low_15 | high_15
      end

      encoded_password  = 0x0000
      chars.each { |c| encoded_password ^= c }
      encoded_password ^= count
      encoded_password ^= 0xCE4B
    end

    #
    # Write the <worksheet> element. This is the root element of Worksheet.
    #
    def write_worksheet #:nodoc:
      schema                 = 'http://schemas.openxmlformats.org/'
      attributes = [
                    'xmlns',    schema + 'spreadsheetml/2006/main',
                    'xmlns:r',  schema + 'officeDocument/2006/relationships'
                   ]
      if @excel_version == 2010
        attributes << 'xmlns:mc' << "#{schema}markup-compatibility/2006"
        attributes << 'xmlns:x14ac' <<
          'http://schemas.microsoft.com/office/spreadsheetml/2009/9/ac'
        attributes << 'mc:Ignorable' << 'x14ac'
      end
      @writer.start_tag('worksheet', attributes)
    end

    #
    # Write the <sheetPr> element for Sheet level properties.
    #
    def write_sheet_pr #:nodoc:
      return if !fit_page? && !filter_on? && !tab_color? && !outline_changed?
      attributes = []
      (attributes << 'filterMode' << 1) if filter_on?

      if fit_page? || tab_color? || outline_changed?
        @writer.tag_elements('sheetPr', attributes) do
          write_tab_color
          write_outline_pr
          write_page_set_up_pr
        end
      else
        @writer.empty_tag('sheetPr', attributes)
      end
    end

    #
    # Write the <pageSetUpPr> element.
    #
    def write_page_set_up_pr #:nodoc:
      return unless fit_page?

      attributes = ['fitToPage', 1]
      @writer.empty_tag('pageSetUpPr', attributes)
    end

    # Write the <dimension> element. This specifies the range of cells in the
    # worksheet. As a special case, empty spreadsheets use 'A1' as a range.
    #
    def write_dimension #:nodoc:
      if !@dim_rowmin && !@dim_colmin
        # If the min dims are undefined then no dimensions have been set
        # and we use the default 'A1'.
        ref = 'A1'
      elsif !@dim_rowmin && @dim_colmin
        # If the row dims aren't set but the column dims are then they
        # have been changed via set_column().
        if @dim_colmin == @dim_colmax
          # The dimensions are a single cell and not a range.
          ref = xl_rowcol_to_cell(0, @dim_colmin)
        else
          # The dimensions are a cell range.
          cell_1 = xl_rowcol_to_cell(0, @dim_colmin)
          cell_2 = xl_rowcol_to_cell(0, @dim_colmax)
          ref = cell_1 + ':' + cell_2
        end
      elsif @dim_rowmin == @dim_rowmax && @dim_colmin == @dim_colmax
        # The dimensions are a single cell and not a range.
        ref = xl_rowcol_to_cell(@dim_rowmin, @dim_colmin)
      else
        # The dimensions are a cell range.
        cell_1 = xl_rowcol_to_cell(@dim_rowmin, @dim_colmin)
        cell_2 = xl_rowcol_to_cell(@dim_rowmax, @dim_colmax)
        ref = cell_1 + ':' + cell_2
      end
      attributes = ['ref', ref]
      @writer.empty_tag('dimension', attributes)
    end
    #
    # Write the <sheetViews> element.
    #
    def write_sheet_views #:nodoc:
      @writer.tag_elements('sheetViews', []) { write_sheet_view }
    end

    def write_sheet_view #:nodoc:
      attributes = []
      # Hide screen gridlines if required
      attributes << 'showGridLines' << 0 unless screen_gridlines?

      # Hide zeroes in cells.
      attributes << 'showZeros' << 0 unless show_zeros?

      # Display worksheet right to left for Hebrew, Arabic and others.
      attributes << 'rightToLeft' << 1 if @right_to_left

      # Show that the sheet tab is selected.
      attributes << 'tabSelected' << 1 if @selected

      # Turn outlines off. Also required in the outlinePr element.
      attributes << "showOutlineSymbols" << 0 if @outline_on

      # Set the page view/layout mode if required.
      # TODO. Add pageBreakPreview mode when requested.
      (attributes << 'view' << 'pageLayout') if page_view?

      # Set the zoom level.
      if @zoom != 100
        (attributes << 'zoomScale' << @zoom) unless page_view?
        (attributes << 'zoomScaleNormal' << @zoom) if zoom_scale_normal?
      end

      attributes << 'workbookViewId' << 0

      if @panes.empty? && @selections.empty?
        @writer.empty_tag('sheetView', attributes)
      else
        @writer.tag_elements('sheetView', attributes) do
          write_panes
          write_selections
        end
      end
    end

    #
    # Write the <selection> elements.
    #
    def write_selections #:nodoc:
      @selections.each { |selection| write_selection(*selection) }
    end

    #
    # Write the <selection> element.
    #
    def write_selection(pane, active_cell, sqref) #:nodoc:
      attributes  = []
      (attributes << 'pane' << pane) if pane
      (attributes << 'activeCell' << active_cell) if active_cell
      (attributes << 'sqref' << sqref) if sqref

      @writer.empty_tag('selection', attributes)
    end

    #
    # Write the <sheetFormatPr> element.
    #
    def write_sheet_format_pr #:nodoc:
      base_col_width     = 10
      default_row_height = 15

      attributes = ['defaultRowHeight', default_row_height]
      attributes << 'outlineLevelRow' << @outline_row_level if @outline_row_level > 0
      attributes << 'outlineLevelCol' << @outline_col_level if @outline_col_level > 0
      if @excel_version == 2010
        attributes << 'x14ac:dyDescent' << '0.25'
      end
      @writer.empty_tag('sheetFormatPr', attributes)
    end

    #
    # Write the <cols> element and <col> sub elements.
    #
    def write_cols #:nodoc:
      # Exit unless some column have been formatted.
      return if @colinfo.empty?

      @writer.tag_elements('cols') do
        @colinfo.each {|col_info| write_col_info(*col_info) }
      end
    end

    #
    # Write the <col> element.
    #
    def write_col_info(*args) #:nodoc:
      min    = args[0] || 0     # First formatted column.
      max    = args[1] || 0     # Last formatted column.
      width  = args[2]          # Col width in user units.
      format = args[3]          # Format index.
      hidden = args[4] || 0     # Hidden flag.
      level  = args[5] || 0     # Outline level.
      collapsed = args[6] || 0  # Outline level.
      xf_index = format ? format.get_xf_index : 0

      custom_width = true
      custom_width = false if width.nil? && hidden == 0
      custom_width = false if width == 8.43

      if width.nil?
        width = hidden == 0 ? 8.43 : 0
       end

      # Convert column width from user units to character width.
      max_digit_width = 7.0    # For Calabri 11.
      padding         = 5.0
      if width && width > 0
        width = ((width * max_digit_width + padding) / max_digit_width * 256).to_i/256.0
        width = width.to_i if width.to_s =~ /\.0+$/
      end
      attributes = [
          'min',   min + 1,
          'max',   max + 1,
          'width', width
      ]

      (attributes << 'style' << xf_index) if xf_index != 0
      (attributes << 'hidden' << 1)       if hidden != 0
      (attributes << 'customWidth' << 1)  if custom_width
      (attributes << 'outlineLevel' << level) if level != 0
      (attributes << 'collapsed'    << 1) if collapsed != 0

      @writer.empty_tag('col', attributes)
    end

    #
    # Write the <sheetData> element.
    #
    def write_sheet_data #:nodoc:
      if !@dim_rowmin
        # If the dimensions aren't defined then there is no data to write.
        @writer.empty_tag('sheetData')
      else
        @writer.tag_elements('sheetData') { write_rows }
      end
    end

    #
    # Write out the worksheet data as a series of rows and cells.
    #
    def write_rows #:nodoc:
      calculate_spans

      (@dim_rowmin .. @dim_rowmax).each do |row_num|
        # Skip row if it doesn't contain row formatting or cell data.
        next if not_contain_formatting_or_data?(row_num)

        span_index = row_num / 16
        span       = @row_spans[span_index]

        # Write the cells if the row contains data.
        if @cell_data_table[row_num]
          if !@set_rows[row_num]
            write_row_element(row_num, span)
          else
            write_row_element(row_num, span, *(@set_rows[row_num]))
          end

          write_cell_column_dimension(row_num)
          @writer.end_tag('row')
        elsif @comments[row_num]
          write_empty_row(row_num, span, *(@set_rows[row_num]))
        else
          # Row attributes only.
          write_empty_row(row_num, nil, *(@set_rows[row_num]))
        end
      end
    end

    #
    # Write out the worksheet data as a single row with cells. This method is
    # used when memory optimisation is on. A single row is written and the data
    # table is reset. That way only one row of data is kept in memory at any one
    # time. We don't write span data in the optimised case since it is optional.
    #
    def write_single_row(current_row = 0) #:nodoc:
      row_num     = @previous_row

      # Set the new previous row as the current row.
      @previous_row = current_row

      # Skip row if it doesn't contain row formatting, cell data or a comment.
      return not_contain_formatting_or_data?(row_num)

      # Write the cells if the row contains data.
      if @cell_data_table[row_num]
        if !@set_rows[row_num]
          write_row(row_num)
        else
          write_row(row_num, nil, @set_rows[row_num])
        end

        write_cell_column_dimension(row_num)
        @writer.end_tag('row')
      else
        # Row attributes or comments only.
        write_empty_row(row_num, nil, @set_rows[row_num])
      end

      # Reset table.
      @cell_data_table = {}
    end

    def not_contain_formatting_or_data?(row_num) # :nodoc:
      !@set_rows[row_num] && !@cell_data_table[row_num] && !@comments.has_comment_in_row?(row_num)
    end

    def write_cell_column_dimension(row_num)  # :nodoc:
      (@dim_colmin .. @dim_colmax).each do |col_num|
        @cell_data_table[row_num][col_num].write_cell if @cell_data_table[row_num][col_num]
      end
    end

    #
    # Write the <row> element.
    #
    def write_row_element(r, spans = nil, height = 15, format = nil, hidden = false, level = 0, collapsed = false, empty_row = false) #:nodoc:
      height    ||= 15
      hidden    ||= 0
      level     ||= 0
      collapsed ||= 0
      empty_row ||= 0
      xf_index = format ? format.get_xf_index : 0

      attributes = ['r',  r + 1]

      (attributes << 'spans'        << spans) if spans
      (attributes << 's'            << xf_index) if xf_index != 0
      (attributes << 'customFormat' << 1    ) if format
      (attributes << 'ht'           << height) if height != 15
      (attributes << 'hidden'       << 1    ) if ptrue?(hidden)
      (attributes << 'customHeight' << 1    ) if height != 15
      (attributes << 'outlineLevel' << level) if ptrue?(level)
      (attributes << 'collapsed'    << 1    ) if ptrue?(collapsed)

      if @excel_version == 2010
        attributes << 'x14ac:dyDescent' << '0.25'
      end
      if ptrue?(empty_row)
        @writer.empty_tag('row', attributes)
      else
        @writer.start_tag('row', attributes)
      end
    end

    #
    # Write and empty <row> element, i.e., attributes only, no cell data.
    #
    def write_empty_row(*args) #:nodoc:
        new_args = args.dup
        new_args[7] = 1
        write_row_element(*new_args)
    end

    #
    # Write the frozen or split <pane> elements.
    #
    def write_panes #:nodoc:
      return if @panes.empty?

      if @panes[4] == 2
        write_split_panes(*(@panes))
      else
        write_freeze_panes(*(@panes))
      end
    end

    #
    # Write the <pane> element for freeze panes.
    #
    def write_freeze_panes(row, col, top_row, left_col, type) #:nodoc:
      y_split       = row
      x_split       = col
      top_left_cell = xl_rowcol_to_cell(top_row, left_col)

      # Move user cell selection to the panes.
      unless @selections.empty?
        dummy, active_cell, sqref = @selections[0]
        @selections = []
      end

      active_cell ||= nil
      sqref       ||= nil
      active_pane = set_active_pane_and_cell_selections(row, col, row, col, active_cell, sqref)

      # Set the pane type.
      if type == 0
        state = 'frozen'
      elsif type == 1
        state = 'frozenSplit'
      else
        state = 'split'
      end

      attributes = []
      (attributes << 'xSplit' << x_split) if x_split > 0
      (attributes << 'ySplit' << y_split) if y_split > 0
      attributes << 'topLeftCell' << top_left_cell
      attributes << 'activePane'  << active_pane
      attributes << 'state'       << state

      @writer.empty_tag('pane', attributes)
    end

    #
    # Write the <pane> element for split panes.
    #
    # See also, implementers note for split_panes().
    #
    def write_split_panes(row, col, top_row, left_col, type) #:nodoc:
      has_selection = false
      y_split = row
      x_split = col

      # Move user cell selection to the panes.
      if !@selections.empty?
        dummy, active_cell, sqref = @selections[0]
        @selections = []
        has_selection = true
      end

      # Convert the row and col to 1/20 twip units with padding.
      y_split = (20 * y_split + 300).to_i if y_split > 0
      x_split = calculate_x_split_width(x_split) if x_split > 0

      # For non-explicit topLeft definitions, estimate the cell offset based
      # on the pixels dimensions. This is only a workaround and doesn't take
      # adjusted cell dimensions into account.
      if top_row == row && left_col == col
        top_row  = (0.5 + (y_split - 300) / 20 / 15).to_i
        left_col = (0.5 + (x_split - 390) / 20 / 3 * 4 / 64).to_i
      end

      top_left_cell = xl_rowcol_to_cell(top_row, left_col)

      # If there is no selection set the active cell to the top left cell.
      if !has_selection
        active_cell = top_left_cell
        sqref       = top_left_cell
      end
      active_pane = set_active_pane_and_cell_selections(row, col, top_row, left_col, active_cell, sqref)

      attributes = []
      (attributes << 'xSplit' << x_split) if x_split > 0
      (attributes << 'ySplit' << y_split) if y_split > 0
      attributes << 'topLeftCell' << top_left_cell
      (attributes << 'activePane' << active_pane) if has_selection

      @writer.empty_tag('pane', attributes)
    end

    #
    # Convert column width from user units to pane split width.
    #
    def calculate_x_split_width(width) #:nodoc:
      max_digit_width = 7    # For Calabri 11.
      padding         = 5

      # Convert to pixels.
      if width < 1
        pixels = int(width * 12 + 0.5)
      else
        pixels = (width * max_digit_width + 0.5).to_i + padding
      end

      # Convert to points.
      points = pixels * 3 / 4

      # Convert to twips (twentieths of a point).
      twips = points * 20

      # Add offset/padding.
      twips + 390
    end

    #
    # Write the <sheetCalcPr> element for the worksheet calculation properties.
    #
    def write_sheet_calc_pr #:nodoc:
      full_calc_on_load = 1

      attributes = ['fullCalcOnLoad', full_calc_on_load]

      @writer.empty_tag('sheetCalcPr', attributes)
    end

    #
    # Write the <phoneticPr> element.
    #
    def write_phonetic_pr #:nodoc:
      font_id = 1
      type    = 'noConversion'

      attributes = [
          'fontId', font_id,
          'type',   type
      ]

      @writer.empty_tag('phoneticPr', attributes)
    end

    #
    # Write the <pageMargins> element.
    #
    def write_page_margins #:nodoc:
      @writer.empty_tag('pageMargins', @print_style.attributes)
    end

    #
    # Write the <pageSetup> element.
    #
    # The following is an example taken from Excel.
    #
    # <pageSetup
    #     paperSize="9"
    #     scale="110"
    #     fitToWidth="2"
    #     fitToHeight="2"
    #     pageOrder="overThenDown"
    #     orientation="portrait"
    #     blackAndWhite="1"
    #     draft="1"
    #     horizontalDpi="200"
    #     verticalDpi="200"
    #     r:id="rId1"
    # />
    #
    def write_page_setup #:nodoc:
      attributes = []

      return unless page_setup_changed?

      # Set paper size.
      attributes << 'paperSize' << @paper_size if @paper_size

      # Set the scale
      attributes << 'scale' << @print_style.scale if @print_style.scale != 100

      # Set the "Fit to page" properties.
      attributes << 'fitToWidth' << @print_style.fit_width if @print_style.fit_page && @print_style.fit_width != 1

      attributes << 'fitToHeight' << @print_style.fit_height if @print_style.fit_page && @print_style.fit_height != 1

      # Set the page print direction.
      attributes << 'pageOrder' << "overThenDown" if print_across?

      # Set page orientation.
      if @print_style.orientation?
        attributes << 'orientation' << 'portrait'
      else
        attributes << 'orientation' << 'landscape'
      end

      @writer.empty_tag('pageSetup', attributes)
    end

    #
    # Write the <mergeCells> element.
    #
    def write_merge_cells #:nodoc:
      write_some_elements('mergeCells', @merge) do
        @merge.each { |merged_range| write_merge_cell(merged_range) }
      end
    end

    def write_some_elements(tag, container)
      return if container.empty?

      attributes = ['count', container.size]

      @writer.tag_elements(tag, attributes) do
        yield
      end
    end

    #
    # Write the <mergeCell> element.
    #
    def write_merge_cell(merged_range) #:nodoc:
      row_min, col_min, row_max, col_max = merged_range

      # Convert the merge dimensions to a cell range.
      cell_1 = xl_rowcol_to_cell(row_min, col_min)
      cell_2 = xl_rowcol_to_cell(row_max, col_max)
      ref    = "#{cell_1}:#{cell_2}"

      attributes = ['ref', ref]

      @writer.empty_tag('mergeCell', attributes)
    end

    #
    # Write the <printOptions> element.
    #
    def write_print_options #:nodoc:
      attributes = []

      return unless print_options_changed?

      # Set horizontal centering.
      attributes << 'horizontalCentered' << 1 if hcenter?

      # Set vertical centering.
      attributes << 'verticalCentered' << 1   if vcenter?

      # Enable row and column headers.
      attributes << 'headings' << 1 if print_headers?

      # Set printed gridlines.
      attributes << 'gridLines' << 1 if print_gridlines?

      @writer.empty_tag('printOptions', attributes)
    end

    #
    # Write the <headerFooter> element.
    #
    def write_header_footer #:nodoc:
      return unless header_footer_changed?

      @writer.tag_elements('headerFooter') do
        write_odd_header if @header && @header != ''
        write_odd_footer if @footer && @footer != ''
      end
    end

    #
    # Write the <oddHeader> element.
    #
    def write_odd_header #:nodoc:
      @writer.data_element('oddHeader', @header)
    end

    #
    # Write the <oddFooter> element.
    #
    def write_odd_footer #:nodoc:
      @writer.data_element('oddFooter', @footer)
    end

    #
    # Write the <rowBreaks> element.
    #
    def write_row_breaks #:nodoc:
      write_breaks('rowBreaks')
    end

    #
    # Write the <colBreaks> element.
    #
    def write_col_breaks #:nodoc:
      write_breaks('colBreaks')
    end

    def write_breaks(tag) # :nodoc:
      case tag
      when 'rowBreaks'
        page_breaks = sort_pagebreaks(*(@print_style.hbreaks))
        max = 16383
      when 'colBreaks'
        page_breaks = sort_pagebreaks(*(@print_style.vbreaks))
        max = 1048575
      else
        raise "Invalid parameter '#{tag}' in write_breaks."
      end
      count = page_breaks.size

      return if page_breaks.empty?

      attributes = ['count', count, 'manualBreakCount', count]

      @writer.tag_elements(tag, attributes) do
        page_breaks.each { |num| write_brk(num, max) }
      end
    end
    #
    # Write the <brk> element.
    #
    def write_brk(id, max) #:nodoc:
      attributes = [
        'id',  id,
        'max', max,
        'man', 1
      ]

      @writer.empty_tag('brk', attributes)
    end

    #
    # Write the <autoFilter> element.
    #
    def write_auto_filter #:nodoc:
      return unless autofilter_ref?

      attributes = ['ref', @autofilter_ref]

      if filter_on?
        # Autofilter defined active filters.
        @writer.tag_elements('autoFilter', attributes) do
          write_autofilters
        end
      else
        # Autofilter defined without active filters.
        @writer.empty_tag('autoFilter', attributes)
      end
    end

    #
    # Function to iterate through the columns that form part of an autofilter
    # range and write the appropriate filters.
    #
    def write_autofilters #:nodoc:
      col1, col2 = @filter_range

      (col1 .. col2).each do |col|
        # Skip if column doesn't have an active filter.
        next unless @filter_cols[col]

        # Retrieve the filter tokens and write the autofilter records.
        tokens = @filter_cols[col]
        type   = @filter_type[col]

        # Filters are relative to first column in the autofilter.
        write_filter_column(col - col1, type, *tokens)
      end
    end

    #
    # Write the <filterColumn> element.
    #
    def write_filter_column(col_id, type, *filters) #:nodoc:
      attributes = ['colId', col_id]

      @writer.tag_elements('filterColumn', attributes) do
        if type == 1
          # Type == 1 is the new XLSX style filter.
          write_filters(*filters)
        else
          # Type == 0 is the classic "custom" filter.
          write_custom_filters(*filters)
        end
      end
    end

    #
    # Write the <filters> element.
    #
    def write_filters(*filters) #:nodoc:
      if filters.size == 1 && filters[0] == 'blanks'
        # Special case for blank cells only.
        @writer.empty_tag('filters', ['blank', 1])
      else
        # General case.
        @writer.tag_elements('filters') do
          filters.each { |filter| write_filter(filter) }
        end
      end
    end

    #
    # Write the <filter> element.
    #
    def write_filter(val) #:nodoc:
      @writer.empty_tag('filter', ['val', val])
    end


    #
    # Write the <customFilters> element.
    #
    def write_custom_filters(*tokens) #:nodoc:
      if tokens.size == 2
        # One filter expression only.
        @writer.tag_elements('customFilters') { write_custom_filter(*tokens) }
      else
        # Two filter expressions.

        # Check if the "join" operand is "and" or "or".
        if tokens[2] == 0
          attributes = ['and', 1]
        else
          attributes = ['and', 0]
        end

        # Write the two custom filters.
        @writer.tag_elements('customFilters', attributes) do
          write_custom_filter(tokens[0], tokens[1])
          write_custom_filter(tokens[3], tokens[4])
        end
      end
    end


    #
    # Write the <customFilter> element.
    #
    def write_custom_filter(operator, val) #:nodoc:
      operators = {
        1  => 'lessThan',
        2  => 'equal',
        3  => 'lessThanOrEqual',
        4  => 'greaterThan',
        5  => 'notEqual',
        6  => 'greaterThanOrEqual',
        22 => 'equal'
      }

      # Convert the operator from a number to a descriptive string.
      if operators[operator]
        operator = operators[operator]
      else
        raise "Unknown operator = #{operator}\n"
      end

      # The 'equal' operator is the default attribute and isn't stored.
      attributes = []
      attributes << 'operator' << operator unless operator == 'equal'
      attributes << 'val' << val

      @writer.empty_tag('customFilter', attributes)
    end

    #
    # Write the <hyperlinks> element. The attributes are different for internal
    # and external links.
    #
    def write_hyperlinks #:nodoc:
      return if @hlink_refs.empty?

      @writer.tag_elements('hyperlinks') do
        @hlink_refs.each do |aref|
          type, *args = aref

          if type == 1
            write_hyperlink_external(*args)
          elsif type == 2
            write_hyperlink_internal(*args)
          end
        end
      end
    end

    #
    # Write the <hyperlink> element for external links.
    #
    def write_hyperlink_external(row, col, id, location = nil, tooltip = nil) #:nodoc:
      ref = xl_rowcol_to_cell(row, col)
      r_id = "rId#{id}"

      attributes = ['ref', ref, 'r:id', r_id]

      attributes << 'location' << location  if location
      attributes << 'tooltip'  << tooltip   if tooltip

      @writer.empty_tag('hyperlink', attributes)
    end

    #
    # Write the <hyperlink> element for internal links.
    #
    def write_hyperlink_internal(row, col, location, display, tooltip = nil) #:nodoc:
      ref = xl_rowcol_to_cell(row, col)

      attributes = ['ref', ref, 'location', location]

      attributes << 'tooltip' << tooltip if tooltip
      attributes << 'display' << display

      @writer.empty_tag('hyperlink', attributes)
    end

    #
    # Write the <tabColor> element.
    #
    def write_tab_color #:nodoc:
      return unless tab_color?

      attributes = ['rgb', get_palette_color(@tab_color)]
      @writer.empty_tag('tabColor', attributes)
    end

    #
    # Write the <outlinePr> element.
    #
    def write_outline_pr
      attributes = []

      return unless outline_changed?

      attributes << "applyStyles"  << 1 if @outline_style != 0
      attributes << "summaryBelow" << 0 if @outline_below == 0
      attributes << "summaryRight" << 0 if @outline_right == 0
      attributes << "showOutlineSymbols" << 0 if @outline_on == 0

      @writer.empty_tag('outlinePr', attributes)
    end

    #
    # Write the <sheetProtection> element.
    #
    def write_sheet_protection #:nodoc:
      return unless protect?

      attributes = []
      attributes << "password"         << @protect[:password] if ptrue?(@protect[:password])
      attributes << "sheet"            << 1 if ptrue?(@protect[:sheet])
      attributes << "content"          << 1 if ptrue?(@protect[:content])
      attributes << "objects"          << 1 unless ptrue?(@protect[:objects])
      attributes << "scenarios"        << 1 unless ptrue?(@protect[:scenarios])
      attributes << "formatCells"      << 0 if ptrue?(@protect[:format_cells])
      attributes << "formatColumns"    << 0 if ptrue?(@protect[:format_columns])
      attributes << "formatRows"       << 0 if ptrue?(@protect[:format_rows])
      attributes << "insertColumns"    << 0 if ptrue?(@protect[:insert_columns])
      attributes << "insertRows"       << 0 if ptrue?(@protect[:insert_rows])
      attributes << "insertHyperlinks" << 0 if ptrue?(@protect[:insert_hyperlinks])
      attributes << "deleteColumns"    << 0 if ptrue?(@protect[:delete_columns])
      attributes << "deleteRows"       << 0 if ptrue?(@protect[:delete_rows])

      attributes << "selectLockedCells" << 1 unless ptrue?(@protect[:select_locked_cells])

      attributes << "sort"        << 0 if ptrue?(@protect[:sort])
      attributes << "autoFilter"  << 0 if ptrue?(@protect[:autofilter])
      attributes << "pivotTables" << 0 if ptrue?(@protect[:pivot_tables])

      attributes << "selectUnlockedCells" << 1 unless ptrue?(@protect[:select_unlocked_cells])

      @writer.empty_tag('sheetProtection', attributes)
    end

    #
    # Write the <drawing> elements.
    #
    def write_drawings #:nodoc:
      return unless drawing?
      @rel_count += 1
      write_drawing(@rel_count)
    end

    #
    # Write the <drawing> element.
    #
    def write_drawing(id) #:nodoc:
      r_id = "rId#{id}"

      attributes = ['r:id', r_id]

      @writer.empty_tag('drawing', attributes)
    end

    #
    # Write the <legacyDrawing> element.
    #
    def write_legacy_drawing #:nodoc:
      return unless has_comments?

      # Increment the relationship id for any drawings or comments.
      @rel_count += 1
      id = @rel_count

      attributes = ['r:id', "rId#{id}"]

      @writer.empty_tag('legacyDrawing', attributes)
    end

    #
    # Write the <font> element.
    #
    def write_font(writer, format) #:nodoc:
      writer.tag_elements('rPr') do
        writer.empty_tag('b')       if format.bold?
        writer.empty_tag('i')       if format.italic?
        writer.empty_tag('strike')  if format.strikeout?
        writer.empty_tag('outline') if format.outline?
        writer.empty_tag('shadow')  if format.shadow?

        # Handle the underline variants.
        write_underline(writer, format.underline) if format.underline?

        write_vert_align(writer, 'superscript') if format.font_script == 1
        write_vert_align(writer, 'subscript')   if format.font_script == 2

        writer.empty_tag('sz', ['val', format.size])

        theme = format.theme
        color = format.color
        if ptrue?(theme)
          write_color(writer, 'theme', theme)
        elsif ptrue?(color)
          color = get_palette_color(color)
          write_color(writer, 'rgb', color)
        else
          write_color(writer, 'theme', 1)
        end

        writer.empty_tag('rFont',  ['val', format.font])
        writer.empty_tag('family', ['val', format.font_family])

        if format.font == 'Calibri' && format.hyperlink == 0
          writer.empty_tag('scheme', ['val', format.font_scheme])
        end
      end
    end

    #
    # Write the underline font element.
    #
    def write_underline(writer, underline) #:nodoc:
      attributes = underline_attributes(underline)
      writer.empty_tag('u', attributes)
    end

    #
    # Write the <vertAlign> font sub-element.
    #
    def write_vert_align(writer, val) #:nodoc:
      attributes = ['val', val]

      writer.empty_tag('vertAlign', attributes)
    end

    #
    # Write the <color> element.
    #
    def write_color(writer, name, value) #:nodoc:
      attributes = [name, value]

      writer.empty_tag('color', attributes)
    end

    #
    # Write the <tableParts> element.
    #
    def write_table_parts
      # Return if worksheet doesn't contain any tables.
      return if @tables.empty?

      attributes = ['count', @tables.size]

      @writer.tag_elements('tableParts', attributes) do

        @tables.each do |table|
          # Write the tablePart element.
          @rel_count += 1
          write_table_part(@rel_count)
        end
      end
    end

    #
    # Write the <tablePart> element.
    #
    def write_table_part(id)
      r_id = "rId#{id}"

      attributes = ['r:id', r_id]

      @writer.empty_tag('tablePart', attributes)
    end

    def spark_styles  # :nodoc:
      [
       {   # 0
         :series   => { :_theme => "4", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "5" },
         :markers  => { :_theme => "4", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "4", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "4", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "4" },
         :low      => { :_theme => "4" }
       },
       {   # 1
         :series   => { :_theme => "4", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "5" },
         :markers  => { :_theme => "4", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "4", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "4", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "4" },
         :low      => { :_theme => "4" }
       },
       {   # 2
         :series   => { :_theme => "5", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "6" },
         :markers  => { :_theme => "5", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "5", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "5", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "5" },
         :low      => { :_theme => "5" }
       },
       {   # 3
         :series   => { :_theme => "6", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "7" },
         :markers  => { :_theme => "6", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "6", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "6", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "6" },
         :low      => { :_theme => "6" }
       },
       {   # 4
         :series   => { :_theme => "7", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "8" },
         :markers  => { :_theme => "7", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "7", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "7", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "7" },
         :low      => { :_theme => "7" }
       },
       {   # 5
         :series   => { :_theme => "8", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "9" },
         :markers  => { :_theme => "8", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "8", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "8", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "8" },
         :low      => { :_theme => "8" }
       },
       {   # 6
         :series   => { :_theme => "9", :_tint => "-0.499984740745262" },
         :negative => { :_theme => "4" },
         :markers  => { :_theme => "9", :_tint => "-0.499984740745262" },
         :first    => { :_theme => "9", :_tint => "0.39997558519241921" },
         :last     => { :_theme => "9", :_tint => "0.39997558519241921" },
         :high     => { :_theme => "9" },
         :low      => { :_theme => "9" }
       },
       {   # 7
         :series   => { :_theme => "4", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "5" },
         :markers  => { :_theme => "5", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "5", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "5", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "5", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "5", :_tint => "-0.249977111117893" }
       },
       {   # 8
         :series   => { :_theme => "5", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "6" },
         :markers  => { :_theme => "6", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "6", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "6", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "6", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "6", :_tint => "-0.249977111117893" }
       },
       {   # 9
         :series   => { :_theme => "6", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "7" },
         :markers  => { :_theme => "7", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "7", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "7", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "7", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "7", :_tint => "-0.249977111117893" }
       },
       {   # 10
         :series   => { :_theme => "7", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "8" },
         :markers  => { :_theme => "8", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "8", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "8", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "8", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "8", :_tint => "-0.249977111117893" }
       },
       {   # 11
         :series   => { :_theme => "8", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "9" },
         :markers  => { :_theme => "9", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "9", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "9", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "9", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "9", :_tint => "-0.249977111117893" }
       },
       {   # 12
         :series   => { :_theme => "9", :_tint => "-0.249977111117893" },
         :negative => { :_theme => "4" },
         :markers  => { :_theme => "4", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "4", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "4", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "4", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "4", :_tint => "-0.249977111117893" }
       },
       {   # 13
         :series   => { :_theme => "4" },
         :negative => { :_theme => "5" },
         :markers  => { :_theme => "4", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "4", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "4", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "4", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "4", :_tint => "-0.249977111117893" }
       },
       {   # 14
         :series   => { :_theme => "5" },
         :negative => { :_theme => "6" },
         :markers  => { :_theme => "5", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "5", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "5", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "5", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "5", :_tint => "-0.249977111117893" }
       },
       {   # 15
         :series   => { :_theme => "6" },
         :negative => { :_theme => "7" },
         :markers  => { :_theme => "6", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "6", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "6", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "6", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "6", :_tint => "-0.249977111117893" }
       },
       {   # 16
         :series   => { :_theme => "7" },
         :negative => { :_theme => "8" },
         :markers  => { :_theme => "7", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "7", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "7", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "7", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "7", :_tint => "-0.249977111117893" }
       },
       {   # 17
         :series   => { :_theme => "8" },
         :negative => { :_theme => "9" },
         :markers  => { :_theme => "8", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "8", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "8", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "8", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "8", :_tint => "-0.249977111117893" }
       },
       {   # 18
         :series   => { :_theme => "9" },
         :negative => { :_theme => "4" },
         :markers  => { :_theme => "9", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "9", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "9", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "9", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "9", :_tint => "-0.249977111117893" }
       },
       {   # 19
         :series   => { :_theme => "4", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "4", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "4", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "4", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "4", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "4", :_tint => "-0.499984740745262" }
       },
       {   # 20
         :series   => { :_theme => "5", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "5", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "5", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "5", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "5", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "5", :_tint => "-0.499984740745262" }
       },
       {   # 21
         :series   => { :_theme => "6", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "6", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "6", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "6", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "6", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "6", :_tint => "-0.499984740745262" }
       },
       {   # 22
         :series   => { :_theme => "7", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "7", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "7", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "7", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "7", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "7", :_tint => "-0.499984740745262" }
       },
       {   # 23
         :series   => { :_theme => "8", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "8", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "8", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "8", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "8", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "8", :_tint => "-0.499984740745262" }
       },
       {   # 24
         :series   => { :_theme => "9", :_tint => "0.39997558519241921" },
         :negative => { :_theme => "0", :_tint => "-0.499984740745262" },
         :markers  => { :_theme => "9", :_tint => "0.79998168889431442" },
         :first    => { :_theme => "9", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "9", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "9", :_tint => "-0.499984740745262" },
         :low      => { :_theme => "9", :_tint => "-0.499984740745262" }
       },
       {   # 25
         :series   => { :_theme => "1", :_tint => "0.499984740745262" },
         :negative => { :_theme => "1", :_tint => "0.249977111117893" },
         :markers  => { :_theme => "1", :_tint => "0.249977111117893" },
         :first    => { :_theme => "1", :_tint => "0.249977111117893" },
         :last     => { :_theme => "1", :_tint => "0.249977111117893" },
         :high     => { :_theme => "1", :_tint => "0.249977111117893" },
         :low      => { :_theme => "1", :_tint => "0.249977111117893" }
       },
       {   # 26
         :series   => { :_theme => "1", :_tint => "0.34998626667073579" },
         :negative => { :_theme => "0", :_tint => "-0.249977111117893" },
         :markers  => { :_theme => "0", :_tint => "-0.249977111117893" },
         :first    => { :_theme => "0", :_tint => "-0.249977111117893" },
         :last     => { :_theme => "0", :_tint => "-0.249977111117893" },
         :high     => { :_theme => "0", :_tint => "-0.249977111117893" },
         :low      => { :_theme => "0", :_tint => "-0.249977111117893" }
       },
       {   # 27
         :series   => { :_rgb => "FF323232" },
         :negative => { :_rgb => "FFD00000" },
         :markers  => { :_rgb => "FFD00000" },
         :first    => { :_rgb => "FFD00000" },
         :last     => { :_rgb => "FFD00000" },
         :high     => { :_rgb => "FFD00000" },
         :low      => { :_rgb => "FFD00000" }
       },
       {   # 28
         :series   => { :_rgb => "FF000000" },
         :negative => { :_rgb => "FF0070C0" },
         :markers  => { :_rgb => "FF0070C0" },
         :first    => { :_rgb => "FF0070C0" },
         :last     => { :_rgb => "FF0070C0" },
         :high     => { :_rgb => "FF0070C0" },
         :low      => { :_rgb => "FF0070C0" }
       },
       {   # 29
         :series   => { :_rgb => "FF376092" },
         :negative => { :_rgb => "FFD00000" },
         :markers  => { :_rgb => "FFD00000" },
         :first    => { :_rgb => "FFD00000" },
         :last     => { :_rgb => "FFD00000" },
         :high     => { :_rgb => "FFD00000" },
         :low      => { :_rgb => "FFD00000" }
       },
       {   # 30
         :series   => { :_rgb => "FF0070C0" },
         :negative => { :_rgb => "FF000000" },
         :markers  => { :_rgb => "FF000000" },
         :first    => { :_rgb => "FF000000" },
         :last     => { :_rgb => "FF000000" },
         :high     => { :_rgb => "FF000000" },
         :low      => { :_rgb => "FF000000" }
       },
       {   # 31
         :series   => { :_rgb => "FF5F5F5F" },
         :negative => { :_rgb => "FFFFB620" },
         :markers  => { :_rgb => "FFD70077" },
         :first    => { :_rgb => "FF5687C2" },
         :last     => { :_rgb => "FF359CEB" },
         :high     => { :_rgb => "FF56BE79" },
         :low      => { :_rgb => "FFFF5055" }
       },
       {   # 32
         :series   => { :_rgb => "FF5687C2" },
         :negative => { :_rgb => "FFFFB620" },
         :markers  => { :_rgb => "FFD70077" },
         :first    => { :_rgb => "FF777777" },
         :last     => { :_rgb => "FF359CEB" },
         :high     => { :_rgb => "FF56BE79" },
         :low      => { :_rgb => "FFFF5055" }
       },
       {   # 33
         :series   => { :_rgb => "FFC6EFCE" },
         :negative => { :_rgb => "FFFFC7CE" },
         :markers  => { :_rgb => "FF8CADD6" },
         :first    => { :_rgb => "FFFFDC47" },
         :last     => { :_rgb => "FFFFEB9C" },
         :high     => { :_rgb => "FF60D276" },
         :low      => { :_rgb => "FFFF5367" }
       },
       {   # 34
         :series   => { :_rgb => "FF00B050" },
         :negative => { :_rgb => "FFFF0000" },
         :markers  => { :_rgb => "FF0070C0" },
         :first    => { :_rgb => "FFFFC000" },
         :last     => { :_rgb => "FFFFC000" },
         :high     => { :_rgb => "FF00B050" },
         :low      => { :_rgb => "FFFF0000" }
       },
       {   # 35
         :series   => { :_theme => "3" },
         :negative => { :_theme => "9" },
         :markers  => { :_theme => "8" },
         :first    => { :_theme => "4" },
         :last     => { :_theme => "5" },
         :high     => { :_theme => "6" },
         :low      => { :_theme => "7" }
       },
       {   # 36
         :series   => { :_theme => "1" },
         :negative => { :_theme => "9" },
         :markers  => { :_theme => "8" },
         :first    => { :_theme => "4" },
         :last     => { :_theme => "5" },
         :high     => { :_theme => "6" },
         :low      => { :_theme => "7" }
       }
      ]
    end

    def valid_sparkline_parameter  # :nodoc:
      {
        :location        => 1,
        :range           => 1,
        :type            => 1,
        :high_point      => 1,
        :low_point       => 1,
        :negative_points => 1,
        :first_point     => 1,
        :last_point      => 1,
        :markers         => 1,
        :style           => 1,
        :series_color    => 1,
        :negative_color  => 1,
        :markers_color   => 1,
        :first_color     => 1,
        :last_color      => 1,
        :high_color      => 1,
        :low_color       => 1,
        :max             => 1,
        :min             => 1,
        :axis            => 1,
        :reverse         => 1,
        :empty_cells     => 1,
        :show_hidden     => 1,
        :date_axis       => 1,
        :weight          => 1
      }
    end

    #
    #
    #
    def set_spark_color(sparkline, param, user_color)  # :nodoc:
      spark_color = "_#{user_color}".to_sym

      return unless ptrue?(param[user_color])

      sparkline[spark_color] =
        { :_rgb => get_palette_color(param[user_color]) }
    end
    #
    # Write the <extLst> element and sparkline subelements.
    #
    def write_ext_sparklines  # :nodoc:
      sparklines = @sparklines

      # Return if worksheet doesn't contain any sparklines.
      return if sparklines.empty?

      # Write the extLst element.
      @writer.start_tag('extLst')

      # Write the ext element.
      write_ext

      # Write the x14:sparklineGroups element.
      write_sparkline_groups

      # Write the sparkline elements.
      sparklines.reverse.each do |sparkline|
        # Write the x14:sparklineGroup element.
        write_sparkline_group(sparkline)

        # Write the x14:colorSeries element.
        write_color_series(sparkline[:_series_color])

        # Write the x14:colorNegative element.
        write_color_negative(sparkline[:_negative_color])

        # Write the x14:colorAxis element.
        write_color_axis

        # Write the x14:colorMarkers element.
        write_color_markers(sparkline[:_markers_color])

        # Write the x14:colorFirst element.
        write_color_first(sparkline[:_first_color])

        # Write the x14:colorLast element.
        write_color_last(sparkline[:_last_color] )

        # Write the x14:colorHigh element.
        write_color_high(sparkline[:_high_color])

        # Write the x14:colorLow element.
        write_color_low(sparkline[:_low_color])

        if sparkline[:_date_axis]
          @writer.data_element('xm:f', sparkline[:_date_axis])
        end

        write_sparklines(sparkline)

        @writer.end_tag('x14:sparklineGroup')
      end

      @writer.end_tag('x14:sparklineGroups')
      @writer.end_tag('ext')
      @writer.end_tag('extLst')
    end

    #
    # Write the <x14:sparklines> element and <x14:sparkline> subelements.
    #
    def write_sparklines(sparkline)  # :nodoc:
      # Write the sparkline elements.
      @writer.tag_elements('x14:sparklines') do

        (0 .. sparkline[:_count]-1).each do |i|
          range    = sparkline[:_ranges][i]
          location = sparkline[:_locations][i]

          @writer.tag_elements('x14:sparkline') do
            @writer.data_element('xm:f',     range)
            @writer.data_element('xm:sqref', location)
          end
        end
      end
    end

    #
    # Write the <ext> element.
    #
    def write_ext  # :nodoc:
      schema     = 'http://schemas.microsoft.com/office/'
      xmlns_x_14 = "#{schema}spreadsheetml/2009/9/main"
      uri        = '{05C60535-1F16-4fd2-B633-F4F36F0B64E0}'

      attributes = [
                    'xmlns:x14', xmlns_x_14,
                    'uri',       uri
                   ]

      @writer.start_tag('ext', attributes)
    end

    #
    # Write the <x14:sparklineGroups> element.
    #
    def write_sparkline_groups  # :nodoc:
      xmlns_xm = 'http://schemas.microsoft.com/office/excel/2006/main'

      attributes = ['xmlns:xm', xmlns_xm]

      @writer.start_tag('x14:sparklineGroups', attributes)
    end

    #
    # Write the <x14:sparklineGroup> element.
    #
    # Example for order.
    #
    # <x14:sparklineGroup
    #     manualMax="0"
    #     manualMin="0"
    #     lineWeight="2.25"
    #     type="column"
    #     dateAxis="1"
    #     displayEmptyCellsAs="span"
    #     markers="1"
    #     high="1"
    #     low="1"
    #     first="1"
    #     last="1"
    #     negative="1"
    #     displayXAxis="1"
    #     displayHidden="1"
    #     minAxisType="custom"
    #     maxAxisType="custom"
    #     rightToLeft="1">
    #
    def write_sparkline_group(opts)  # :nodoc:
      empty    = opts[:_empty]
      user_max = 0
      user_min = 0
      a = []

      if opts[:_max]
        if opts[:_max] == 'group'
          opts[:_cust_max] = 'group'
        else
          a << 'manualMax' << opts[:_max]
          opts[:_cust_max] = 'custom'
        end
      end

      if opts[:_min]
        if opts[:_min] == 'group'
          opts[:_cust_min] = 'group'
        else
          a << 'manualMin' << opts[:_min]
          opts[:_cust_min] = 'custom'
        end
      end

      # Ignore the default type attribute (line).
      a << 'type'          << opts[:_type]   if opts[:_type] != 'line'

      a << 'lineWeight'    << opts[:_weight] if opts[:_weight]
      a << 'dateAxis'      << 1              if opts[:_date_axis]
      a << 'displayEmptyCellsAs' << empty    if ptrue?(empty)

      a << 'markers'       << 1                if opts[:_markers]
      a << 'high'          << 1                if opts[:_high]
      a << 'low'           << 1                if opts[:_low]
      a << 'first'         << 1                if opts[:_first]
      a << 'last'          << 1                if opts[:_last]
      a << 'negative'      << 1                if opts[:_negative]
      a << 'displayXAxis'  << 1                if opts[:_axis]
      a << 'displayHidden' << 1                if opts[:_hidden]
      a << 'minAxisType'   << opts[:_cust_min] if opts[:_cust_min]
      a << 'maxAxisType'   << opts[:_cust_max] if opts[:_cust_max]
      a << 'rightToLeft'   << 1                if opts[:_reverse]

      @writer.start_tag('x14:sparklineGroup', a)
    end

    #
    # Helper function for the sparkline color functions below.
    #
    def write_spark_color(element, color)  # :nodoc:
      attr = []

      attr << 'rgb'   << color[:_rgb]   if color[:_rgb]
      attr << 'theme' << color[:_theme] if color[:_theme]
      attr << 'tint'  << color[:_tint]  if color[:_tint]

      @writer.empty_tag(element, attr)
    end

    #
    # Write the <x14:colorSeries> element.
    #
    def write_color_series(param)  # :nodoc:
      write_spark_color('x14:colorSeries', param)
    end

    #
    # Write the <x14:colorNegative> element.
    #
    def write_color_negative(param)  # :nodoc:
      write_spark_color('x14:colorNegative', param)
    end

    #
    # Write the <x14:colorAxis> element.
    #
    def write_color_axis  # :nodoc:
      write_spark_color('x14:colorAxis', { :_rgb => 'FF000000'} )
    end

    #
    # Write the <x14:colorMarkers> element.
    #
    def write_color_markers(param)  # :nodoc:
      write_spark_color('x14:colorMarkers', param)
    end

    #
    # Write the <x14:colorFirst> element.
    #
    def write_color_first(param)  # :nodoc:
      write_spark_color('x14:colorFirst', param)
    end

    #
    # Write the <x14:colorLast> element.
    #
    def write_color_last(param)  # :nodoc:
      write_spark_color('x14:colorLast', param)
    end

    #
    # Write the <x14:colorHigh> element.
    #
    def write_color_high(param)  # :nodoc:
      write_spark_color('x14:colorHigh', param)
    end

    #
    # Write the <x14:colorLow> element.
    #
    def write_color_low(param)  # :nodoc:
      write_spark_color('x14:colorLow', param)
    end

    #
    # Write the <dataValidations> element.
    #
    def write_data_validations #:nodoc:
      write_some_elements('dataValidations', @validations) do
        @validations.each { |validation| write_data_validation(validation) }
      end
    end

    #
    # Write the <dataValidation> element.
    #
    def write_data_validation(param) #:nodoc:
      sqref      = ''
      attributes = []

      # Set the cell range(s) for the data validation.
      param[:cells].each do |cells|
        # Add a space between multiple cell ranges.
        sqref += ' ' if sqref != ''

        row_first, col_first, row_last, col_last = cells

        # Swap last row/col for first row/col as necessary
        row_first, row_last = row_last, row_first if row_first > row_last
        col_first, col_last = col_last, col_first if col_first > col_last

        # If the first and last cell are the same write a single cell.
        if row_first == row_last && col_first == col_last
          sqref += xl_rowcol_to_cell(row_first, col_first)
        else
          sqref += xl_range(row_first, row_last, col_first, col_last)
        end
      end

      #use Data::Dumper::Perltidy
      #print Dumper param

      attributes << 'type' << param[:validate]
      attributes << 'operator' << param[:criteria] if param[:criteria] != 'between'

      if param[:error_type]
        attributes << 'errorStyle' << 'warning' if param[:error_type] == 1
        attributes << 'errorStyle' << 'information' if param[:error_type] == 2
      end
      attributes << 'allowBlank'       << 1 if param[:ignore_blank] != 0
      attributes << 'showDropDown'     << 1 if param[:dropdown]     == 0
      attributes << 'showInputMessage' << 1 if param[:show_input]   != 0
      attributes << 'showErrorMessage' << 1 if param[:show_error]   != 0

      attributes << 'errorTitle' << param[:error_title]  if param[:error_title]
      attributes << 'error' << param[:error_message]     if param[:error_message]
      attributes << 'promptTitle' << param[:input_title] if param[:input_title]
      attributes << 'prompt' << param[:input_message]    if param[:input_message]
      attributes << 'sqref' << sqref

      @writer.tag_elements('dataValidation', attributes) do
        # Write the formula1 element.
        write_formula_1(param[:value])
        # Write the formula2 element.
        write_formula_2(param[:maximum]) if param[:maximum]
      end
    end

    #
    # Write the <formula1> element.
    #
    def write_formula_1(formula) #:nodoc:
      # Convert a list array ref into a comma separated string.
      formula   = %!"#{formula.join(',')}"! if formula.kind_of?(Array)

      formula = formula.sub(/^=/, '') if formula.respond_to?(:sub)

      @writer.data_element('formula1', formula)
    end

    # write_formula_2()
    #
    # Write the <formula2> element.
    #
    def write_formula_2(formula) #:nodoc:
      formula = formula.sub(/^=/, '') if formula.respond_to?(:sub)

      @writer.data_element('formula2', formula)
    end

    # in Perl module : _write_formula()
    #
    def write_formula_tag(data) #:nodoc:
      data = data.sub(/^=/, '') if data.respond_to?(:sub)
      @writer.data_element('formula', data)
    end

    #
    # Write the <colorScale> element.
    #
    def write_color_scale(param)
      @writer.tag_elements('colorScale') do
        write_cfvo(param[:min_type], param[:min_value])
        write_cfvo(param[:mid_type], param[:mid_value]) if param[:mid_type]
        write_cfvo(param[:max_type], param[:max_value])
        write_color(@writer, 'rgb', param[:min_color])
        write_color(@writer, 'rgb', param[:mid_color])  if param[:mid_color]
        write_color(@writer, 'rgb', param[:max_color])
      end
    end

    #
    # Write the <dataBar> element.
    #
    def write_data_bar(param)
      @writer.tag_elements('dataBar') do
        write_cfvo(param[:min_type], param[:min_value])
        write_cfvo(param[:max_type], param[:max_value])

        write_color(@writer, 'rgb', param[:bar_color])
      end
    end

    #
    # Write the <cfvo> element.
    #
    def write_cfvo(type, val)
      attributes = [
                    'type', type,
                    'val',  val
                    ]

      @writer.empty_tag('cfvo', attributes)
    end

    #
    # Write the Worksheet conditional formats.
    #
    def write_conditional_formats #:nodoc:
      ranges = @cond_formats.keys.sort
      return if ranges.empty?

      ranges.each { |range| write_conditional_formatting(range, @cond_formats[range]) }
    end

    #
    # Write the <conditionalFormatting> element.
    #
    # The conditional_formatting() method is used to add formatting
    # to a cell or range of cells based on user defined criteria.
    #
    #   worksheet.conditional_formatting('A1:J10',
    #       {
    #         :type     => 'cell',
    #         :criteria => '>=',
    #         :value    => 50,
    #         :format   => format1
    #       }
    #   )
    # This method contains a lot of parameters and is described
    # in detail in a separate section "CONDITIONAL FORMATTING IN EXCEL".
    #
    # See also the conditional_format.rb program in the examples directory
    # of the distro
    #
    def write_conditional_formatting(range, params) #:nodoc:
      attributes = ['sqref', range]

      @writer.tag_elements('conditionalFormatting', attributes) do
        params.each { |param| write_cf_rule(param) }
      end
    end

    #
    # Write the <cfRule> element.
    #
    def write_cf_rule(param) #:nodoc:
      attributes = ['type' , param[:type]]

      if param[:format]
        attributes << 'dxfId' << param[:format]
      end
      attributes << 'priority' << param[:priority]

      case param[:type]
      when 'cellIs'
        attributes << 'operator' << param[:criteria]
        @writer.tag_elements('cfRule', attributes) do
          if param[:minimum] && param[:maximum]
            write_formula_tag(param[:minimum])
            write_formula_tag(param[:maximum])
          else
            write_formula_tag(param[:value])
          end
        end
      when 'aboveAverage'
        attributes << 'aboveAverage' << 0 if param[:criteria] =~ /below/
        attributes << 'equalAverage' << 1 if param[:criteria] =~ /equal/
        if param[:criteria] =~ /([123]) std dev/
          attributes << 'stdDev' << $~[1]
        end
        @writer.empty_tag('cfRule', attributes)
      when 'top10'
        attributes << 'percent' << 1 if param[:criteria] == '%'
        attributes << 'bottom'  << 1 if param[:direction]
        rank = param[:value] || 10
        attributes << 'rank'    << rank
        @writer.empty_tag('cfRule', attributes)
      when 'duplicateValues', 'uniqueValues'
        @writer.empty_tag('cfRule', attributes)
      when 'containsText', 'notContainsText', 'beginsWith', 'endsWith'
        attributes << 'operator' << param[:criteria]
        attributes << 'text'     << param[:value]
        @writer.tag_elements('cfRule', attributes) do
          write_formula_tag(param[:formula])
        end
      when 'timePeriod'
        attributes << 'timePeriod' << param[:criteria]
        @writer.tag_elements('cfRule', attributes) do
          write_formula_tag(param[:formula])
        end
      when 'containsBlanks', 'notContainsBlanks', 'containsErrors', 'notContainsErrors'
        @writer.tag_elements('cfRule', attributes) do
          write_formula_tag(param[:formula])
        end
      when 'colorScale'
        @writer.tag_elements('cfRule', attributes) do
          write_color_scale(param)
        end
      when 'dataBar'
        @writer.tag_elements('cfRule', attributes) do
          write_data_bar(param)
        end
      when 'expression'
        @writer.tag_elements('cfRule', attributes) do
          write_formula_tag(param[:criteria])
        end
      end
    end

    def store_data_to_table(cell_data) #:nodoc:
      row, col = cell_data.row, cell_data.col
      if @cell_data_table[row]
        @cell_data_table[row][col] = cell_data
      else
        @cell_data_table[row] = {}
        @cell_data_table[row][col] = cell_data
      end
    end

    # Check for a cell reference in A1 notation and substitute row and column
    def row_col_notation(args)   # :nodoc:
      if args[0] =~ /^\D/
        substitute_cellref(*args)
      else
        args
      end
    end

    #
    # Check that row and col are valid and store max and min values for use in
    # other methods/elements.
    #
    # The ignore_row/ignore_col flags is used to indicate that we wish to
    # perform the dimension check without storing the value.
    #
    # The ignore flags are use by set_row() and data_validate.
    #
    def check_dimensions_and_update_max_min_values(row, col, ignore_row = 0, ignore_col = 0)       #:nodoc:
      check_dimensions(row, col)
      store_row_max_min_values(row) if ignore_row == 0
      store_col_max_min_values(col) if ignore_col == 0

      0
    end

    def check_dimensions(row, col)
      if !row || row >= ROW_MAX || !col || col >= COL_MAX
        raise WriteXLSXDimensionError
      end
      0
    end

    def store_row_col_max_min_values(row, col)
      store_row_max_min_values(row)
      store_col_max_min_values(col)
    end

    def store_row_max_min_values(row)
      @dim_rowmin = row if !@dim_rowmin || (row < @dim_rowmin)
      @dim_rowmax = row if !@dim_rowmax || (row > @dim_rowmax)
    end

    def store_col_max_min_values(col)
      @dim_colmin = col if !@dim_colmin || (col < @dim_colmin)
      @dim_colmax = col if !@dim_colmax || (col > @dim_colmax)
    end

    #
    # Calculate the "spans" attribute of the <row> tag. This is an XLSX
    # optimisation and isn't strictly required. However, it makes comparing
    # files easier.
    #
    # The span is the same for each block of 16 rows.
    #
    def calculate_spans #:nodoc:
      span_min = nil
      span_max = 0
      spans = []

      (@dim_rowmin .. @dim_rowmax).each do |row_num|
        if @cell_data_table[row_num]
          span_min, span_max = calc_spans(@cell_data_table, row_num, span_min, span_max)
        end

        # Calculate spans for comments.
        if @comments[row_num]
          span_min, span_max = calc_spans(@comments, row_num, span_min, span_max)
        end

        if ((row_num + 1) % 16 == 0) || (row_num == @dim_rowmax)
          span_index = row_num / 16
          if span_min
            span_min += 1
            span_max += 1
            spans[span_index] = "#{span_min}:#{span_max}"
            span_min = nil
          end
        end
      end

      @row_spans = spans
    end

    def calc_spans(data, row_num, span_min, span_max)
      (@dim_colmin .. @dim_colmax).each do |col_num|
        if data[row_num][col_num]
          if !span_min
            span_min = col_num
            span_max = col_num
          else
            span_min = col_num if col_num < span_min
            span_max = col_num if col_num > span_max
          end
        end
      end
      [span_min, span_max]
    end

    def xf(format) #:nodoc:
      if format.kind_of?(Format)
        format.xf_index
      else
        0
      end
    end

    #
    # Add a string to the shared string table, if it isn't already there, and
    # return the string index.
    #
    def shared_string_index(str) #:nodoc:
      @workbook.shared_string_index(str)
    end

    #
    # convert_name_area(first_row, first_col, last_row, last_col)
    #
    # Convert zero indexed rows and columns to the format required by worksheet
    # named ranges, eg, "Sheet1!$A$1:$C$13".
    #
    def convert_name_area(row_num_1, col_num_1, row_num_2, col_num_2) #:nodoc:
      range1       = ''
      range2       = ''
      row_col_only = false

      # Convert to A1 notation.
      col_char_1 = xl_col_to_name(col_num_1, 1)
      col_char_2 = xl_col_to_name(col_num_2, 1)
      row_char_1 = "$#{row_num_1 + 1}"
      row_char_2 = "$#{row_num_2 + 1}"

      # We need to handle some special cases that refer to rows or columns only.
      if row_num_1 == 0 and row_num_2 == ROW_MAX - 1
        range1       = col_char_1
        range2       = col_char_2
        row_col_only = true
      elsif col_num_1 == 0 and col_num_2 == COL_MAX - 1
        range1       = row_char_1
        range2       = row_char_2
        row_col_only = true
      else
        range1 = col_char_1 + row_char_1
        range2 = col_char_2 + row_char_2
      end

      # A repeated range is only written once (if it isn't a special case).
      if range1 == range2 && !row_col_only
        area = range1
      else
        area = "#{range1}:#{range2}"
      end

      # Build up the print area range "Sheet1!$A$1:$C$13".
      "#{quote_sheetname(name)}!#{area}"
    end

    #
    # Sheetnames used in references should be quoted if they contain any spaces,
    # special characters or if the look like something that isn't a sheet name.
    # TODO. We need to handle more special cases.
    #
    def quote_sheetname(sheetname) #:nodoc:
      return sheetname if sheetname =~ /^Sheet\d+$/
      return "'#{sheetname}'"
    end

    def fit_page? #:nodoc:
      @print_style.fit_page
    end

    def filter_on? #:nodoc:
      ptrue?(@filter_on)
    end

    def tab_color? #:nodoc:
      ptrue?(@tab_color)
    end

    def outline_changed?
      ptrue?(@outline_changed)
    end

    def zoom_scale_normal? #:nodoc:
      ptrue?(@zoom_scale_normal)
    end

    def page_view? #:nodoc:
      !!@page_view
    end

    def right_to_left? #:nodoc:
      !!@right_to_left
    end

    def show_zeros? #:nodoc:
      !!@show_zeros
    end

    def screen_gridlines? #:nodoc:
      !!@screen_gridlines
    end

    def protect? #:nodoc:
      !!@protect
    end

    def autofilter_ref? #:nodoc:
      !!@autofilter_ref
    end

    def date_1904? #:nodoc:
      @workbook.date_1904?
    end

    def print_options_changed? #:nodoc:
      !!@print_options_changed
    end

    def hcenter? #:nodoc:
      !!@hcenter
    end

    def vcenter? #:nodoc:
      !!@vcenter
    end

    def print_headers? #:nodoc:
      !!@print_headers
    end

    def print_gridlines? #:nodoc:
      !!@print_gridlines
    end

    def page_setup_changed? #:nodoc:
      @print_style.page_setup_changed
    end

    def header_footer_changed? #:nodoc:
      !!@header_footer_changed
    end

    def drawing? #:nodoc:
      !!@drawing
    end

    def remove_white_space(margin) #:nodoc:
      if margin.respond_to?(:gsub)
        margin.gsub(/[^\d\.]/, '')
      else
        margin
      end
    end

    def print_across?
      @print_style.across
    end

    # List of valid criteria types.
    def valid_criteria_type  # :nodoc:
      {
        'between'                     => 'between',
        'not between'                 => 'notBetween',
        'equal to'                    => 'equal',
        '='                           => 'equal',
        '=='                          => 'equal',
        'not equal to'                => 'notEqual',
        '!='                          => 'notEqual',
        '<>'                          => 'notEqual',
        'greater than'                => 'greaterThan',
        '>'                           => 'greaterThan',
        'less than'                   => 'lessThan',
        '<'                           => 'lessThan',
        'greater than or equal to'    => 'greaterThanOrEqual',
        '>='                          => 'greaterThanOrEqual',
        'less than or equal to'       => 'lessThanOrEqual',
        '<='                          => 'lessThanOrEqual'
      }
    end

    def set_active_pane_and_cell_selections(row, col, top_row, left_col, active_cell, sqref) # :nodoc:
      if row > 0 && col > 0
        active_pane = 'bottomRight'
        row_cell = xl_rowcol_to_cell(top_row, 0)
        col_cell = xl_rowcol_to_cell(0, left_col)

        @selections <<
          [ 'topRight',    col_cell,    col_cell ] <<
          [ 'bottomLeft',  row_cell,    row_cell ] <<
          [ 'bottomRight', active_cell, sqref ]
      elsif col > 0
        active_pane = 'topRight'
        @selections << [ 'topRight', active_cell, sqref ]
      else
        active_pane = 'bottomLeft'
        @selections << [ 'bottomLeft', active_cell, sqref ]
      end
      active_pane
    end

    def prepare_filter_column(col) # :nodoc:
      # Check for a column reference in A1 notation and substitute.
      if col =~ /^\D/
        col_letter = col

        # Convert col ref to a cell ref and then to a col number.
        dummy, col = substitute_cellref("#{col}1")
        raise "Invalid column '#{col_letter}'" if col >= COL_MAX
      end

      col_first, col_last = @filter_range

      # Reject column if it is outside filter range.
      if col < col_first or col > col_last
        raise "Column '#{col}' outside autofilter column range (#{col_first} .. #{col_last})"
      end
      col
    end

    def convert_date_time_value(param, key)  # :nodoc:
      if param[key] && param[key] =~ /T/
        date_time = convert_date_time(param[key])
        param[key] = date_time if date_time
        date_time
      else
        true
      end
    end
  end
end