Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi everyone,
Yesterday, Norman gave mi the solution to my subject stated the above. Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete The writings stated the above works... but I am facing another problem which is if when worksheet happens to be empty with no datas, so how am I gonna continue from there?? cos the writings above only works if there is datas in the worksheet. AJ |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi AJ,
Sub Tester07() On Error Resume Next Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete On Error GoTo 0 End Sub -- --- Regards, Norman "ddiicc" wrote in message ... Hi everyone, Yesterday, Norman gave mi the solution to my subject stated the above. Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete The writings stated the above works... but I am facing another problem which is if when worksheet happens to be empty with no datas, so how am I gonna continue from there?? cos the writings above only works if there is datas in the worksheet. AJ |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi AJ,
Yesterday, Norman gave mi the solution to my subject stated the above. Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete In a follow up reply, I alluded to the 8192 non-contiguous cells problem associated with the SpecialCells method. I should also have mentioned that, at the other end of the spectrum, the SpecialCells method will fail if no cells are found - as you have now discovred. The fault is mine and I apologise: use of the SpecialCells method should, in my opinion, always include an error handler to catch (at leat) the latter situation. --- Regards, Norman "Norman Jones" wrote in message ... Hi AJ, Sub Tester07() On Error Resume Next Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete On Error GoTo 0 End Sub -- --- Regards, Norman "ddiicc" wrote in message ... Hi everyone, Yesterday, Norman gave mi the solution to my subject stated the above. Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete The writings stated the above works... but I am facing another problem which is if when worksheet happens to be empty with no datas, so how am I gonna continue from there?? cos the writings above only works if there is datas in the worksheet. AJ |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Norman,
Many thanks to you. :) "Norman Jones" wrote: Hi AJ, Sub Tester07() On Error Resume Next Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete On Error GoTo 0 End Sub -- --- Regards, Norman "ddiicc" wrote in message ... Hi everyone, Yesterday, Norman gave mi the solution to my subject stated the above. Columns("A:A").SpecialCells(xlBlanks).EntireRow.De lete The writings stated the above works... but I am facing another problem which is if when worksheet happens to be empty with no datas, so how am I gonna continue from there?? cos the writings above only works if there is datas in the worksheet. AJ |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Hpw do I delete multiple empty rows found between filled rows? | Excel Worksheet Functions | |||
macro to delete rows if cell blank in column | Excel Discussion (Misc queries) | |||
Macro to add a blank row when a difference between rows is found | Excel Discussion (Misc queries) | |||
Delete Rows when Blanks are found in Column A:A | Excel Programming | |||
macro to delete entire rows when column A is blank ...a quick macro | Excel Programming |