VBA Help: Superscrip

[Visakh]

We have a macro which as the below code. The code is suppose to superscript the text which appears after the year. It fails when the month changes. It was working fine when the month was May/June/July. Is there a better code to raplace the existing code?

Sheets("review").Select



Range("B132").Value = "Performance Attribution Analysis - " & strnewdate & " Month End " & strnewdate1 & "(7)"
Range("B132").Characters(Start:=Len(ActiveCell) - 2, Length:=4).Font.Superscript = True
strFilename = "MSIF International " & Format(LastDay, "mmddyyyy")
With ActiveSheet

 

[steve the fish]

You need to replace Activecell with Range("B132").Value