Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 18
Default Cell Color Change

how would I Remove the fill color of every fourth row starting after the 4th
row.

thanks
  #2   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 10,124
Default Cell Color Change

Try this. If you want row 4 also just change 8 to 4
Sub removecolorfromcellsinrow()
mc = "m"
For i = 8 To Cells(Rows.Count, mc).End(xlUp).Row Step 4
'MsgBox i
Cells(i, mc).Interior.ColorIndex = 0
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"daphoenix" wrote in message
...
how would I Remove the fill color of every fourth row starting after the
4th
row.

thanks


  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 18
Default Cell Color Change

Thanks for the help again don,

the code that you gave me only changes the color in column M, how would I
apply this to the entire row.

"Don Guillett" wrote:

Try this. If you want row 4 also just change 8 to 4
Sub removecolorfromcellsinrow()
mc = "m"
For i = 8 To Cells(Rows.Count, mc).End(xlUp).Row Step 4
'MsgBox i
Cells(i, mc).Interior.ColorIndex = 0
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"daphoenix" wrote in message
...
how would I Remove the fill color of every fourth row starting after the
4th
row.

thanks



  #5   Report Post  
Posted to microsoft.public.excel.worksheet.functions
external usenet poster
 
Posts: 18
Default Cell Color Change

it works great thanks...but when running this the last row of the workbook is
still left filled in, is there a way to change this?

"Don Guillett" wrote:

Cells(i, mc).Interior.ColorIndex = 0

to
Cells(i, mc).ENTIREROW.Interior.ColorIndex = 0


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"daphoenix" wrote in message
...
Thanks for the help again don,

the code that you gave me only changes the color in column M, how would I
apply this to the entire row.

"Don Guillett" wrote:

Try this. If you want row 4 also just change 8 to 4
Sub removecolorfromcellsinrow()
mc = "m"
For i = 8 To Cells(Rows.Count, mc).End(xlUp).Row Step 4
'MsgBox i
Cells(i, mc).Interior.ColorIndex = 0
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"daphoenix" wrote in message
...
how would I Remove the fill color of every fourth row starting after
the
4th
row.

thanks






Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Change tab color based on current color of a cell MarkT Excel Discussion (Misc queries) 0 May 22nd 08 05:46 PM
Can you change the color of one cell based on the color of another andoscott Excel Discussion (Misc queries) 4 May 4th 07 04:02 PM
Excel: Syntax to change cell color based on color of another cell davew18 Excel Worksheet Functions 1 January 4th 07 01:24 PM
change background row color with change of date in a cell Urszula Excel Discussion (Misc queries) 5 May 17th 06 07:56 AM
How to change the default Border, Font Color, and Cell Color Elijah Excel Discussion (Misc queries) 3 November 2nd 05 11:52 PM


All times are GMT +1. The time now is 09:33 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"