酒井信之です。

 >るびまの記事について「ここがわかりにくい」とか
 >「もっとここについて説明してほしい」とかありましたら、参考に
 >しますんで、教えてください。

EXCELでのWIN32OLEについて
１：EXCELのｃｅｌｌは、ｃｅｌｌ[r, c]の様に参照したい。
　CELLの参照は、cellｃｅｌｌ[r, c]の様にしたいのでmoduleの定義を以下の様にす 
るのは、どうでしょう。
    sheet = book.worksheets('Sheet1')
    cell = sheet.cells
    cell = cell.extend WorkCell

module WorkCell
   def [] r,c
      wcell = self.Item(r,c)
      if wcell.MergeCells then
        wcell.MergeArea.Item(1,1).Value
      else
        wcell.Value
      end
    end
　
　def []= r,c,value
　　　....
　end
end
これでcell.item(i, j).value = '文字: size20,黒,Center,Center'が
cell[i, j] = '文字: size20,黒,Center,Center' とできる。

問題点
しかし、cell.item(i, j).Font.Size = 20は、cell[i, j].Font.Size = 20とは、でき 
ない。
Fontに関する再定義がまた必要になる。（CELLに関する属性は沢山あり面倒）
   cell = sheet.Range("B2")
   borders = cell.Borders
  ...
   border = borders.Item(index)
   border.extend Border
で定義する方法は、かえってわかりにくいのではないですか。
　cell.item(i, j).Borders(position('l')).LineStyle = line_s('c')
　cell.item(i, j).Borders(position('l')).Weight = line_w('s')
　の方がわかりやすい気がしますが。


２：EXCELの初めて見る呼び出しかた。
　以下の呼び出し方は、処理と終了またはエラーが近くにあり非常に参考になりました。
　個人的には、eachを繰り返し以外に使うには、少し抵抗がありますが。
def openExcelWorkbook filename
   filename = getAbsolutePath(filename)
   xl = WIN32OLE.new('Excel.Application')
   book = xl.Workbooks.Open(filename)
   begin
     yield book
   ensure
     xl.Workbooks.Close
     xl.Quit
   end
end

問題点
　複数のsheetを扱うときは、適用できないのでは。
　色々な場合にも適用できてわかりやすい書き方を模索しています。どなたが教えて 
ください。


以上　気が付いた事を書きました。　今回の記事には、知らないことがいろいろとあ 
り勉強になりました。












--
ML: learn-ruby-in-kansai@r...
使い方: http://QuickML.com/