Rename clash check is a little too tight.

[daFreeMan]

Win10, Excel201(Desktop), RD .3744

Given this code:

Private Type TMonthScoreInfo
  veryDissatisfiedResponses As Long
End Type
Private this As TMonthScoreInfo

Public Property Get VS() As Long
  VS = this.verySatisfiedResponses
End Property
Public Property Let VS(ByVal theVal As Long)
  this.verySatisfiedResponses = theVal
End Property

ARefactor | Rename attempt on Public Property Get VS() As Long to Public Property Get verySatisfiedResponses() As Long yields a warning that there is a name clash on verySatisfiedResponses

however there really isn't. Clicking "Yes" completes the rename and the code compiles cleanly

[comintern]

See chat.

[daFreeMan]

I just noticed that doing the rename in the opposite order - i.e. rename the member of Type, then rename the Getter/Setter it works without error.