Excel Macro If with text

[carmi]

I have a 100 different catagories in one collumn and I want an Excel macro to generate a abbreviation for each different catagorie in another collumn in order to have a better overview.

I am new to the whole macro writing thing but found a way to do it using this code:

Please Login or Register  to view this content.

This works, but instead of numbers I want tekst (exemple: when it's Catagory 1 the "Callcvalue should be "HS" instead of "1")

I am probably making a very basic mistake here but I have tried everything I could think off and cannot find a way to fix it.

Can you please help me???

[royUK]

please take a few minutes to read the Forum Rules, you will see then that your Thread Title & lack of Code tags is breaking the rules.

[DonkeyOte]

Please place your VBA within CODE Tags... edit your last post, highlight the VBA and press the # icon -- at which point we will be permitted to assist you.

[royUK]

Change the code like this

Please Login or Register  to view this content.