Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Selection a row while within a "FOR Each"
Hi all,
I try to avoid cluttering this group with messages - waiting until I've tried everything I can and have exhausted every- thing I can think of. Well, I'm there now. So, right to the point to avoid any excess bandwidth. I have a spreadsheet containing columns of data. Row one has column titles. Column "E" contains a "Date" (custom) formatted as "ddd | yy/mm/dd" [not that it matters as far as this question is concerned]. The number of rows may vary from 50 to 2000 but the (row) last cell in column A will contain "EOList." So far I have developed multiple routines with: FOR Each Cell_In_Loop In Range("CELL2:CELL2000") IF ( Cell_In_Loop.Offset(0, Whatever to get Cell A).Value _ = "EOList" ) Then ' Whatever Exit For Else ' Whatever End If Next This has worked fine until now... . What I need to do now is insert a blank line each time the day changes. I haven't had any problem changing the color of the cell's text or it's interior color. I've been able to pick out the day of the week easily using the weekday function on the date which is stored in the cell. The problem arises when I try to "select" the row (when the day changes) and insert a blank row before that row. Excel says an object has to be selected/declared. Here's what I've tried. (I started small just trying to put in a blank row before the "EOList" row.) FOR Each Cell_In_Loop In Range("CELL2:CELL2000") IF ( Cell_In_Loop.Offset(0, Whatever to get Cell A).Value _ = "EOList" ) Then Rows(Cell_In_Loop.Offset(0, 0)).Select Selection.Insert Shift:=xlDown Exit For Else ' Whatever End If Next Suggestions/Solutions? David |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
"Center across selection" rather than "Merge cells" | Excel Discussion (Misc queries) | |||
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell | Excel Discussion (Misc queries) | |||
change "true" and "false" to "availble" and "out of stock" | Excel Worksheet Functions | |||
Count occurences of "1"/"0" (or"TRUE"/"FALSE") in a row w. conditions in the next | New Users to Excel | |||
Icon for "Wrap" and for "Centre Across Selection" | Excel Worksheet Functions |