掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
EXCELでバリアント配列を使ったセル色の設定 (ID:45139)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
WorkSheet.Range['A1:E9'].Interior.ColorIndex := CellColorArray; ColorIndexに配列を設定することはできないでしょう。 試してないけど、以下の内容でどうでしょうか？ for r := 1 to 9 do begin for c := 1 to 5 do begin //偶数行と奇数行で内容を変える if Odd(r) then begin ValueArray [r, c] := 'AAA'; WorkSheet.Range['A1:E9'].Cells(r,c).Interior.ColorIndex := 6; //黄色 //あるいは()は[]かも WorkSheet.Range['A1:E9'].Cells[r,c].Interior.ColorIndex := 6; //黄色 end else begin ValueArray [r, c] := 'BBB'; WorkSheet.Range['A1:E9'].Cells(r,c).Interior.ColorIndex := 38; //ピンク //あるいは()は[]かも WorkSheet.Range['A1:E9'].Cells[r,c].Interior.ColorIndex := 38; //ピンク end; end; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.