Close #1845

Author: Hosch250

Rubberduck.Parsing/Symbols/ClassModuleDeclaration.cs

@@ -104,6 +104,19 @@ public bool IsGlobalClassModule
                     attributeIsGlobalClassModule = value.Single() == "True";
                 }
                 _isGlobal = attributeIsGlobalClassModule;
+
+                if (!_isGlobal.Value)
+                {
+                    foreach (var type in Subtypes)
+                    {
+                        if (type is ClassModuleDeclaration && ((ClassModuleDeclaration) type).IsGlobalClassModule)
+                        {
+                            _isGlobal = true;
+                            break;
+                        }
+                    }
+                }
+
                 return _isGlobal.Value;
             }
         }

Rubberduck.Parsing/Symbols/DeclarationFinder.cs

@@ -376,6 +376,23 @@ private Declaration FindInReferencedProjectByPriority(Declaration enclosingProje
 
         private IEnumerable<Declaration> FindAllInReferencedProjectByPriority(Declaration enclosingProject, string name, Func<Declaration, bool> predicate)
         {
+            var v =
+                MatchName(name)
+                    .Where(
+                        p =>
+                            p.DeclarationType.HasFlag(DeclarationType.Property) &&
+                            (Declaration.GetModuleParent(p) == null ||
+                             Declaration.GetModuleParent(p).DeclarationType == DeclarationType.ClassModule) &&
+                            ((ClassModuleDeclaration) Declaration.GetModuleParent(p)).IsGlobalClassModule);
+
+            var x =
+                MatchName(name)
+                    .Where(
+                        p =>
+                            p.DeclarationType.HasFlag(DeclarationType.Property) &&
+                            (Declaration.GetModuleParent(p) == null ||
+                             Declaration.GetModuleParent(p).DeclarationType == DeclarationType.ClassModule));
+
             var interprojectMatches = MatchName(name).Where(predicate).ToList();
             var projectReferences = ((ProjectDeclaration)enclosingProject).ProjectReferences.ToList();
             if (interprojectMatches.Count == 0)

Rubberduck.Parsing/Symbols/ReferencedDeclarationsCollector.cs

@@ -207,6 +207,11 @@ public List<Declaration> GetDeclarationsForReference(Reference reference)
                     attributes.AddPredeclaredIdTypeAttribute();
                 }
 
+                if (typeAttributes.wTypeFlags.HasFlag(TYPEFLAGS.TYPEFLAG_FAPPOBJECT))
+                {
+                    attributes.AddGlobalClassAttribute();
+                }
+
                 Declaration moduleDeclaration;
                 switch (typeDeclarationType)
                 {

Rubberduck.Parsing/VBA/Attributes.cs

@@ -39,5 +39,10 @@ public void AddPredeclaredIdTypeAttribute()
         {
             Add("VB_PredeclaredId", new[] {"True"});
         }
+
+        public void AddGlobalClassAttribute()
+        {
+            Add("VB_GlobalNamespace", new[] {"True"});
+        }
     }
 }