Proper Case with extra rules in Excel

Question

I have used vba for Proper Case in Excel but I need to add an exception rule for it to save much manual editing. I need the first letter after \"-\" to also be Capitalized, exam

Answer 1

Instead of

rng.Value = StrConv(rng.Value, vbProperCase)

use

rng.Value = WorksheetFunction.Proper(rng.Value)

Though this does not consider cases like don't doesn't as mentioned by Thomas Inzina.