{"id":770,"date":"2006-09-14T11:34:02","date_gmt":"2006-09-14T19:34:02","guid":{"rendered":"http:\/\/arcanius.silverfir.net\/wp\/excel-routine-for-limitless-conditional-formatting"},"modified":"2006-09-14T11:35:06","modified_gmt":"2006-09-14T19:35:06","slug":"excel-routine-for-limitless-conditional-formatting","status":"publish","type":"post","link":"https:\/\/arcanius.silverfir.net\/blog\/excel-routine-for-limitless-conditional-formatting\/","title":{"rendered":"Excel Routine for Limitless Conditional Formatting"},"content":{"rendered":"<pre><code>\r\nPrivate Sub Worksheet_Change(ByVal Rng As Range)\r\nDim R As Integer\r\nDim G As Integer\r\n    For Each Target In Rng.Cells\r\n        If Not Intersect(Target, Range(\"AL5:DX177\")) Is Nothing Then\r\n            If Target < 1 Then\r\n                G = 255\r\n                R = Target * 255\r\n            Else\r\n                R = 255\r\n                G = 475 - (Target * 255)\r\n            End If   \r\n            Target.Interior.Color = RGB(R, G, 0)\r\n        End If\r\n    Next Target\r\nEnd Sub\r\n<\/code><\/code><\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Private Sub Worksheet_Change(ByVal Rng As Range) Dim R As Integer Dim G As Integer For Each Target In Rng.Cells If Not Intersect(Target, Range(&#8220;AL5:DX177&#8221;)) Is Nothing Then If Target < 1 Then G = 255 R = Target * 255 Else R = 255 G = 475 - (Target * 255) End If Target.Interior.Color = RGB(R, [&hellip;]\n<\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[1],"tags":[8],"class_list":["post-770","post","type-post","status-publish","format-standard","hentry","category-everything","tag-technology"],"_links":{"self":[{"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/posts\/770","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/comments?post=770"}],"version-history":[{"count":0,"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/posts\/770\/revisions"}],"wp:attachment":[{"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/media?parent=770"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/categories?post=770"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/arcanius.silverfir.net\/blog\/wp-json\/wp\/v2\/tags?post=770"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}