編集履歴

質問編集履歴

文章からわかりにくくなるような要素を削除し、伝えたいことだけを書くようにしました。

2020/03/18 05:27

投稿

maru-omochi

スコア11

test CHANGED Viewed

File without changes

test CHANGED Viewed

@@ -1,169 +1,61 @@
-### セルの色を変える処理を作りたい。
+【やりたいこと】
-現在C#にてエクセルマクロを書いています。
+・エクセルのセルの色を変えたい。
+　（値が０の時は緑、０より大きい場合は赤、０より小さい場合は青にしたい）
+・エクセルの空白セルの判定を行いたい。
-セルの色をセルの数字によって変える処理を行いたく、選択されているセル＝０の時は緑、＜０の時は青、＞０の時は赤とする処理を書きました。
+　（理由：セルの値が０の時、とすると空白セルも拾ってしまうため）
+ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
+【困っている点】
+・上記【やりたいこと】でも少し触れていますが、空白セルに０が入っているらしく、
-対象の列のセルには空セルがあります。これは仕様上必ず空セルが生じます。
+  if(セルの値＝＝０)と書くと空白セルのところも拾ってしまいます（緑になってしまう）
+ーーー
-数字は飛び飛びで存在し、ループ処理で判定を行っております。
+https://docs.microsoft.com/ja-jp/office/troubleshoot/excel/use-formula-evaluate-blank-cell
+にて
-### 空セルを読み込んだ時に値が０であると判定されてしまう。
+IF(ISBLANK(対象セル),"blank",IF(対象セル=0,"zero","other"))
-”セルの値が０の時”
-　の条件コードに到達したときに、空セルが対象になっているのにもかかわらず０判定で緑色になってしまいます。
+という判定方法を使わなければいけないと見つけました。
-### 該当のソースコード
+しかしこれをどうC#側に組み込んでいいかわからず困っています。
-var selectedRange = Globals.ThisAddIn.Application.Selection as Excel.Range;
+ーーーーーーーーーーー
-            var activeSheet = Globals.ThisAddIn.Application.ActiveSheet as Excel.Worksheet;
-            var selectedAreas = selectedRange.Areas as Excel.Areas;
-            int selectedRowsCount = selectedRange.Rows.Count;
-            //int selectedColumnsCount = selectedRange.Columns.Count;
+　昨日この質問を上げた際、わかりにくく読みにくい文章になってしまいまして皆様にご迷惑をおかけいたしました。大変失礼いたしました。
-            int secondTimeMoreColunm = 0;
-            int secondTimeMoreRow = selectedRowsCount;
-            //string checkString = " 　";
-            //↓選択されているセルの総数（行×列）分のループ処理
-            for (int a = 0; a < selectedRange.Count; a++)
-            {
-                if(activeSheet.Cells[selectedRange.Row,selectedRange.Column].)
-                //↓選択されている列が複数の場合の処理。elseの方のループが先に動いて、
-                //行カウントが全体の選択セルカウントに越されたとき(２列目)から走るコマンド
-                if (a >= selectedRowsCount)
+また丁寧にその旨ご指摘いただいたことに感謝申し上げます。
-                {
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Value) == 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Interior.Color = Color.GreenYellow;
-                    }
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Value) > 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Interior.Color = Color.LightPink;
-                    }
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Value) < 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + (a + secondTimeMoreRow) - selectedRowsCount, selectedRange.Column + secondTimeMoreColunm].Interior.Color = Color.LightSkyBlue;
-                    }
-                }
-                //↓選択されているセルの列が単数。または複数でかつ一列目の処理
-                else
-                {
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Value) == 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Interior.Color = Color.GreenYellow;
-                    }
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Value) > 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Interior.Color = Color.LightPink;
-                    }
-                    if (Convert.ToDecimal(activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Value) < 0)
-                    {
-                        activeSheet.Cells[selectedRange.Row + a, selectedRange.Column].Interior.Color = Color.LightSkyBlue;
-                    }
-                }
-                if ((a + 1) % selectedRowsCount == 0)
-                {
-                    secondTimeMoreColunm++;
-                    secondTimeMoreRow = secondTimeMoreRow - selectedRowsCount;
-                }
-            }
-        }
-### 試したこと
-いろいろネットで調べまして、Equals（""), Equals(string,"") , .Value == null , .Value == ""
-等を試してみたのですがだめでした。
-なにかセルの表示がされない状態になっている時　のようなまったく別の角度からのアプローチでないといけないのでしょうか。
-selectedRange.Length　のようなLengthにあたるものはないのでしょうか。VBAだとlenというものがある（？）らしいのですがVSTO(C#)だとなさそうにみえるのです　。。。
-わかりにくい質問でしたら申し訳ございません。書き方にこだわりはなく、空セルをスルーできればそれで解決です。０と空セルの区別をつける方法をご教授ください。よろしくお願いいたします。
-追記：https://docs.microsoft.com/ja-jp/office/troubleshoot/excel/use-formula-evaluate-blank-cell
-にてIF(ISBLANK(対象セル),"blank",IF(対象セル=0,"zero","other"))　という判定方法を使うと書いてあるのを見つけました。これをC#にてどう組み込んだらいいのでしょうか。これが組み込めれば解決するのでしょうか

追記した

2020/03/18 05:27

投稿

maru-omochi

スコア11

test CHANGED Viewed

File without changes

test CHANGED Viewed

@@ -161,3 +161,9 @@
 わかりにくい質問でしたら申し訳ございません。書き方にこだわりはなく、空セルをスルーできればそれで解決です。０と空セルの区別をつける方法をご教授ください。よろしくお願いいたします。
+追記：https://docs.microsoft.com/ja-jp/office/troubleshoot/excel/use-formula-evaluate-blank-cell
+にてIF(ISBLANK(対象セル),"blank",IF(対象セル=0,"zero","other"))　という判定方法を使うと書いてあるのを見つけました。これをC#にてどう組み込んだらいいのでしょうか。これが組み込めれば解決するのでしょうか

×VSだとなさそうにみえる→〇VSTO(C#）としました

2020/03/17 06:38

投稿

maru-omochi

スコア11

test CHANGED Viewed

File without changes

test CHANGED Viewed

@@ -156,7 +156,7 @@
-selectedRange.Length　のようなLengthにあたるものはないのでしょうか。VBAだとlenというものがある（？）らしいのですがVSだとなさそうにみえるのです　。。。
+selectedRange.Length　のようなLengthにあたるものはないのでしょうか。VBAだとlenというものがある（？）らしいのですがVSTO(C#)だとなさそうにみえるのです　。。。