Finding the NEXT bold cell

[justchris]

Hello again! Alright, I originally posted this in the excel general section but this is something needed to be done in vba. Which is fine Now.. For what im trying to do...

Using the code below I can find A cell using the .find method. The message box shows the cell address. I need to find the next bold cell after the found cell. Then copy it to a new sheet.

Will say a3 is cash.
;---code finds a3 for cash
;---code search for next bold after found cell and finds a6
;---code copies a6 to a1 of new sheet.

Please Login or Register  to view this content.

[jindon]

try

Please Login or Register  to view this content.

[Leith Ross]

Hello justchris,

Here is an example macro that uses FindNext to keep searching a range.

Please Login or Register  to view this content.

Sincerely,
Leith Ross

[justchris]

Awesome. Thanks for the replys. Going to check em out now

[justchris]

Thank you jindon!! Thats really close. Now I need to figure out how to get it to search another column for the bold instead excluding a column from search. I tried changing it to search by range and that works too but I need to skip a whole column in the search. My totals will come from K, but there are bold totals in column j so doing it by range isnt it. Using your example will help a lot .
One step closer
Chris

[jindon]

1) change

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

2) change

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

[justchris]

Awesome.. Offset was it! My final code looks like this

Please Login or Register  to view this content.

And it works like a charm!

[VBA Noob]

Might be worth clearing the find format at the end

Please Login or Register  to view this content.

VBA Noob

[Leith Ross]

Hello justchris,

Just a side note to VBA Noob's post. This function wasn't available in Excel 2000. I don't have Excel 2002, so I can't say it was introduced here. It is definitely in Excel 2003.

Sincerely,
Leith Ross