Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I need a Macro that would find the BLANK CELLS in a column. It would delete
the blank cell plus the cells in the preceding 2 columns and shift them up without impacting the remaining columns or rows across the spreadsheet. The spreadsheet repeats every 3rd column with a different item and may extend 90 columns by 1000 rows. Example: If C4 is blank, need to delete cells A4:C4 and SHIFT UP the remaining items in the 3 columns for each blank cell found in column C. This routine would need to repeat across the spreadsheet until all items are checked. "Joel" provided me with a routine (excellent help & patience) that has gotten me this far along under "Capturing data only when a column 'Value' changes" dated 10/23/08.. A B C D E F 1 Item A 09/30/2008 11:55:00 ON Item B 09/30/2008 11:55:00 2 Item A 09/30/2008 11:56:00 ON Item B 09/30/2008 11:56:00 OPEN 3 Item A 09/30/2008 11:57:00 OFF Item B 09/30/2008 11:57:00 OPEN 4 Item A 09/30/2008 11:58:00 Item B 09/30/2008 11:58:00 CLOSE 5 Item A 09/30/2008 11:59:00 OFF Item B 09/30/2008 11:59:00 CLOSE 6 Item A 10/01/2008 00:00:00 OFF Item B 10/01/2008 00:00:00 7 Item A 10/01/2008 00:01:00 ON Item B 10/01/2008 00:01:00 8 Item A 10/01/2008 00:02:00 OFF Item B 10/01/2008 00:02:00 OPEN 9 Item A 10/01/2008 00:03:00 ON Item B 10/01/2008 00:03:00 OPEN 10 Item A 10/01/2008 00:04:00 Item B 10/01/2008 00:04:00 OPEN 11 Item A 10/01/2008 00:05:00 OFF Item B 10/01/2008 00:05:00 CLOSE 12 Item A 10/01/2008 00:06:00 ON Item B 10/01/2008 00:06:00 CLOSE Thanks in advance.. Shag (excel crash dummy) |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
reduce excel file size by deleting blank rows and columns?? | Excel Discussion (Misc queries) | |||
deleting rows with blank cells after a specified column? | Excel Discussion (Misc queries) | |||
Deleting blank (Cells/Rows) in Excel-VBA | Excel Programming | |||
Deleting rows with blank cells | Excel Programming | |||
Deleting rows with blank cells | Excel Worksheet Functions |