for each character in a cell

  • Thread starter Thread starter Kevin
  • Start date Start date
K

Kevin

I need to perform a function for each character in a cell.

I have for each c in activecell.characters
do something
next c

I get "Object does not support this property or method"

Any advice?

Thanks,
Kevin
 
Hi,
From the XL online documentation on CHaracters:
"Remarks
The Characters object isn't a collection
"
That is, For Each won't work. You have to loop with a regular For:

Dim i as long, ttl as long
Dim s as string
ttl=ActiveCell.Characters.Count
For i=1 to ttl
s= ActiveCell.Characters(i,1).text
NExt
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Adjusting height of text cells 3
VBA set thick borders around non empty cells in range 0
Macro or VBA to Bold first 3 characters of a cell in the entirecolumn 3
Macro that delets all cells containg ALL words in bold 3
Macro to test characters with block of cells and change font 4
Characters Object limitation? 1
No characters data in Hyperlink cell 3
Delete 1st character if string is longer than 6 characters 3

Back
Top