xlsxrb 0.1.13 → 0.1.14

data/lib/xlsxrb/ooxml/worksheet_writer.rb

@@ -26,14 +26,20 @@ module Xlsxrb
 
       INTEGER_STRINGS = (0..65_535).map(&:to_s).freeze
 
-      def initialize(io)
+      def initialize(io, date1904: false)
         @io = io
+        @date1904 = date1904 ? true : false
         @builder = XmlBuilder.new(@io)
         @row_buffer = String.new(capacity: 65_536)
         @started = false
         @finished = false
       end
 
+      def set_column_style(col_index, style_id)
+        @column_styles ||= {}
+        @column_styles[col_index] = style_id
+      end
+
       # Write the worksheet header. Call once before writing rows.
       # Options for pre-sheetData elements:
       #   sheet_properties: Hash of sheet-level properties (:tab_color, etc.)
@@ -48,6 +54,25 @@ module Xlsxrb
         @builder.declaration
         @builder.open_tag("worksheet", { xmlns: SSML_NS, "xmlns:r": DOC_REL_NS })
 
+        @column_styles ||= {}
+        if columns && !columns.empty?
+          columns.each do |col|
+            if col.is_a?(Elements::Column)
+              s = col.style_index
+              min = col.index
+              max = col.index
+            else
+              s = col[:style_index] || col[:style]
+              min = col[:index] || col[:min] || 0
+              max = col[:index] || col[:max] || col[:min] || 0
+            end
+            next unless s
+
+            (min..max).each { |i| @column_styles[i] = s }
+          end
+        end
+        @column_styles = nil if @column_styles.empty?
+
         write_sheet_properties(sheet_properties) if sheet_properties && !sheet_properties.empty?
         write_sheet_views(freeze_pane: freeze_pane, split_pane: split_pane, selection: selection, sheet_view: sheet_view) if freeze_pane || split_pane || selection || (sheet_view && !sheet_view.empty?)
         write_columns(columns) unless columns.empty?
@@ -63,12 +88,14 @@ module Xlsxrb
         row_num_str = row_num.to_s
         buf = @row_buffer ||= String.new(capacity: 65_536)
         buf << '<row r="' << row_num_str << '"'
+        buf << ' s="' << attrs[:style_index].to_s << '" customFormat="1"' if attrs[:style_index]
         if attrs[:height]
           buf << ' ht="' << attrs[:height].to_s << '" customHeight="1"'
         elsif attrs[:custom_height]
           buf << ' customHeight="1"'
         end
         buf << ' hidden="1"' if attrs[:hidden]
+        buf << ' collapsed="1"' if attrs[:collapsed]
         buf << ' outlineLevel="' << attrs[:outline_level].to_s << '"' if attrs[:outline_level]
         buf << ">"
 
@@ -77,25 +104,31 @@ module Xlsxrb
             value = cell.value
             style_id = cell.style_index
             col_ref = cell.ref || "#{column_letter(cell.column_index)}#{row_num_str}"
+            col_idx = cell.column_index
             formula = cell.formula
             formula_ca = false
             cell_type_val = nil
           elsif cell.is_a?(Hash)
             value = cell[:value]
             style_id = cell[:style_index]
-            col_ref = cell[:ref] || "#{column_letter(cell[:column_index])}#{row_num_str}"
+            col_idx = cell[:column_index]
+            col_ref = cell[:ref] || (col_idx ? "#{column_letter(col_idx)}#{row_num_str}" : nil)
             formula = cell[:formula]
             formula_ca = cell[:formula_ca]
             cell_type_val = cell[:type]
           else
             value = cell
             style_id = nil
+            col_idx = nil
             col_ref = nil
             formula = nil
             formula_ca = false
             cell_type_val = nil
           end
 
+          col_style = @column_styles && col_idx ? @column_styles[col_idx] : nil
+          style_id ||= attrs[:style_index] || col_style
+
           # Fast path for common unstyled cells
           if !formula && !style_id && !cell_type_val
             case value
@@ -117,7 +150,7 @@ module Xlsxrb
               buf << '<c r="' << col_ref << '"/>'
               next
             when Date
-              serial = Xlsxrb::Ooxml::Utils.date_to_serial(value)
+              serial = Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904)
               buf << '<c r="' << col_ref << '"><v>' << serial.to_s << "</v></c>"
               next
             end
@@ -137,13 +170,25 @@ module Xlsxrb
 
           xml_val = value
           type = cell_type_val
-          formula_expr = nil
+          formula_type = nil
+          formula_ref = nil
+          formula_si = nil
 
           if formula
             if formula.is_a?(Xlsxrb::Elements::Formula)
               formula_expr = formula.expression
               formula_ca = formula.calculate_always
-              xml_val = formula.cached_value || value || nil
+              formula_type = formula.type
+              formula_ref = formula.ref
+              formula_si = formula.shared_index
+              xml_val = formula.cached_value.nil? ? (value || nil) : formula.cached_value
+            elsif formula.is_a?(Hash)
+              formula_expr = formula[:formula] || formula[:expression]
+              formula_ca = formula[:calculate_always]
+              formula_type = formula[:type]
+              formula_ref = formula[:ref]
+              formula_si = formula[:si] || formula[:shared_index]
+              xml_val = formula[:value] || formula[:cached_value] || value || nil
             else
               formula_expr = formula
               xml_val = value || nil
@@ -175,9 +220,9 @@ module Xlsxrb
               xml_val = "0"
               type = "b"
             when Date
-              xml_val = Xlsxrb::Ooxml::Utils.date_to_serial(value)
+              xml_val = Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904)
             when Time
-              xml_val = Xlsxrb::Ooxml::Utils.datetime_to_serial(value)
+              xml_val = Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: @date1904)
             when BigDecimal
               xml_val = value.to_s("F")
             when Xlsxrb::Elements::CellError
@@ -229,16 +274,24 @@ module Xlsxrb
               buf << "><is><t>" << escape_xml(xml_val.to_s) << "</t></is></c>"
             end
           elsif formula_expr
-            buf << if formula_ca
-                     '><f ca="1">'
-                   else
-                     "><f>"
-                   end
-            buf << escape_xml(formula_expr) << "</f>"
+            f_attrs = +""
+            if formula_type
+              case formula_type.to_sym
+              when :array
+                f_attrs << ' t="array"'
+                f_attrs << %( ref="#{formula_ref}") if formula_ref
+              when :shared
+                f_attrs << ' t="shared"'
+                f_attrs << %( si="#{formula_si}") if formula_si
+                f_attrs << %( ref="#{formula_ref}") if formula_ref
+              end
+            end
+            f_attrs << ' ca="1"' if formula_ca
+            buf << "><f#{f_attrs}>" << escape_xml(formula_expr) << "</f>"
             if xml_val
               buf << "<v>" << xml_val.to_s << "</v></c>"
             else
-              buf << "</c>"
+              buf << "<v>0</v></c>"
             end
           else
             buf << "><v>" << xml_val.to_s << "</v></c>"
@@ -262,7 +315,7 @@ module Xlsxrb
         row_num_str = row_num < 65_536 ? INTEGER_STRINGS[row_num] : row_num.to_s
         buf = @row_buffer ||= String.new(capacity: 65_536)
 
-        if styles.nil? && attrs.nil?
+        if styles.nil? && attrs.nil? && @column_styles.nil?
           buf << "<row r=\"#{row_num_str}\">"
           col_index = 0
           max_len = values.length
@@ -292,7 +345,7 @@ module Xlsxrb
                 next
               end
               formula_expr = value[1..]
-              buf << "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f></c>"
+              buf << "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f><v>0</v></c>"
             when true
               buf << "<c r=\"#{col_ref}#{row_num_str}\" t=\"b\"><v>1</v></c>"
             when false
@@ -300,35 +353,54 @@ module Xlsxrb
             when Date
               date_style_id = style_map ? style_map["__xlsxrb_date"] : nil
               buf << if date_style_id
-                       "<c r=\"#{col_ref}#{row_num_str}\" s=\"#{date_style_id}\"><v>#{Xlsxrb::Ooxml::Utils.date_to_serial(value)}</v></c>"
+                       "<c r=\"#{col_ref}#{row_num_str}\" s=\"#{date_style_id}\"><v>#{Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904)}</v></c>"
                      else
-                       "<c r=\"#{col_ref}#{row_num_str}\"><v>#{Xlsxrb::Ooxml::Utils.date_to_serial(value)}</v></c>"
+                       "<c r=\"#{col_ref}#{row_num_str}\"><v>#{Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904)}</v></c>"
                      end
             when Time
               time_style_id = style_map ? style_map["__xlsxrb_time"] : nil
               buf << if time_style_id
-                       "<c r=\"#{col_ref}#{row_num_str}\" s=\"#{time_style_id}\"><v>#{Xlsxrb::Ooxml::Utils.datetime_to_serial(value)}</v></c>"
+                       "<c r=\"#{col_ref}#{row_num_str}\" s=\"#{time_style_id}\"><v>#{Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: @date1904)}</v></c>"
                      else
-                       "<c r=\"#{col_ref}#{row_num_str}\"><v>#{Xlsxrb::Ooxml::Utils.datetime_to_serial(value)}</v></c>"
+                       "<c r=\"#{col_ref}#{row_num_str}\"><v>#{Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: @date1904)}</v></c>"
                      end
             when Xlsxrb::Elements::Formula
               formula_expr = value.expression
               formula_expr = formula_expr[1..] if formula_expr.start_with?("=")
-              buf << if value.cached_value
-                       "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f><v>#{value.cached_value}</v></c>"
-                     else
-                       "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f></c>"
-                     end
+              f_attrs = +""
+              if value.type
+                case value.type.to_sym
+                when :array
+                  f_attrs << ' t="array"'
+                  f_attrs << %( ref="#{value.ref}") if value.ref
+                when :shared
+                  f_attrs << ' t="shared"'
+                  f_attrs << %( si="#{value.shared_index}") if value.shared_index
+                  f_attrs << %( ref="#{value.ref}") if value.ref
+                end
+              end
+              f_attrs << ' ca="1"' if value.calculate_always
+              v_val = value.cached_value.nil? ? 0 : value.cached_value
+              buf << "<c r=\"#{col_ref}#{row_num_str}\"><f#{f_attrs}>#{escape_xml(formula_expr)}</f><v>#{v_val}</v></c>"
             when Hash
               if value.key?(:formula)
-                formula_expr = value[:formula]
+                formula_expr = value[:formula] || value[:expression]
                 formula_expr = formula_expr[1..] if formula_expr.start_with?("=")
-                xml_val = value[:value]
-                buf << if xml_val
-                         "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f><v>#{xml_val}</v></c>"
-                       else
-                         "<c r=\"#{col_ref}#{row_num_str}\"><f>#{escape_xml(formula_expr)}</f></c>"
-                       end
+                f_attrs = +""
+                if value[:type]
+                  case value[:type].to_sym
+                  when :array
+                    f_attrs << ' t="array"'
+                    f_attrs << %( ref="#{value[:ref]}") if value[:ref]
+                  when :shared
+                    f_attrs << ' t="shared"'
+                    f_attrs << %( si="#{value[:si] || value[:shared_index]}") if value[:si] || value[:shared_index]
+                    f_attrs << %( ref="#{value[:ref]}") if value[:ref]
+                  end
+                end
+                f_attrs << ' ca="1"' if value[:calculate_always]
+                xml_val = value[:value] || value[:cached_value] || 0
+                buf << "<c r=\"#{col_ref}#{row_num_str}\"><f#{f_attrs}>#{escape_xml(formula_expr)}</f><v>#{xml_val}</v></c>"
               end
             when Xlsxrb::Elements::CellError
               buf << "<c r=\"#{col_ref}#{row_num_str}\" t=\"e\"><v>#{value.code}</v></c>"
@@ -360,6 +432,7 @@ module Xlsxrb
         if attrs
           buf << ' ht="' << attrs[:height].to_s << '" customHeight="1"' if attrs[:height]
           buf << ' hidden="1"' if attrs[:hidden]
+          buf << ' collapsed="1"' if attrs[:collapsed]
           buf << ' outlineLevel="' << attrs[:outline_level].to_s << '"' if attrs[:outline_level]
         end
         buf << ">"
@@ -370,17 +443,34 @@ module Xlsxrb
           max_len = [max_len, styles_len].max
         end
 
+        row_style = attrs ? attrs[:style_index] : nil
+        row_style_id = row_style && style_map ? (style_map[row_style] || style_map[row_style.to_s] || row_style) : row_style
+
         col_index = 0
         while col_index < max_len
           value = col_index < values.length ? values[col_index] : nil
           style_id = single_style_id
-          if is_styles_collection && style_map
+          if is_styles_collection
             style_name = if styles.is_a?(Array)
                            col_index < styles.length ? styles[col_index] : nil
                          else
                            styles[col_index]
                          end
-            style_id = style_map[style_name] if style_name
+            style_id = if style_map && style_name
+                         style_map[style_name] || style_map[style_name.to_s] || style_name
+                       else
+                         style_name
+                       end
+          end
+
+          if style_id.nil?
+            col_style = @column_styles ? @column_styles[col_index] : nil
+            col_style_id = if col_style && style_map
+                             style_map[col_style] || style_map[col_style.to_s] || col_style
+                           else
+                             col_style
+                           end
+            style_id = row_style_id || col_style_id
           end
 
           col_ref = COLUMN_LETTERS[col_index] || column_letter(col_index)
@@ -425,11 +515,11 @@ module Xlsxrb
               col_index += 1
               next
             when Date
-              buf << '<c r="' << col_ref << row_num_str << '"><v>' << Xlsxrb::Ooxml::Utils.date_to_serial(value).to_s << "</v></c>"
+              buf << '<c r="' << col_ref << row_num_str << '"><v>' << Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904).to_s << "</v></c>"
               col_index += 1
               next
             when Time
-              buf << '<c r="' << col_ref << row_num_str << '"><v>' << Xlsxrb::Ooxml::Utils.datetime_to_serial(value).to_s << "</v></c>"
+              buf << '<c r="' << col_ref << row_num_str << '"><v>' << Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: @date1904).to_s << "</v></c>"
               col_index += 1
               next
             end
@@ -438,6 +528,9 @@ module Xlsxrb
           # General path: styled, formula, rich text, or complex cell
           formula_expr = nil
           formula_ca = false
+          formula_type = nil
+          formula_ref = nil
+          formula_si = nil
           xml_val = value
           type = nil
 
@@ -445,6 +538,9 @@ module Xlsxrb
           when Xlsxrb::Elements::Formula
             formula_expr = value.expression
             formula_ca = value.calculate_always
+            formula_type = value.type
+            formula_ref = value.ref
+            formula_si = value.shared_index
             xml_val = value.cached_value
             case value.cached_value
             when String
@@ -458,9 +554,12 @@ module Xlsxrb
             end
           when Hash
             if value.key?(:formula)
-              formula_expr = value[:formula]
+              formula_expr = value[:formula] || value[:expression]
               formula_ca = value[:calculate_always] || false
-              xml_val = value[:value]
+              formula_type = value[:type]
+              formula_ref = value[:ref]
+              formula_si = value[:si] || value[:shared_index]
+              xml_val = value[:value] || value[:cached_value]
               case xml_val
               when String
                 type = "str"
@@ -476,7 +575,7 @@ module Xlsxrb
             if value.start_with?("=") && value.length > 1
               formula_expr = value
               xml_val = nil
-            else
+            elsif sst_index
               idx = sst_index[value]
               unless idx
                 sst << value
@@ -485,16 +584,24 @@ module Xlsxrb
               end
               xml_val = idx
               type = "s"
+            else
+              xml_val = value
+              type = "inlineStr"
             end
           when Xlsxrb::Elements::RichText
-            idx = sst_index[value]
-            unless idx
-              sst << value
-              idx = sst.size - 1
-              sst_index[value] = idx
+            if sst_index
+              idx = sst_index[value]
+              unless idx
+                sst << value
+                idx = sst.size - 1
+                sst_index[value] = idx
+              end
+              xml_val = idx
+              type = "s"
+            else
+              xml_val = value
+              type = "inlineStr"
             end
-            xml_val = idx
-            type = "s"
           when true
             xml_val = "1"
             type = "b"
@@ -502,9 +609,9 @@ module Xlsxrb
             xml_val = "0"
             type = "b"
           when Date
-            xml_val = Xlsxrb::Ooxml::Utils.date_to_serial(value)
+            xml_val = Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: @date1904)
           when Time
-            xml_val = Xlsxrb::Ooxml::Utils.datetime_to_serial(value)
+            xml_val = Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: @date1904)
           when BigDecimal
             xml_val = value.to_s("F")
           when Xlsxrb::Elements::CellError
@@ -518,17 +625,27 @@ module Xlsxrb
           buf << ' s="' << style_id.to_s << '"' if style_id
           buf << ' t="' << type << '"' if type
           if formula_expr
-            buf << if formula_ca
-                     '><f ca="1">'
-                   else
-                     "><f>"
-                   end
-            buf << escape_xml(formula_expr) << "</f>"
+            f_attrs = +""
+            if formula_type
+              case formula_type.to_sym
+              when :array
+                f_attrs << ' t="array"'
+                f_attrs << %( ref="#{formula_ref}") if formula_ref
+              when :shared
+                f_attrs << ' t="shared"'
+                f_attrs << %( si="#{formula_si}") if formula_si
+                f_attrs << %( ref="#{formula_ref}") if formula_ref
+              end
+            end
+            f_attrs << ' ca="1"' if formula_ca
+            buf << "<f#{f_attrs}>" << escape_xml(formula_expr) << "</f>"
             if xml_val
               buf << "<v>" << xml_val.to_s << "</v></c>"
             else
-              buf << "</c>"
+              buf << "<v>0</v></c>"
             end
+          elsif type == "inlineStr"
+            buf << "><is><t>" << escape_xml(xml_val.to_s) << "</t></is></c>"
           else
             buf << "><v>" << xml_val.to_s << "</v></c>"
           end
@@ -945,7 +1062,8 @@ module Xlsxrb
       def write_hyperlinks(links)
         @builder.open_tag("hyperlinks")
         links.each_with_index do |link, idx|
-          h_attrs = { ref: link[:cell] }
+          cell_ref = link[:cell] || link[:ref]
+          h_attrs = { ref: cell_ref }
           h_attrs[:"r:id"] = "rId#{link[:_rid] || (idx + 1)}" if link[:url]
           h_attrs[:location] = link[:location] if link[:location]
           h_attrs[:display] = link[:display] if link[:display]
@@ -1106,6 +1224,8 @@ module Xlsxrb
           attrs[:hidden] = "1" if col[:hidden]
           attrs[:customWidth] = "1" if col[:custom_width] || col[:width]
           attrs[:outlineLevel] = col[:outline_level].to_s if col[:outline_level]
+          style_id = col[:style_index] || col[:style]
+          attrs[:style] = style_id.to_s if style_id
           @builder.empty_tag("col", attrs)
         end
         @builder.close_tag("cols")
@@ -1120,7 +1240,10 @@ module Xlsxrb
         # For formula cells with cached values, don't infer type from value
         type = formula ? cell[:type] : (cell[:type] || cell_type(value))
         attrs[:t] = type if type
-        attrs[:s] = cell[:style_index].to_s if cell[:style_index]
+        col_idx = cell[:column_index]
+        col_style = @column_styles && col_idx ? @column_styles[col_idx] : nil
+        style_id = cell[:style_index] || col_style
+        attrs[:s] = style_id.to_s if style_id
 
         if value.nil? && formula.nil?
           @builder.empty_tag("c", attrs)
@@ -1130,14 +1253,36 @@ module Xlsxrb
         @builder.open_tag("c", attrs)
         if formula
           f_attrs = {}
-          f_attrs[:ca] = "1" if cell[:formula_ca]
+          formula_text = formula
+          if formula.is_a?(Xlsxrb::Elements::Formula)
+            formula_text = formula.expression
+            formula_text = formula_text[1..] if formula_text.start_with?("=")
+            f_attrs[:t] = formula.type.to_s if formula.type
+            f_attrs[:ref] = formula.ref if formula.ref
+            f_attrs[:si] = formula.shared_index.to_s if formula.shared_index
+            f_attrs[:ca] = "1" if formula.calculate_always
+          else
+            formula_text = formula_text[1..] if formula_text.is_a?(String) && formula_text.start_with?("=")
+            f_type = cell[:formula_type] || cell[:type]
+            if f_type && %i[array shared].include?(f_type.to_sym)
+              f_attrs[:t] = f_type.to_s
+              f_attrs[:ref] = cell[:formula_ref] || cell[:ref] if cell[:formula_ref] || (f_type.to_s == "array" && cell[:ref])
+              f_attrs[:si] = cell[:formula_si].to_s if cell[:formula_si]
+            end
+            f_attrs[:ca] = "1" if cell[:formula_ca]
+          end
           if f_attrs.empty?
-            @builder.tag("f") { |b| b.text(formula) }
+            @builder.tag("f") { |b| b.text(formula_text) }
           else
-            @builder.tag("f", f_attrs) { |b| b.text(formula) }
+            @builder.tag("f", f_attrs) { |b| b.text(formula_text) }
           end
         end
-        @builder.tag("v") { |b| b.text(xml_cell_value(value, type)) } unless value.nil?
+        v_val = if value.nil?
+                  formula ? "0" : nil
+                else
+                  xml_cell_value(value, type)
+                end
+        @builder.tag("v") { |b| b.text(v_val) } unless v_val.nil?
         @builder.close_tag("c")
       end
 

data/lib/xlsxrb/ooxml/writer/features_xml.rb

@@ -393,11 +393,13 @@ module Xlsxrb
           when true, false
             %(<c r="#{cell_ref}" t="b"#{s_attr}#{ph_attr}><v>#{value ? 1 : 0}</v></c>)
           when Time
-            serial = Xlsxrb::Ooxml::Utils.datetime_to_serial(value)
+            date1904 = @workbook_properties&.[](:date1904) ? true : false
+            serial = Xlsxrb::Ooxml::Utils.datetime_to_serial(value, date1904: date1904)
             dt_attr = s_attr.empty? && (dt_style = resolve_style_index(datetime_num_fmt_id)) ? %( s="#{dt_style}") : s_attr
             %(<c r="#{cell_ref}"#{dt_attr}#{ph_attr}><v>#{serial}</v></c>)
           when Date
-            serial = Xlsxrb::Ooxml::Utils.date_to_serial(value)
+            date1904 = @workbook_properties&.[](:date1904) ? true : false
+            serial = Xlsxrb::Ooxml::Utils.date_to_serial(value, date1904: date1904)
             ds_attr = s_attr.empty? && (date_style = resolve_style_index(date_num_fmt_id)) ? %( s="#{date_style}") : s_attr
             %(<c r="#{cell_ref}"#{ds_attr}#{ph_attr}><v>#{serial}</v></c>)
           when Numeric

data/lib/xlsxrb/ooxml/writer.rb

@@ -330,6 +330,19 @@ module Xlsxrb
         validate_cell_address!(cell_address)
         sheet_name = sheet || @sheet_order.first
         raise ArgumentError, "unknown sheet: #{sheet_name}" unless @hyperlinks.key?(sheet_name)
+
+        if url.is_a?(Elements::Hyperlink)
+          link = {}
+          link[:url] = url.url if url.url
+          link[:display] = url.display || display if url.display || display
+          link[:tooltip] = url.tooltip || tooltip if url.tooltip || tooltip
+          link[:location] = url.location || location if url.location || location
+          raise ArgumentError, "url or location required" if link[:url].nil? && link[:location].nil?
+
+          @hyperlinks[sheet_name][cell_address] = link
+          return
+        end
+
         raise ArgumentError, "url or location required" if url.nil? && location.nil?
 
         link = {}
@@ -997,6 +1010,7 @@ module Xlsxrb
       def set_workbook_property(name, value)
         @workbook_properties[name] = value
       end
+      alias workbook_property set_workbook_property
 
       # Returns workbook properties hash.
       # : () -> untyped