Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move Total from Column B to A
Hi,
Below is a macro to move any cells that contain the word Total in Column A to Column B. But how would I move the word total from column B to column A? Thanks Sub testing() For Each cell In Columns("A").SpecialCells(xlCellTypeConstants) If cell.Value Like "*Total*" Then cell.Offset(0, 1).Value = cell.Value cell.Value = "" End If Next cell End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move Total from Column B to A
Sub testing()
For Each cell In Columns("B").SpecialCells(xlCellTypeConstants) If cell.Value Like "*Total*" Then cell.Offset(0, -1).Value = cell.Value cell.Value = "" End If Next cell End Sub Regards Trevor "dd" wrote in message oups.com... Hi, Below is a macro to move any cells that contain the word Total in Column A to Column B. But how would I move the word total from column B to column A? Thanks Sub testing() For Each cell In Columns("A").SpecialCells(xlCellTypeConstants) If cell.Value Like "*Total*" Then cell.Offset(0, 1).Value = cell.Value cell.Value = "" End If Next cell End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move Total from Column B to A
Thanks for the fast response.
On Dec 18, 11:31 am, "Trevor Shuttleworth" wrote: Sub testing() For Each cell In Columns("B").SpecialCells(xlCellTypeConstants) If cell.Value Like "*Total*" Then cell.Offset(0, -1).Value = cell.Value cell.Value = "" End If Next cell End Sub Regards Trevor "dd" wrote in ooglegroups.com... Hi, Below is a macro to move any cells that contain the word Total in Column A to Column B. But how would I move the word total from column B to column A? Thanks Sub testing() For Each cell In Columns("A").SpecialCells(xlCellTypeConstants) If cell.Value Like "*Total*" Then cell.Offset(0, 1).Value = cell.Value cell.Value = "" End If Next cell End Sub- Hide quoted text -- Show quoted text - |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Total column changes colors when total equals sum of other columns | New Users to Excel | |||
disable Total and/or Sub total for a single column | Excel Worksheet Functions | |||
Move cell contain from Column A to B anythign with the word Total | Excel Programming | |||
move column total in pivot table to begining | Excel Discussion (Misc queries) | |||
move data between sheets & keep running total | Excel Programming |