Macro to delete a group of CELLS
I am trying to get a macro to delete a group of cells as I parse down
through the block of instrument data, to weed out blanks or corrupt data. I just want the macro to delete the 4 or 5 adjacent cells and move the data block up (similar to a right click delete- which asks if you want up, right left or entire row, etc Sub delete() ' ' delete Macro ' Macro recorded 5/5/2006 by Paul ' ' Keyboard Shortcut: Ctrl+d ' Range("E2378:L2378").Select Selection.delete Shift:=xlUp End Sub. Only problem with recorder is it goes to a defined cell. I would like my macro to work wherever the cursor is- not always at E:2378 to L:2378 I appreciate the help! Thanks Paul |
Macro to delete a group of CELLS
Works like a charm. Thanks!
Paul "Don Guillett" wrote in message ... Have you tried without Range("E2378:L2378").Select -- Don Guillett SalesAid Software wrote in message ... I am trying to get a macro to delete a group of cells as I parse down through the block of instrument data, to weed out blanks or corrupt data. I just want the macro to delete the 4 or 5 adjacent cells and move the data block up (similar to a right click delete- which asks if you want up, right left or entire row, etc Sub delete() ' ' delete Macro ' Macro recorded 5/5/2006 by Paul ' ' Keyboard Shortcut: Ctrl+d ' Range("E2378:L2378").Select Selection.delete Shift:=xlUp End Sub. Only problem with recorder is it goes to a defined cell. I would like my macro to work wherever the cursor is- not always at E:2378 to L:2378 I appreciate the help! Thanks Paul |
Macro to delete a group of CELLS
glad to help
-- Don Guillett SalesAid Software wrote in message ... Works like a charm. Thanks! Paul "Don Guillett" wrote in message ... Have you tried without Range("E2378:L2378").Select -- Don Guillett SalesAid Software wrote in message ... I am trying to get a macro to delete a group of cells as I parse down through the block of instrument data, to weed out blanks or corrupt data. I just want the macro to delete the 4 or 5 adjacent cells and move the data block up (similar to a right click delete- which asks if you want up, right left or entire row, etc Sub delete() ' ' delete Macro ' Macro recorded 5/5/2006 by Paul ' ' Keyboard Shortcut: Ctrl+d ' Range("E2378:L2378").Select Selection.delete Shift:=xlUp End Sub. Only problem with recorder is it goes to a defined cell. I would like my macro to work wherever the cursor is- not always at E:2378 to L:2378 I appreciate the help! Thanks Paul |
Macro to delete a group of CELLS
Does the same approach work to prompts to load a file into a worksheet so
that I chose the file/path and filename instead of having it cast in stone each time? Thanks Paul "Don Guillett" wrote in message ... glad to help -- Don Guillett SalesAid Software wrote in message ... Works like a charm. Thanks! Paul "Don Guillett" wrote in message ... Have you tried without Range("E2378:L2378").Select -- Don Guillett SalesAid Software wrote in message ... I am trying to get a macro to delete a group of cells as I parse down through the block of instrument data, to weed out blanks or corrupt data. I just want the macro to delete the 4 or 5 adjacent cells and move the data block up (similar to a right click delete- which asks if you want up, right left or entire row, etc Sub delete() ' ' delete Macro ' Macro recorded 5/5/2006 by Paul ' ' Keyboard Shortcut: Ctrl+d ' Range("E2378:L2378").Select Selection.delete Shift:=xlUp End Sub. Only problem with recorder is it goes to a defined cell. I would like my macro to work wherever the cursor is- not always at E:2378 to L:2378 I appreciate the help! Thanks Paul |
All times are GMT +1. The time now is 03:51 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com