Compile Error: Ambiguous name detected: Floor

attached is a file with the vba code

The code module of interest: TestHouseObject
class modules involved: House_Class, Floor_Class, Floor_CollectionClass

The compile error(Ambiguous name detected:Floor)
occurs in the House_Class in the code lines beginning with

' method to acquire a single floor (for looping)
  Public Property Get Floor(ByVal value as Variant) as Floor_Class
       set Floor = GFloors(value)
  end Property

Moderator's note: Please take the time to review our rules. There aren't many, and they are all important. Rule #2 requires code tags. I have added them for you this time because it's only a couple of lines. --6StringJazzer

*****************************
my expectations were that Floor is defined as of type, Floor_Class, in the Public Property Get Floor
hence I could then use it thereafter.