Mixed case requirements in same cell!

Hi all

I have this code which is working fine but needs adjusting to take into account recent changes.

Please Login or Register  to view this content.

The change only affects "Sheet4 - Column 4" at the moment.

I need the case change to handle the following so that:

Smith (fs) appears as Smith (FS) not as Smith (fs)

which is how the code currently handles the last 4 characters i.e. (fs).

TIA ...spellbound

Had already thought of that but would prefer a VBA solution if at all possible.

These are not initials but a suffix added to some of the surname denoting a secondary account.

Any takers on the VBA solution?

spellbound

Hi Leith

Thanks for the Macro and code.

I pasted the Macro into a standard module and added the line of code to the original macro which is in 'This Workbook'.

However, when I try to run the code, the line is in red and I get the following error message against the new line of code:

Compile Error - Syntax Error

Your new line of code appears to be in the right place, in that it relates to Column D of Sheet4.

Any ideas ...spellbound

Hi Leith

Still having problems.

As soon as I paste in the new line of code, I get the following error message:

Compile Error - Expected Expression

Very puzzling but beyond me ...spellbound

Hi Leith

I have created a test workbook which includes the relevent sheet and code.

Hope this helps ...spellbound

Hi Leith

Thanks for your continued efforts.

Had a quick play and all seems well.

Not around for a couple of days as I have to go for a knee operation today, so will fully implement it when I get back.

Incidentally, you included another macro in the module of the attachment:

Please Login or Register  to view this content.

however I could'nt see where this is used.

Thanks again ...spellbound