robust_excel_ole 0.4 → 0.5

data/spec/bookstore_spec.rb

@@ -279,7 +279,7 @@ describe Bookstore do
         @book3 = Book.open(@simple_file, :force_excel => :new)
         @bookstore.store(@book2)
         @bookstore.store(@book3)
-        sheet = @book3[0]
+        sheet = @book3.sheet(1)
         sheet[1,1] = sheet[1,1].Value == "foo" ? "bar" : "foo"
         @book.ReadOnly.should be_true
         @book2.ReadOnly.should be_false

data/spec/cell_spec.rb

@@ -23,7 +23,7 @@ describe Cell do
   context "open simple.xls" do
     before do
       @book = Book.open(@dir + '/workbook.xls', :read_only => true)
-      @sheet = @book[1]
+      @sheet = @book.sheet(2)
       @cell = @sheet[1, 1]
     end
 
@@ -55,7 +55,7 @@ describe Cell do
   context "open merge_cells.xls" do
     before do
       @book = Book.open(@dir + '/merge_cells.xls', :read_only => true)
-      @sheet = @book[0]
+      @sheet = @book.sheet(1)
     end
 
     after do

data/spec/excel_spec.rb

@@ -11,7 +11,7 @@ module RobustExcelOle
   describe Excel do
 
     before(:all) do
-      Excel.close_all
+      Excel.kill_all
     end
 
     before do
@@ -321,10 +321,10 @@ module RobustExcelOle
           @excel1 = book1.excel
           @excel2 = book2.excel
           @excel4 = book4.excel
-          sheet2 = book2[0]
+          sheet2 = book2.sheet(1)
           @old_cell_value2 = sheet2[1,1].value
           sheet2[1,1] = sheet2[1,1].value == "foo" ? "bar" : "foo"
-          sheet3 = book3[0]
+          sheet3 = book3.sheet(1)
           @old_cell_value3 = sheet3[1,1].value
           sheet3[1,1] = sheet3[1,1].value == "foo" ? "bar" : "foo"
         end
@@ -342,11 +342,11 @@ module RobustExcelOle
           @excel2.should_not be_alive
           @excel4.should_not be_alive
           new_book2 = Book.open(@simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should == @old_cell_value2
           new_book2.close   
           new_book3 = Book.open(@another_simple_file)
-          new_sheet3 = new_book3[0]
+          new_sheet3 = new_book3.sheet(1)
           new_sheet3[1,1].value.should == @old_cell_value3
           new_book3.close   
         end
@@ -357,11 +357,11 @@ module RobustExcelOle
           @excel2.should_not be_alive
           @excel4.should_not be_alive
           new_book2 = Book.open(@simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should_not == @old_cell_value2
           new_book2.close   
           new_book3 = Book.open(@another_simple_file)
-          new_sheet3 = new_book3[0]
+          new_sheet3 = new_book3.sheet(1)
           new_sheet3[1,1].value.should_not == @old_cell_value3
           new_book3.close
         end
@@ -390,7 +390,7 @@ module RobustExcelOle
           #@excel1 = book1.excel
           @excel2 = book2.excel
           #@excel4 = book4.excel
-          sheet2 = book2[0]
+          sheet2 = book2.sheet(1)
           @old_cell_value2 = sheet2[1,1].value
           sheet2[1,1] = sheet2[1,1].value == "foo" ? "bar" : "foo"
           #sheet3 = book3[0]
@@ -410,7 +410,7 @@ module RobustExcelOle
           #@excel4.should_not be_alive
           #@excel5.should_not be_alive
           new_book2 = Book.open(@simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should_not == @old_cell_value2
           new_book2.close   
           #new_book3 = Book.open(@another_simple_file)
@@ -428,7 +428,7 @@ module RobustExcelOle
           #@excel4.should_not be_alive
           #@excel5.should_not be_alive
           new_book2 = Book.open(@simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should == @old_cell_value2
           new_book2.close   
           #new_book4 = Book.open(@different_file)
@@ -472,11 +472,11 @@ module RobustExcelOle
         before do
           @excel = Excel.create
           @book = Book.open(@simple_file)
-          sheet = @book[0]
+          sheet = @book.sheet(1)
           @old_cell_value = sheet[1,1].value
           sheet[1,1] = sheet[1,1].value == "foo" ? "bar" : "foo"
           @book2 = Book.open(@another_simple_file)
-          sheet2 = @book2[0]
+          sheet2 = @book2.sheet(1)
           @old_cell_value2 = sheet2[1,1].value
           sheet2[1,1] = sheet2[1,1].value == "foo" ? "bar" : "foo"
         end
@@ -497,11 +497,11 @@ module RobustExcelOle
           @excel.close(:if_unsaved => :forget)
           @excel.should_not be_alive
           new_book = Book.open(@simple_file)
-          new_sheet = new_book[0]
+          new_sheet = new_book.sheet(1)
           new_sheet[1,1].value.should == @old_cell_value
           new_book.close          
           new_book2 = Book.open(@another_simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should == @old_cell_value2
           new_book2.close 
         end
@@ -511,11 +511,11 @@ module RobustExcelOle
           @excel.close(:if_unsaved => :save)
           @excel.should_not be_alive
           new_book = Book.open(@simple_file)
-          new_sheet = new_book[0]
+          new_sheet = new_book.sheet(1)
           new_sheet[1,1].value.should_not == @old_cell_value
           new_book.close          
           new_book2 = Book.open(@another_simple_file)
-          new_sheet2 = new_book2[0]
+          new_sheet2 = new_book2.sheet(1)
           new_sheet2[1,1].value.should_not == @old_cell_value2
           new_book2.close   
         end
@@ -548,7 +548,7 @@ module RobustExcelOle
           @excel.should_not be_alive
           @book.should_not be_alive
           new_book = Book.open(@simple_file)
-          new_sheet = new_book[0]
+          new_sheet = new_book.sheet(1)
           new_sheet[1,1].value.should == @old_cell_value
           new_book.close    
           new_book.excel.close(:hard => true)
@@ -568,7 +568,7 @@ module RobustExcelOle
           @key_sender = IO.popen  'ruby "' + File.join(File.dirname(__FILE__), '/helpers/key_sender.rb') + '" "Microsoft Excel" '  , "w"
           @excel = Excel.create
           @book = Book.open(@simple_file)
-          sheet = @book[0]
+          sheet = @book.sheet(1)
           @old_cell_value = sheet[1,1].value
           sheet[1,1] = sheet[1,1].value == "foo" ? "bar" : "foo"
         end
@@ -584,7 +584,7 @@ module RobustExcelOle
           @excel.close(:if_unsaved => :alert)
           @excel.should_not be_alive
           new_book = Book.open(@simple_file)
-          new_sheet = new_book[0]
+          new_sheet = new_book.sheet(1)
           new_sheet[1,1].value.should_not == @old_cell_value
           new_book.close   
         end
@@ -598,7 +598,7 @@ module RobustExcelOle
           @excel.should_not be_alive
           @book.should_not be_alive
           new_book = Book.open(@simple_file)
-          new_sheet = new_book[0]
+          new_sheet = new_book.sheet(1)
           new_sheet[1,1].value.should == @old_cell_value
           new_book.close     
         end
@@ -736,6 +736,43 @@ module RobustExcelOle
           @excel2.DisplayAlerts.should be_false
         end
       end
+    end
+
+    context "with calculation" do
+
+      before do
+        @excel1 = Excel.new(:visible => true)
+      end
+
+      it "should not set calculation mode when no workbook is opened" do
+        @excel1.with_calculation(:automatic) do
+          @excel1.Calculation.should_not == -4105
+        end
+      end
+
+      it "should set calculation mode to manual" do
+        b = Book.open(@simple_file)
+        @excel1.with_calculation(:manual) do
+          @excel1.Calculation.should == -4135
+          @excel1.CalculateBeforeSave.should be_false
+        end
+      end
+
+      it "should set calculation mode automatic" do
+        b = Book.open(@simple_file)
+        @excel1.with_calculation(:automatic) do
+          @excel1.Calculation.should == -4105
+          @excel1.CalculateBeforeSave.should be_true
+        end
+      end
+
+      it "should set calculation mode to automatic as default" do
+        b = Book.open(@simple_file)
+        @excel1.with_calculation do
+          @excel1.Calculation.should == -4105
+          @excel1.CalculateBeforeSave.should be_true
+        end
+      end
 
     end
 
@@ -788,12 +825,12 @@ module RobustExcelOle
         before do
           @book = Book.open(@simple_file)
           @book3 = Book.open(@different_file, :read_only => true)
-          sheet = @book[0]
+          sheet = @book.sheet(1)
           sheet[1,1] = sheet[1,1].value == "foo" ? "bar" : "foo"
-          sheet3 = @book3[0]
+          sheet3 = @book3.sheet(1)
           sheet3[1,1] = sheet3[1,1].value == "foo" ? "bar" : "foo"
           @book2 = Book.open(@another_simple_file, :force_excel => :new)
-          sheet2 = @book2[0]
+          sheet2 = @book2.sheet(1)
           sheet2[1,1] = sheet2[1,1].value == "foo" ? "bar" : "foo"
         end
 
@@ -882,6 +919,120 @@ module RobustExcelOle
 
       end
     end
+
+    describe "nameval, set_nameval" do
+
+      before do
+        @book1 = Book.open(@dir + '/another_workbook.xls')
+        @excel1 = @book1.excel
+      end
+
+      after do
+        @book1.close(:if_unsaved => :forget)
+      end   
+
+      it "should return value of a defined name" do
+        @excel1.nameval("firstcell").should == "foo"
+        @excel1["firstcell"].should == "foo"
+      end        
+
+      it "should return default value if name not defined and default value is given" do
+        @excel1.nameval("foo", :default => 2).should == 2
+      end
+
+      it "should evaluate a formula" do
+        @excel1.nameval("named_formula").should == 4
+        @excel1["named_formula"].should == 4
+      end
+
+      it "should raise an error if name not defined" do
+        expect {
+          @excel1.nameval("foo")
+        }.to raise_error(ExcelError, /cannot find name "foo"/)
+        expect {
+        @excel1["foo"]
+        }.to raise_error(ExcelError, /cannot find name "foo"/)
+        expect {
+          excel2 = Excel.create
+          excel2.nameval("one")
+        }.to raise_error(ExcelError, /cannot find name "one"/)
+        expect {
+          excel3 = Excel.create
+          excel3["one"]
+        }.to raise_error(ExcelError, /cannot find name "one"/)
+      end
+
+      it "should set a range to a value" do
+        @excel1.nameval("firstcell").should == "foo"
+        @excel1.set_nameval("firstcell","bar")
+        @excel1.nameval("firstcell").should == "bar"
+        @excel1["firstcell"] = "foo"
+        @excel1.nameval("firstcell").should == "foo"
+      end
+
+      it "should raise an error if name cannot be evaluated" do
+        expect{
+          @excel1.set_nameval("foo", 1)
+          }.to raise_error(ExcelError, /cannot find name "foo"/)
+        expect{
+          @excel1["foo"] = 1
+          }.to raise_error(ExcelError, /cannot find name "foo"/)
+      end
+    end
+
+    describe "rangeval, set_rangeval" do
+      
+      before do
+        @book1 = Book.open(@dir + '/another_workbook.xls')
+        @excel1 = @book1.excel
+      end
+
+      after do
+        @book1.close(:if_unsaved => :forget)
+      end   
+
+      it "should return value of a locally defined name" do
+        @excel1.rangeval("firstcell").should == "foo"          
+      end        
+
+      it "should return value of a defined name" do
+        @excel1.rangeval("new").should == "foo"         
+        @excel1.rangeval("one").should == 1.0    
+        @excel1.rangeval("four").should == [[1,2],[3,4]]
+        @excel1.rangeval("firstrow").should == [[1,2]]
+      end    
+
+      it "should return default value if name not defined and default value is given" do
+        @excel1.rangeval("foo", :default => 2).should == 2
+      end
+
+      it "should raise an error if name not defined for the sheet" do
+        expect {
+          @excel1.rangeval("foo")
+          }.to raise_error(ExcelError, /cannot find name "foo"/)
+        expect {
+          @excel1.rangeval("named_formula")
+          }.to raise_error(ExcelError, /cannot find name "named_formula"/)
+        expect {
+          excel2 = Excel.create
+          excel2.rangeval("one")
+        }.to raise_error(ExcelError, /cannot find name "one"/)
+      end
+    
+      it "should set a range to a value" do
+        @excel1.rangeval("firstcell").should == "foo"
+        @excel1.set_rangeval("firstcell","bar")
+        @excel1.rangeval("firstcell").should == "bar"
+      end
+
+      it "should raise an error if name cannot be evaluated" do
+        expect{
+          @excel1.set_nameval("foo", 1)
+        }.to raise_error(ExcelError, /cannot find name "foo"/)
+      end
+
+    end
+
   end
 end
 

data/spec/general_spec.rb

@@ -43,8 +43,8 @@ module RobustExcelOle
           ["Activate", "ActiveSheet", "Application", "Close", "FullName", "HasPassword", "Name", "Names", 
             "Password", "Protect", "ProtectSharing", "ProtectStructure", "Protect", "ReadOnly", "Save", 
             "SaveAs", "Saved", "Sheets", "Unprotect"]
-        @book_methods = ["activate", "add_sheet", "alive?", "close", "filename", "nvalue", "ole_object", 
-                         "ole_workbook", "reopen", "save", "save_as", "saved", "set_nvalue"]
+        @book_methods = ["activate", "add_sheet", "alive?", "close", "filename", "nameval", "ole_object", 
+                         "ole_workbook", "reopen", "save", "save_as", "saved", "set_nameval"]
         @ole_excel_methods = 
           ["ActiveCell", "ActiveSheet", "ActiveWorkbook", "Application",  "Calculate", "Cells", "Columns",
             "DisplayAlerts", "Evaluate", "Hwnd", "Name", "Names", "Quit", "Range", "Ready", "Save", 
@@ -161,7 +161,7 @@ module RobustExcelOle
 
       before do
         @book = Book.open(@simple_file)
-        @sheet = @book[0]
+        @sheet = @book.sheet(1)
       end
 
       before do
@@ -173,21 +173,6 @@ module RobustExcelOle
           @sheet.excel
           }.to raise_error(ExcelError, "receiver instance is neither an Excel nor a Book")
       end
-
-    end
-
-    describe "trace" do
-
-      it "should put some number" do
-        a = 4
-        trace "some text #{a}"
-      end
-
-      it "should put another text" do
-        a = 5
-        trace "another text #{a}"
-      end
     end
-
   end
 end

data/spec/range_spec.rb

@@ -15,7 +15,7 @@ describe RobustExcelOle::Range do
   before do
     @dir = create_tmpdir
     @book = Book.open(@dir + '/workbook.xls', :force_excel => :new)
-    @sheet = @book[1]
+    @sheet = @book.sheet(2)
     @range = RobustExcelOle::Range.new(@sheet.worksheet.UsedRange.Rows(1))
   end
 
@@ -52,7 +52,7 @@ describe RobustExcelOle::Range do
 
     context "when instance is column range" do
       before do
-        @sheet = @book[0]
+        @sheet = @book.sheet(1)
         @range = RobustExcelOle::Range.new(@sheet.worksheet.UsedRange.Columns(1))
       end
       it { @range.values.should eq ['foo', 'foo', 'matz'] }
@@ -61,7 +61,7 @@ describe RobustExcelOle::Range do
     context "read 'merge_cells.xls'" do
       before do
         @merge_cells_book = Book.open("#{@dir}/merge_cells.xls", :force_excel => :new)
-        @merge_cells_sheet = @merge_cells_book[0]
+        @merge_cells_sheet = @merge_cells_book.sheet(1)
       end
 
       after do

data/spec/reo_common_spec.rb

@@ -0,0 +1,104 @@
+# -*- coding: utf-8 -*-
+
+require File.join(File.dirname(__FILE__), './spec_helper')
+require File.expand_path( '../../lib/robust_excel_ole/reo_common', __FILE__)
+
+$VERBOSE = nil
+
+include General
+include RobustExcelOle
+
+module RobustExcelOle
+
+  describe REOCommon do
+
+    before(:all) do
+      excel = Excel.new(:reuse => true)
+      open_books = excel == nil ? 0 : excel.Workbooks.Count
+      puts "*** open books *** : #{open_books}" if open_books > 0
+      Excel.kill_all
+    end
+
+    before do
+      @dir = create_tmpdir
+      @simple_file = @dir + '/workbook.xls'
+      @simple_save_file = @dir + '/workbook_save.xls'
+      @different_file = @dir + '/different_workbook.xls'
+      @simple_file_other_path = @dir + '/more_data/workbook.xls'
+      @another_simple_file = @dir + '/another_workbook.xls'
+      @linked_file = @dir + '/workbook_linked.xlsm'
+      @simple_file_xlsm = @dir + '/workbook.xls'
+      @simple_file_xlsx = @dir + '/workbook.xlsx'
+    end
+
+    after do
+      Excel.kill_all
+      rm_tmp(@dir)
+    end
+
+    describe "trace" do
+
+      it "should put some number" do
+        a = 4
+        REOCommon::trace "some text #{a}"
+      end
+
+      it "should put another text" do
+        b = Book.open(@simple_file)
+        REOCommon::trace "book: #{b}"
+      end
+    end
+
+    describe "own_methods" do
+
+      before do
+        @book1 = Book.open(@simple_file)
+        @ole_workbook_methods = 
+          ["Activate", "ActiveSheet", "Application", "Close", "FullName", "HasPassword", "Name", "Names", 
+            "Password", "Protect", "ProtectSharing", "ProtectStructure", "Protect", "ReadOnly", "Save", 
+            "SaveAs", "Saved", "Sheets", "Unprotect"]
+        @book_methods = ["activate", "add_sheet", "alive?", "close", "filename", "nameval", "ole_object", 
+                         "ole_workbook", "reopen", "save", "save_as", "saved", "set_nameval"]
+        @ole_excel_methods = 
+          ["ActiveCell", "ActiveSheet", "ActiveWorkbook", "Application",  "Calculate", "Cells", "Columns",
+            "DisplayAlerts", "Evaluate", "Hwnd", "Name", "Names", "Quit", "Range", "Ready", "Save", 
+            "Sheets", "UserName", "Value", "Visible", "Workbooks", "Worksheets"]
+        @excel_methods = ["alive?", "book_class", "close", "displayalerts", "recreate", "visible", "with_displayalerts"] 
+      end
+
+      after do
+        @book1.close
+      end
+
+      it "should do own_methods with popular ole_workbook and workbook methods" do
+        ((@ole_workbook_methods + @book_methods) - @book1.own_methods).should be_empty
+        (Object.instance_methods - @book1.own_methods).should == Object.instance_methods 
+      end
+
+      it "should do own_methods with popular ole_excel and excel methods" do
+        ((@ole_excel_methods + @excel_methods) - @book1.excel.own_methods).should be_empty
+         (Object.instance_methods - @book1.excel.own_methods).should == Object.instance_methods
+      end
+
+    end
+
+    describe "Object methods" do
+
+      before do
+        @book = Book.open(@simple_file)
+        @sheet = @book.sheet(1)
+      end
+
+      before do
+        @book.close
+      end
+
+      it "should raise an error when asking excel of a sheet" do
+        expect{
+          @sheet.excel
+          }.to raise_error(ExcelError, "receiver instance is neither an Excel nor a Book")
+      end
+
+    end
+  end
+end