08/01/15 01:21:22
>>372
ありがとうございます、試してみました。
RGB(255, 0, 0)なら赤になるか？→ なりました。
cells( i, j )にRGB( i, j, 0 )を入れたときに正しいグラデーションになるか？
→
For w_row = 1 To 256
For w_gyo = 1 To 256
ThisWorkbook.Sheets(3).Cells(w_row, w_gyo).Interior.Color = RGB(w_row, w_gyo, 0)
Next
Next
を試したところ正しいグラデーションにはなりませんでした。
参考画像です。URLﾘﾝｸ(nagamochi.info)
ツール→オプション→色で表示したい色を追加すると表示できました。
これ以外には方法はないのでしょうか？