| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Test for null - insert a row if isnull
Hi,
In a Macro (VBA) I am testing cell A6 for null, if isnull (""), I want to insert a row. The problem is that it always inserts a row even when cell A6 has something in it? There are blank spaces at the from of the cell so I trimmed it. Does anyone see something I'm doing wrong? Sheets("Sheet1").Select Range("A6").Select If Trim(A6) = "" Then Range("A4").Select Selection.EntireRow.Insert End If Thanks in advance. Bonnie |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Test for null - insert a row if isnull
Should be ....
Trim(Range("A6")) "Bonnie" wrote: Hi, In a Macro (VBA) I am testing cell A6 for null, if isnull (""), I want to insert a row. The problem is that it always inserts a row even when cell A6 has something in it? There are blank spaces at the from of the cell so I trimmed it. Does anyone see something I'm doing wrong? Sheets("Sheet1").Select Range("A6").Select If Trim(A6) = "" Then Range("A4").Select Selection.EntireRow.Insert End If Thanks in advance. Bonnie |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Test for null - insert a row if isnull
Use it like this
This line is wrong If Trim(A6) = "" Then Sub Test() Sheets("Sheet1").Select If Trim(Range("A6")) = "" Then Range("A4").EntireRow.Insert End If End Sub -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Bonnie" wrote in message ... Hi, In a Macro (VBA) I am testing cell A6 for null, if isnull (""), I want to insert a row. The problem is that it always inserts a row even when cell A6 has something in it? There are blank spaces at the from of the cell so I trimmed it. Does anyone see something I'm doing wrong? Sheets("Sheet1").Select Range("A6").Select If Trim(A6) = "" Then Range("A4").Select Selection.EntireRow.Insert End If Thanks in advance. Bonnie |
|
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
Test for null - insert a row if isnull
Thank you both for responding. I'll give it a try.
"Ron de Bruin" wrote: Use it like this This line is wrong If Trim(A6) = "" Then Sub Test() Sheets("Sheet1").Select If Trim(Range("A6")) = "" Then Range("A4").EntireRow.Insert End If End Sub -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Bonnie" wrote in message ... Hi, In a Macro (VBA) I am testing cell A6 for null, if isnull (""), I want to insert a row. The problem is that it always inserts a row even when cell A6 has something in it? There are blank spaces at the from of the cell so I trimmed it. Does anyone see something I'm doing wrong? Sheets("Sheet1").Select Range("A6").Select If Trim(A6) = "" Then Range("A4").Select Selection.EntireRow.Insert End If Thanks in advance. Bonnie |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| COUNTIF says Null = Blank but Blank < Null | Excel Worksheet Functions | |||
| Calculate mean of test scores from rows of test answers | Excel Discussion (Misc queries) | |||
| Search for a test string and if found insert 'x' in clumn 'A' | Excel Discussion (Misc queries) | |||
| Formulas (If linked data is not null, then insert "Complete" in ce | Excel Worksheet Functions | |||
| ISNULL function - can't find it | Excel Worksheet Functions | |||
Linear Mode
