| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro to move cell contents based on formatting
I have a sheet that some data is identified by bold text as being an item
marking, in the same column other items (not in bold) are part numbers. Need to seperate those two things (part numbers and markings) into two different columns. How is this done with a macro? Thanks, Scott |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro to move cell contents based on formatting
Dim cell as Range, rng as range
set rng = Range(cells(1,ActiveCell.Column), _ Cells(rows.count,ActiveCell.Column).End(xlup)) ActiveCell.Entirecolumn.Offset(0,1).Insert for each cell in rng if not cell.font.bold then cell.offset(0,1).Value = cell.value cell.clearcontents end if Next -- Regards, Tom Ogilvy "Scott Wagner" wrote in message ... I have a sheet that some data is identified by bold text as being an item marking, in the same column other items (not in bold) are part numbers. Need to seperate those two things (part numbers and markings) into two different columns. How is this done with a macro? Thanks, Scott |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro to move cell contents based on formatting
PERFECT!
Thanks so much! "Tom Ogilvy" wrote: Dim cell as Range, rng as range set rng = Range(cells(1,ActiveCell.Column), _ Cells(rows.count,ActiveCell.Column).End(xlup)) ActiveCell.Entirecolumn.Offset(0,1).Insert for each cell in rng if not cell.font.bold then cell.offset(0,1).Value = cell.value cell.clearcontents end if Next -- Regards, Tom Ogilvy "Scott Wagner" wrote in message ... I have a sheet that some data is identified by bold text as being an item marking, in the same column other items (not in bold) are part numbers. Need to seperate those two things (part numbers and markings) into two different columns. How is this done with a macro? Thanks, Scott |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Move cell contents with macro | Excel Discussion (Misc queries) | |||
| Original cell formatting clears when I move contents | Excel Discussion (Misc queries) | |||
| Formatting one cell based on the contents of another | Excel Discussion (Misc queries) | |||
| Macro to move the contents of a cell | Excel Programming | |||
| Macro to remove contents of cell and move all other contents up one row | Excel Discussion (Misc queries) | |||
Linear Mode
