| Home |
| Search |
| Today's Posts |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Delete Row
Hi
If Application.Worksheetfunctions.Counta(Range("A:A") ) = 0 then Selection.EntireRow.Delete Else Msgbox "Unable to Delete this Row!" End if If your column A contains a formula which returns empty text "" then that will also be counted, even though the cell looks empty, so just be careful with that. regards Paul On Apr 18, 9:36 am, Karen McKenzie wrote: I want to be able to run a macro which will delete the row selected if column A is blank. If it is not blank then message box "Unable to delete this row!" I've looked through code already available but can't find anything that does this. Could someone please help. |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
| Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
| Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
| Macro to delete sheets and saves remaining file does not properly delete module | Excel Programming | |||
| Delete every 3rd row, then delete rows 2-7, move info f/every 2nd row up one to the end and delete the row below | Excel Programming | |||
Threaded Mode
