I want to select specific records that match a criteria in a column.
Basically I want to select records where the column has either an "e" or a
"b". No blanks. Can somebody help me?

Try something like

Dim TotalRng As Range
Dim Rng As Range
For Each Rng In _
Application.Intersect(ActiveSheet.UsedRange,
ActiveSheet.Columns(1)).Cells
If Rng.Text = "e" Or Rng.Text = "b" Then
If TotalRng Is Nothing Then
Set TotalRng = Rng
Else
Set TotalRng = Application.Union(TotalRng, Rng)
End If
End If
Next Rng
TotalRng.Select


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com





"Rob" wrote in message
...
I want to select specific records that match a criteria in a
column.
Basically I want to select records where the column has either
an "e" or a
"b". No blanks. Can somebody help me?

I don't think I need the intersect function. I am selecting cells from
Column "L" that are popultated with either an "e", or a "b". This gives me
an error away.

"Rob" wrote:

I want to select specific records that match a criteria in a column.
Basically I want to select records where the column has either an "e" or a
"b". No blanks. Can somebody help me?