Modify CanExecute to ignore existing Implements statements

Author: BZngr

Rubberduck.Refactorings/ExtractInterface/ExtractInterfaceRefactoring.cs

@@ -106,12 +106,8 @@ public bool CanExecute(RubberduckParserState state, QualifiedModuleName qualifie
                 return false;
             }
 
-            var parseTree = state.GetParseTree(interfaceClass.QualifiedName.QualifiedModuleName);
-            var context = ((Antlr4.Runtime.ParserRuleContext)parseTree).GetDescendents<VBAParser.ImplementsStmtContext>();
-
             // true if active code pane is for a class/document/form module
-            return !context.Any()
-                   && !state.IsNewOrModified(interfaceClass.QualifiedModuleName)
+            return !state.IsNewOrModified(interfaceClass.QualifiedModuleName)
                    && !state.IsNewOrModified(qualifiedName);
         }
     }

RubberduckTests/Commands/RefactorCommands/ExtractInterfaceCommandTests.cs

@@ -172,6 +172,22 @@ public void ExtractInterface_CanExecute_PropertySet()
             Assert.IsTrue(CanExecute(input));
         }
 
+        //https://github.com/rubberduck-vba/Rubberduck/issues/5693
+        [Test]
+        [Category("Commands")]
+        [Category("Extract Interface")]
+        public void ExtractInterface_CanExecute_ExistingImplements()
+        {
+            var input =
+@"
+Implements ITest
+
+Property Set Foo(value)
+End Property";
+
+            Assert.IsTrue(CanExecute(input));
+        }
+
         private bool CanExecute(string inputCode, ComponentType componentType = ComponentType.ClassModule)
         {
             return CanExecute(inputCode, Selection.Home, componentType);