I currently have a string of items that looks like the following:

#N/A

#N/A

1" Shaft Liner DensGlass Ultra 2'x12'

#N/A

#N/A

#N/A

1/2" 4'x12' Regular

#N/A

#N/A

1/2" DensArmor Plus 4'x08' (paperless)

#N/A

#N/A

1/2" DensShield 32"x05'

#N/A

#N/A

1/2" Hardi-Backer 3'x05'

#N/A

1/2" MR 4'x08'

1/2" MR 4'x12'

#N/A

#N/A

#N/A

5/8" 4'x14' FC Type X

#N/A

#N/A

5/8" DensGlass Gold 4'x08' FC Type X

#N/A

#N/A

#N/A

5/8" MR 4'x08' FC Type X

#N/A

5/8" MR 4'x12' FC Type X

#N/A

#N/A

I am trying to filter out the #N/A's, so that it will output on the same

worksheet the following:

1" Shaft Liner DensGlass Ultra 2'x12'

1/2" 4'x12' Regular

1/2" DensArmor Plus 4'x08' (paperless)

1/2" DensShield 32"x05'

1/2" Hardi-Backer 3'x05'

1/2" MR 4'x08'

1/2" MR 4'x12'

5/8" 4'x14' FC Type X

5/8" DensGlass Gold 4'x08' FC Type X

5/8" MR 4'x08' FC Type X

5/8" MR 4'x12' FC Type X

Any help would be appreciated.

Public Sub ProcessData()

Const TEST_COLUMN As String = "A" '<=== change to suit

Dim i As Long

Dim LastRow As Long

With ActiveSheet

LastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row

For i = LastRow to 1 Step -1

If IsError(.cells(i, TEST_COLUMN).Value) Then

.Rows(i).Delete

End If

Next i

End With

End Sub

--

__________________________________

HTH

Bob

Const TEST_COLUMN As String = "A" '<=== change to suit

Dim i As Long

Dim LastRow As Long

With ActiveSheet

LastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row

For i = LastRow to 1 Step -1

If IsError(.cells(i, TEST_COLUMN).Value) Then

.Rows(i).Delete

End If

Next i

End With

End Sub

--

__________________________________

HTH

Bob

Thanks for the response. I assume this is VBA, so how do i input it? thanks.

ok, i gnore the otehr question, i figured out where to put it in. But what am

i suppsed to change the "A" to? and how do i get the equation to recognize

the data range i want filtered?

i suppsed to change the "A" to? and how do i get the equation to recognize

the data range i want filtered?

ITs obvious i have to make some modifications to your code, but im not

exactly sure where. i havent used VBA since 7th grade so icompletely forgot

everything.

if it helps, the data range is in column D, and i want it outputed in column

F.

Thanks.

exactly sure where. i havent used VBA since 7th grade so icompletely forgot

everything.

if it helps, the data range is in column D, and i want it outputed in column

F.

Thanks.

Change the "A"to "D" and run it, it will do everything in column D.

--

__________________________________

HTH

Bob

--

__________________________________

HTH

Bob

3. 2 fields have embedded \n's, how to get rid of these?

4. Weird Problem -- Repeating C's and N's

5. Multiline tooltip problem... shows the \n's

9. Is is possible to count the Y/N's in a record?

10. Mofify data values of n's variables

11. How to change the "N's" in proc report across time

12. deleting empty lines from a variable containing \n's

13. index n's maximun values in an array

15. Atn Matt Wills

6 post • Page:**1** of **1**