Hello,
I want to convert a column with "SSN" title in text but I don't know where
the column is located. The programation below gives me the first column wich
contains SSN title. Does anyone know how to find an exact match of the SSN
title ?
Thanks!
} Set rng = wks.Rows(1).Find(What:="SSN")
} If Not rng Is Nothing Then rng.EntireColumn.TextToColumns Cells(1,
rng.Column)
--
Alex St-Pierre

Find takes a number of arguments. Add this argument and it will require an
exact match...

Set rng = wks.Rows(1).Find(What:="SSN", LookAt:=xlWhole)

--
HTH...

Jim Thomlinson


"Alex St-Pierre" wrote:

Hello,
I want to convert a column with "SSN" title in text but I don't know where
the column is located. The programation below gives me the first column wich
contains SSN title. Does anyone know how to find an exact match of the SSN
title ?
Thanks!
} Set rng = wks.Rows(1).Find(What:="SSN")
} If Not rng Is Nothing Then rng.EntireColumn.TextToColumns Cells(1,
rng.Column)
--
Alex St-Pierre

try
rng = wks.Rows(1).Find(What:="SSN").column



--
Don Guillett
SalesAid Software

"Alex St-Pierre" wrote in message
...
Hello,
I want to convert a column with "SSN" title in text but I don't know where
the column is located. The programation below gives me the first column
wich
contains SSN title. Does anyone know how to find an exact match of the SSN
title ?
Thanks!
} Set rng = wks.Rows(1).Find(What:="SSN")
} If Not rng Is Nothing Then rng.EntireColumn.TextToColumns Cells(1,
rng.Column)
--
Alex St-Pierre

Record a macro when you do the .find manually. You'll see one of the options is
to look at the whole cell.

LookAt:=xlWhole

I think you'll find it better to specify all the parms that you can. Excel/VBA
will remember the last settings used--no matter if the user did it or your code
did it.

with wks.rows(1)
set rng = .Find(What:="SSN", _
After:=.cells(.cells.count), _
LookIn:=xlValues, _
LookAt:=xlWhole, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=True)


I specified match case and whole cell.


Alex St-Pierre wrote:

Hello,
I want to convert a column with "SSN" title in text but I don't know where
the column is located. The programation below gives me the first column wich
contains SSN title. Does anyone know how to find an exact match of the SSN
title ?
Thanks!
} Set rng = wks.Rows(1).Find(What:="SSN")
} If Not rng Is Nothing Then rng.EntireColumn.TextToColumns Cells(1,
rng.Column)
--
Alex St-Pierre

--

Dave Peterson