lopnfl.blogg.se

Lastcol = Cells(3, Columns.Count).End(xlToLeft).Column Lastrow = Cells(Rows.Count, "J").End(xlUp).Row '*******Set colourit variable for Color Rows code*********** 'Code then calls to another code that colors certain cells

'Command Button is to hide rows where column AX contains text, 'Completed' using Command button Rows.SpecialCells(xlCellTypeVisible) so it reads below but it didn't color the rows correctly. (You can where it didn't color rows properly btw Almo and Alvon in the pic below).ġ) I've tried adding. I figure there is no harm coloring using xlCellTypeVisible even if there are no visible cells. I've used the code by itself successfully in the past, but with no hidden rows, and it colors the used range even if there are hidden blank columns.Ģ) It colors the hidden rows as well, but I want it to color only the visible rows when the rows are hidden and color all the rows when the rows are unhidden. I don't get an error, it just doesn't work correctly. I've combined these 2 codes, and the problem is in the coloring rows code:ġ) It doesn't color rows to the end of the used range but stops at the first hidden column, which is column F and mainly is blank. I've used the code by itself successfully many times in the past, but with no hidden rows. The other code is used to color rows in my data range based on when the value in column J (Hub column) changes and if the Week column (column E) changes within that hub, then it highlights that row, too-alternating between light orange and no color.

When the command button is pressed again, it will unhide the rows. I have code that uses a command button on my spreadsheet to hide rows that contain the text 'Complete' in column AX.