【NetOffice】Worksheet.UsedRangeプロパティから更に値の有無で絞り込むロジック組んでみた。(3)

  • 2012.12.02 Sunday
  • 01:59
JUGEMテーマ:コンピュータ

------------------------------------
追記
以下で条件の不安を解消するロジックを組んでみました。
【NetOffice】Worksheet.UsedRangeプロパティから更に値の有無で絞り込むロジック組んでみた。(4)
http://pro.art55.jp/?eid=1304135
------------------------------------

Source and Project

【NetOffice】Worksheet.UsedRangeプロパティから更に値の有無で絞り込むロジック組んでみた。(1)
http://pro.art55.jp/?eid=1304131
【NetOffice】Worksheet.UsedRangeプロパティから更に値の有無で絞り込むロジック組んでみた。(2)
http://pro.art55.jp/?eid=1304132

上記で投稿したロジックを再考してみました。ループの回数をなるべく減らすために、どうすれば良いのか考えていたわけですが、(1)では上下左右の全ての辺の列と行をループする処理を書いたのですが、これは効率が悪いというわけで、(2)で、一つの辺だけ、全ての列をループさせるという処理に書き換えてみました。ただ、それでもシート全体を検索を書けるような状況では、待てないくらい遅くなるので、ゴミデータなどが入り込んでいる場合は問題となります。

そこで更にロジックを改善してみました。冒頭に示している図の通り、

1.左端から右へ値が存在する列がみつかるまで検索する。見つかった列を左端の列とする。
2.右端から左へ値が存在する列がみつかるまで検索する。見つかった列を右端の列とする。
3.上から下へ値が存在する行がみつかるまで検索する。見つかった行を上端の行とする。
4.下から上へ値が存在する列がみつかるまで検索する。見つかった列を下端の行とする。

このロジックであれば、全ての辺に対して、すべての列と行を検索することなく得たい値を得ることができます。実装すると

using System.Collections.Generic;
using System.Linq;
using NetOffice.ExcelApi;
using NetOffice.ExcelApi.Enums;
namespace Art55.NetOfficeDemo20121202_001
{
    public static class WorksheetUtils
    {
        public static Range GetHasContentUsedRange(this Worksheet sheet)
        {
            Range usedRange = sheet.UsedRange;
            int usedRangeTailIndex = usedRange.Row + usedRange.Rows.Count - 1;
            int usedRangeLeftIndex = usedRange.Column + usedRange.Columns.Count - 1;
            var rightColumn = usedRange
                .Rows
                .First()
                .Columns
                .FirstOrDefault(cell => cell.Value2 != null
                                        || cell.End(XlDirection.xlDown).Row <= usedRangeTailIndex);
            if (rightColumn == null)
            {
                return null;
            }
            int right = rightColumn.Column;
            int left = usedRange
                .Rows
                .First()
                .Columns
                .ReverseRows()
                .First(cell => cell.Value2 != null
                               || cell.End(XlDirection.xlDown).Row <= usedRangeTailIndex)
                .Column;
            int top = usedRange
                .Columns
                .First()
                .Rows
                .First(cell => cell.Value2 != null
                               || cell.End(XlDirection.xlToRight).Column <= usedRangeLeftIndex)
                .Row;
            int tail = usedRange
                .Columns
                .First()
                .Rows
                .ReverseColumns()
                .First(cell => cell.Value2 != null
                               || cell.End(XlDirection.xlToRight).Column <= usedRangeLeftIndex)
                .Row;
            return sheet.Range(sheet.Cells[top, left], sheet.Cells[tail, right]);
        }
        private static IEnumerable<Range> ReverseRows(this Range range)
        {
            Range row = range.Columns.First();
            for (int index = range.Columns.Count - 1; index >= 0; index--)
            {
                yield return row.Offset(0, index);
            }
        }
        private static IEnumerable<Range> ReverseColumns(this Range range)
        {
            Range column = range.Rows.First();
            for (int index = range.Rows.Count - 1; index >= 0; index--)
            {
                yield return column.Offset(index, 0);
            }
        }
    }
}

ポイントとしてはIEnumerable<T>.Last(thist IEnumerable<T> source)やIEnumerable<T>.Reverse(thist IEnumerable<T> source)は、使わない事ですね。なるべく先頭からアクセスするようにして、後ろからアクセスする場合は、添え字演算子で順次アクセスしていくというのがパフォーマンスを劣化させないポイントでしょうか。この辺、Excelのオブジェクトがめちゃくちゃ扱いにくいところです。

今回のチューニングで、シート全体が検索される状況でも、短気な私でも待てるぐらいの早さになりました。

Source and Project

------------------------------------
追記
以下で条件の不安を解消するロジックを組んでみました。
【NetOffice】Worksheet.UsedRangeプロパティから更に値の有無で絞り込むロジック組んでみた。(4)
http://pro.art55.jp/?eid=1304135
------------------------------------

--------------------------------------
本投稿は、CodePlexで公開されているNetOfficeを利用していませんが、紹介します。
NetOffice - MS Office in .NET
http://netoffice.codeplex.com/

NetOffice関連の記事は下記にまとめています。
【NetOffice】【Excel】NetOfficeのまとめ
http://pro.art55.jp/?eid=1304102
--------------------------------------

コメント
コメントする








    
この記事のトラックバックURL
トラックバック

calendar

S M T W T F S
 123456
78910111213
14151617181920
21222324252627
28293031   
<< October 2018 >>

あわせて読みたい

あわせて読みたいブログパーツ

selected entries

categories

archives

recent comment

  • 【キーボード】6年前のRealForceを復活させることはできる!?その3
    art55 (05/22)
  • 【キーボード】6年前のRealForceを復活させることはできる!?その3
    分解大好き (05/18)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    art55 (02/04)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    Gen (02/04)
  • 【キーボード】RealForce が壊れて帰ってきた。
    art55 (04/29)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    art55 (02/23)
  • 【.NET Framework 4.5】 IListがIReadOnlyListを継承してない理由。
    かるあ (02/22)
  • 【C#】Dictionaryの実装・データ構造・アルゴリズムを観察する。
    art55 (01/16)
  • 【C#】Dictionaryの実装・データ構造・アルゴリズムを観察する。
    karuakun (01/16)
  • 【NetOffice】【Excel】死なないExcelプロセスをKillする。
    art55 (12/05)

recent trackback

recommend

recommend

recommend

C#プログラマのための.NETアプリケーション最適化技法 (Programmer's SELECTION)
C#プログラマのための.NETアプリケーション最適化技法 (Programmer's SELECTION) (JUGEMレビュー »)
Sasha Goldshtein,Dima Zurbalev,Ido Flatow,サシャ・ゴルドシュタイン,ディマ・ズルバレフ,イド・フラトー

recommend

ろんりと集合
ろんりと集合 (JUGEMレビュー »)
中内 伸光
とてもわかりやすいです。

recommend

recommend

シャノン・ノイマン・ディジタル世界
シャノン・ノイマン・ディジタル世界 (JUGEMレビュー »)
市川 忠男
4章がリレーショナルデータベースな内容になってます。ページ数があまりありませんが、ポイントがものすごく的確にまとまっていて、感動します。

recommend

recommend

東プレ Realforce91UBK-S 静音キーボード 静電容量無接点方式 変荷重 ブラック NG01BS
東プレ Realforce91UBK-S 静音キーボード 静電容量無接点方式 変荷重 ブラック NG01BS (JUGEMレビュー »)

テンキーレス、静音のRealForce91UBK-S。スコスコ感がたまらなく気持ちいいです。家と会社で2台持ってます。

recommend

recommend

プログラミング.NET Framework 第4版 (プログラミングシリーズ)
プログラミング.NET Framework 第4版 (プログラミングシリーズ) (JUGEMレビュー »)
Jeffrey Richter
発売予定美 2013年10月10日。.NET Frameworkとお付き合いする人のバイブルですね。

recommend

recommend

キャット・シッターの君に。
キャット・シッターの君に。 (JUGEMレビュー »)
喜多嶋 隆
私のイラストレータデビュー本です。

recommend

Essential .NET ― 共通言語ランタイムの本質
Essential .NET ― 共通言語ランタイムの本質 (JUGEMレビュー »)
ドン・ボックス,クリス・セルズ,Don Box,Chris Sells,吉松 史彰

links

profile

search this site.

others

mobile

qrcode

powered

無料ブログ作成サービス JUGEM