{"id":99,"date":"2013-12-13T08:12:40","date_gmt":"2013-12-13T08:12:40","guid":{"rendered":"http:\/\/tastaturkind.ch\/?p=99"},"modified":"2018-12-04T10:09:10","modified_gmt":"2018-12-04T09:09:10","slug":"update-excel-cells-with-color","status":"publish","type":"post","link":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/2013\/12\/13\/update-excel-cells-with-color\/","title":{"rendered":"Update Excel Cells with color"},"content":{"rendered":"


\nSub Update_Row_Colors()<\/p>\n

Dim LRow As Integer
\nDim LCell As String
\nDim LColorCells As String
\n'Start at row 7
\nLRow = 7<\/p>\n

'Update row colors for the first 2000 rows
\nWhile LRow < 2000
\nLCell = \"C\" & LRow
\n'Color will changed in columns A to K
\nLColorCells = \"A\" & LRow & \":\" & \"K\" & LRow<\/p>\n

Select Case Left(Range(LCell).Value, 6)<\/p>\n

'Set row color to light blue
\nCase \"007007\"
\nRange(LColorCells).Interior.ColorIndex = 34
\nRange(LColorCells).Interior.Pattern = xlSolid<\/p>\n

'Set row color to light green
\nCase \"030087\"
\nRows(LRow & \":\" & LRow).Select
\nRange(LColorCells).Interior.ColorIndex = 35
\nRange(LColorCells).Interior.Pattern = xlSolid<\/p>\n

'Set row color to light yellow
\nCase \"063599\"
\nRows(LRow & \":\" & LRow).Select
\nRange(LColorCells).Interior.ColorIndex = 19
\nRange(LColorCells).Interior.Pattern = xlSolid<\/p>\n

'Default all other rows to no color
\nCase Else
\nRows(LRow & \":\" & LRow).Select
\nRange(LColorCells).Interior.ColorIndex = xlNone<\/p>\n

End Select<\/p>\n

LRow = LRow + 1
\nWend<\/p>\n

Range(\"A1\").Select<\/p>\n

End Sub
\n<\/code><\/p>\n","protected":false},"excerpt":{"rendered":"

Sub Update_Row_Colors() Dim LRow As Integer Dim LCell As String Dim LColorCells As String ‚Start at row 7 LRow = 7 ‚Update row colors for the first 2000 rows While LRow < 2000 LCell = „C“ & LRow ‚Color will … Weiterlesen →<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[],"tags":[],"class_list":["post-99","post","type-post","status-publish","format-standard","hentry"],"_links":{"self":[{"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/posts\/99","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/comments?post=99"}],"version-history":[{"count":2,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/posts\/99\/revisions"}],"predecessor-version":[{"id":349,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/posts\/99\/revisions\/349"}],"wp:attachment":[{"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/media?parent=99"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/categories?post=99"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/oliver-frick.ch\/wordpress\/index.php\/wp-json\/wp\/v2\/tags?post=99"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}