How to write vba to evaluate the text font and size on an active cell range?
 

I have a web page download consists of the contact information like Name,
address and city etc. I opened it with the Excel and the information is
organized in the way that is impossible to import to an Access database.
However the "Name" is shown in a font and size differnt from other
information and this is only indication to seperate individual contact
information. How to write a vba to evaluate the test font and size on an
active cell range? Thanks.

How to write vba to evaluate the text font and size on an active cell range?
 

Do you have xl2003 or xl2002. You can use Edit=Find which supports
searching for a format. Turn on the macro recorder while you do it manually
to get the basic code.

Then look at Help on FindNext to see how to find multiple occurances.

--
Regards,
Tom Ogilvy


"Paul" wrote in message
...
I have a web page download consists of the contact information like Name,
address and city etc. I opened it with the Excel and the information is
organized in the way that is impossible to import to an Access database.
However the "Name" is shown in a font and size differnt from other
information and this is only indication to seperate individual contact
information. How to write a vba to evaluate the test font and size on an
active cell range? Thanks.

How to write vba to evaluate the text font and size on an active c
 

Paul,

Something like:

For Each cell In Range("A1:A200")
If cell.Font.Name = "MS Sans Serif" And cell.Font.Size = 14 Then
cell.Interior.ColorIndex = 5
...... your code
End If

Next

"Paul" wrote:

I have a web page download consists of the contact information like Name,
address and city etc. I opened it with the Excel and the information is
organized in the way that is impossible to import to an Access database.
However the "Name" is shown in a font and size differnt from other
information and this is only indication to seperate individual contact
information. How to write a vba to evaluate the test font and size on an
active cell range? Thanks.