| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Macro help
I need a macro that will cut the final piece of text (in this case a zip code) and place it into the next cell A1 A1 A2 123 Anystreet 11111 I want 123 Anystreet 11111 -- mikecookaxa ------------------------------------------------------------------------ mikecookaxa's Profile: http://www.excelforum.com/member.php...o&userid=27926 View this thread: http://www.excelforum.com/showthread...hreadid=474207 |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro help
Mike,
The following will work in Excel 2000 and later (the Split function is not available in earlier versions): Dim V As Variant V = Split(ActiveCell.Text, " ") ActiveCell(1, 2).Value = V(UBound(V)) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "mikecookaxa" wrote in message ... I need a macro that will cut the final piece of text (in this case a zip code) and place it into the next cell A1 A1 A2 123 Anystreet 11111 I want 123 Anystreet 11111 -- mikecookaxa ------------------------------------------------------------------------ mikecookaxa's Profile: http://www.excelforum.com/member.php...o&userid=27926 View this thread: http://www.excelforum.com/showthread...hreadid=474207 |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Macro help
You can also experiment with the Excel Menu:
Select Cell or Cells Select Data Select Text To Columns This splits up text based on your chosen delimeter "Chip Pearson" wrote: Mike, The following will work in Excel 2000 and later (the Split function is not available in earlier versions): Dim V As Variant V = Split(ActiveCell.Text, " ") ActiveCell(1, 2).Value = V(UBound(V)) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "mikecookaxa" wrote in message ... I need a macro that will cut the final piece of text (in this case a zip code) and place it into the next cell A1 A1 A2 123 Anystreet 11111 I want 123 Anystreet 11111 -- mikecookaxa ------------------------------------------------------------------------ mikecookaxa's Profile: http://www.excelforum.com/member.php...o&userid=27926 View this thread: http://www.excelforum.com/showthread...hreadid=474207 |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Macro recorded... tabs & file names changed, macro hangs | Excel Worksheet Functions | |||
| Macro Help Needed - Excel 2007 - Print Macro with Auto Sort | Excel Worksheet Functions | |||
| how to count/sum by function/macro to get the number of record to do copy/paste in macro | Excel Programming | |||
| macro to delete entire rows when column A is blank ...a quick macro | Excel Programming | |||
| Start Macro / Stop Macro / Restart Macro | Excel Programming | |||
Linear Mode
